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
...