Erreur d'un msgbox?? qui connait ce message d'erreur

Question

Bonjour &#224; tous.
Dans la tentive d'excution de mon code VBA sous ACCESS 2002, code suivant:

   Private Sub connexion_Click_Click()
   MsgBox ("m1")
   Me.Requery
   Dim sql, User_id, User_groupe   As String
   Dim rs As DAO.Recordset   Static i As Byte sql "SELECT * FROM T_USERS WHERE TRIGRAMME '" & Me.txt_user & "' _ 
    AND PASSWD ='" & Me.txt_pass &    "';"
   Set rs = CurrentDb.OpenRecordset(sql)
   If Not rs.EOF Then
     DoCmd.OpenForm "Gene", acNormal, , , , acWindowNormal
     DoCmd.Close acForm, "F_CONNEXION"
     User_id = rs("TRIGRAMME").Value
     User_groupe = rs("GROUPE").Value
   Else
     MsgBox "(Identifiant, Mot de Passe) incorrect ", vbInformation, "Connexion"
     i = i + 1
   End If
   
   If i = 3 Then
      MsgBox "Vous avez d&#233;pass&#233; le nombre de tentatives autoris&#233;s", vbCritical
      DoCmd.Quit
End If
End Sub

j'obtiens le message d'erreur suivant sous forme de msgbox
L'expression sur clic entr&#233;e comme parametrre de la propri&#233;t&#233; du type evenement estvsource d'erreure
Type definie par l'utilisateur non definie.
*le resultat de l'expression n'est pas le nom d'une macro,le nom d'une fonction definie par l'utilisateur[event procedure]
*Une erreur &#224; &#233;t&#233; comise lors de l'&#233;valuation d'une fonction,d'un evenement ou d'une macros

quelqu'un c t'il ce que &#231;a veut dire? est-ce un rapport le code qui ne serait pas bon?merci

Booba

econs · Answer

Ton bouton de connexon s'appelle-t-il connexion_Click ou connexion ?



Parce que l&#224;, on s'attend &#224; ce qu'il s'appelle connexion_Click. Est ce normal ?


Manu

kalobit · Answer

m&#234;me remarque pour moi.
Sinon je vois pas, je touche pas une bille en access

kalo

Erreur d'un msgbox?? qui connait ce message d'erreur

2 réponses

Discussions similaires