connexion a une base de données MYSQL en VB

Question

Bonjour à tous!
Je souhaite faire une connexion à une base MYSQL en VB. J'ai l'impression qu'il fallait un driver ODBC donc j'ai installé MyODBC-3.51.03.exe. J'aimerai savoir comment m'y prendre pour me connecter. Je ne suis qu'une tite débutante en VB mais c'est primordial que je réussisse à faire ça car il va falloir que je le présente ce chtit prog mercredi!!!:) Je vous remercie beaucoup pour votre aide!

craab

cs_Crazyht · Answer

' Declaration des varables de connexion a la base
   Dim DSN as String
   Dim Server as string
   Dim DataBase as string
   Dim Login as string
   Dim Pass as string
   
   ' Server MySQL
   Server = "MonServerMySQL" ' ou 192.168.200.9
   ' Nom de la base
   DataBase = "BaseDeTeste"
   ' Utilisateur pour la connexion
   Login = "Testeur"
   ' Mot de passe de l'utilisateur
   Pass = "hadock"
   ' Création de la chaine de connexion a la base
   DSN = "driver={MySql};server=" & Server & ";db=" & DataBase & ";UID=" & Login & ";pwd=" & Pass & ";option=2048"
   
   ' Instantiation des objets d'utilisation de la base
   Set Db = CreateObject("ADODB.Connection")
   
   ' Parametrage de la connexion base
   Db.ConnectionTimeout = 30
   Db.CommandTimeout = 30
   
   ' Connexion a la base
   Db.Open DSN


Et voila et bien evidement il faut que MyODBC soit installé 

A++

Crazyht :)

craab · Answer

Oui je crois que ça fonctionne mais j'ai un message d'erreur quand j'essaye de récupérer les résultats de ma requête dans une liste il me dit que je ne peux pas faire ça quand mon objet est fermé. J'ai mis un ADODB.Recordset et en fait je ne vois pas trop où est mon erreur. merci d'avance.

Craab chtite débutante qui galère!

NetFree · Answer

salut, comment on fait pour avoir meton les infos de la table "test" variable "allo"
svp
merci

MF_DeNice · Answer

Salut!
Je bosse avec VB .NET et je suis en train de tester le script propos&#233; au d&#233;but de ce sujet, et lors de la compilation il me sort l'erreur suivante :

"Name 'Db' is not declared."

Alors j'ai bien test&#233; de mettre "Dim Db as String" au d&#233;but, mais je me doutais bien que cela ne fonctionnerai pas. Le type n'est pas bon.

Si qqun pouvait me guider je lui en serais tr&#232;s reconnaissant.... 
Merci d'avance ++

::[DeNice]::

MF_DeNice · Answer

Re!
Je viens de constater que sur cette ligne "Set Db = CreateObject("ADODB.Connection")", le set disparait &#224; la compilation.
Cela viendrait-il du fait que je n'ais pas MyODBC?

Merci ++ 

::[DeNice]::

MF_DeNice · Answer

Salut c'est encore moi ^^
Je viens de t&#233;l&#233;charger "mysql-connector-odbc-3.51.12-win32" sur le site de MySQL, mais toujours rien &#224; faire... 

Le Set disparait toujours et donc la compilation ne fonctionne pas...

A ++ merci!

::[DeNice]::

Connexion a une base de données MYSQL en VB

6 réponses

Discussions similaires