Connexion sur une DB MYSQL [VB6]

Fermé
Guessss - 27 nov. 2007 à 16:32
 math002 - 24 févr. 2008 à 11:51
Bonjour
j'ai un problem;
je veux me sur une base mysql est voici le code écrit:

Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
     
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset
     
    conn.CursorLocation = adUseClient
    conn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
            & "SERVER=127.0.0.1;" _
            & "DATABASE=ecole;" _
            & "UID=root;" _
            & "PWD=;" _
            & "OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384
 
    conn.Open
    
     
    rs.Open "INSERT INTO INSCRIPTION (NOM,POSTNOM) values('" + Text1.Text + "','" + Text2.Text + "' )", conn, adOpenStatic, adLockOptimistic
 
    'rs.Close
    Set rs = Nothing


mais lors de l'exécution un message d'erreur s'affiche: "Source de données introuvable et nom de pilote non spécifié"
Je demande si quelqu'un pourrait m'aidez.
Merci

conn.Close
Set conn = Nothing
A voir également:

1 réponse

entre 127.0.0.1 il manque les "" ainsi que ecole et root et a pwd=

SERVER="127.0.0.1"; _
& DATABASE="ecole; _
& UID="root"; _
& PWD=""; _
& OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384"


Puis INSCRIPTION si il est en liniscule dans ta base de donner dans ton code tu dois le mettre également en minuscule
1