Discussion :

[gaetan.tranvouez]

bjr a tous

voila j'ai un pb dans mon code car je n'arrive pas à me connecter à ma bdd.
Je suis dsl de vous infliger tout ce code mais je ne vois comment vous expliquer. Quand j'appuie sur le bouton 'connecter à ma bdd" j'ai une erreur qui me dit "projet ou bibliothèque introuvable".

Voici mon form:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Dim mydate
Dim mytime
Dim Mabase As Bdd
Private Sub ConnectBdd_Click()
Dim msg, msginf As String
For i = 0 To 2    ****Erreur sur cette ligne, il me sélectionne le 'i'****
    If Text1(i).Text = "" Then
        j = j + 1
        msginf = "Il manque " & j & " paramètres de connexion!"
    End If
...

[jmfmarques]

Déjà : manque pas un dim i as integer ? (et sans doute également pour j)

[gaetan.tranvouez]

Merci, c'est vrai que ca marche mieux

Mais j'ai une autre erreur:

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
Public Function Connecter() As String
On Error GoTo line1
Dim msg As String
msg = "OK"
If cnx.State = adStateOpen Then   ****erreur de compilation, projet ou bibliothèque introuvable****
    cnx.Close
End If
'Définition de la chaîne de connexion
cnx.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};database=" & NameDB & ";server=" & Server & ";uid=" & NameUser & ";pwd=" & Passwd & ";"
'Ouverture de la base de données
cnx.Open
GoTo lastline
line1:
msg = cnx.Errors.Item(0)
lastline:
Connecter = msg
cnx.Errors.Clear
End Function

[Asdorve]

salut

Projet -> Référence -> Microsoft DAO 3.51 Object Library

[gaetan.tranvouez]

merci mais je l'ai pas

j'ai ca

Microsoft DA0 2.5/3.51 Compatibility Library

ou

Microsoft DA0 3.0 Object Library

ou

Microsoft DA0 3.6 Object Library

Lequel??

[gaetan.tranvouez]

ba a vrai dire j'ai tésté les 4, un par un et à chaque fois j'ai un message qui me dit que "je les utilisent déjà" alors que pourtant ils étaient décochés...

J'ai meme éssayé les 4 en meme temps et meme résultat.
Et ensuite quand je veux me connecter à ma bdd il me dit que le projet ou la bibliothèque est introuvable.