connexion vb6+ mysql

salut pour tout
je suis entraint de faire une application avec le vb6 qui fait une connexion avec ma base de données qui eqt sous mysql mais j'ai pas put ouvrir la connexion.voici une partit de ma code qui fait la connexion et teste si les contenues des champs saisis sont existant dans la base:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

.... schemin = "DSN=" & mybase & ";UID=" & root & ";PWD=" & "mabase" & ";database=& machine&;" sql = "select login,passwd,groupe from tab_utilisateur ;" rs.Open sql, cn Set txtlogin.DataSource = adbidentité txtlogin.DataField = "login" Do While Not rs.EOF rs.MoveFirst If txtlogin.Text = rs![login] And txtmpasse.Text = rs![passwd] Then If cogroupe.Text = "administrateur" Then modification.Show Else If cogroupe.Text = "simple utilisateur" Then rapport.Show End If End If End If....

---

Mais malheureusement toujours un msg d'erreur s'affiche de l'erreur 3709 qui dit "impossible d'utiliser cette connexion pour effectuer cette opération ,elle est fermer ou non valide dans ce contexe"
S'il vous plais aidez moi.

tu dois ouvrir ta "connexion". Voir exemple de code ci-dessous

Code:

---

1 2 3 4 5

sConnectPath = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=MaBaseDeDonnees"   Set cn= New ADODB.Connection cn.Open sConnectPath

---

A insérer avant le

Code:

---

rs.Open sql, cn

---

Ne pas oublier les rs.close & cn.close quand tu as finit, sinon la connexion reste ouverte vers la DB ce qui peut induire des problèmes de performance si tu laisse toutes les connexions ouvertes sans les fermer

c'est une erreur de frappe le guillemet qui manque dans la chaîne de connexion à la fin ?