Bonjour tous,
Je VOUDRAis acceder à une base de donné Mysql via vb6
J’utilise Mysql 5.1, sur une machine windows xp.
Aussi je telecharge et installe mysql-connector-odbc-5.1.8-win32 , Après installation lors de la configuration du driver , je mets localhost dans la partie ou on demande de specifier le server.
En cliquant sur test, une boite de dialogue m’informe que la configuration a réussi.
En executant de ce bout de code , j’ai le message d’erreur ci-joint m’indiquant que la source de données est introuvable
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22 Dim rs As ADODB.Recordset Dim sql As String Dim conn As ADODB.Connection Set rs = New ADODB.Recordset Set conn = New ADODB.Connection conn.CursorLocation = adUseClient conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _ & SERVER = "localhost;" _ & Database = "mabase;" _ & UID = "root;" _ & PWD = "mdp;" _ conn.Open MsgBox "yes" rs.Open "select * from matable", conn, adOpenDynamic, adLockOptimistic rs.MoveFirst MsgBox rs!id_etudiant conn.Close Set conn = Nothing
Vivement un coup de main afin de solutionner ce bug.
Merci
Partager