Membre de methode ou de donnees introuvable access

Fermé
denior95 Messages postés 1 Date d'inscription samedi 28 mai 2016 Statut Membre Dernière intervention 5 juin 2016 - Modifié par jordane45 le 6/06/2016 à 00:26
castours Messages postés 2955 Date d'inscription lundi 18 septembre 2006 Statut Membre Dernière intervention 31 août 2019 - 6 juin 2016 à 18:39
Bonsoir tout le monde,

j'ai crée un formulaire qui demande à l'utilisateur d'entrer un login et un mot de passe pour se connecter. Seulement, VBA (pour Access) me renvoie une erreur au moment de la compilation
voici le code VBA:
Option Compare Database
Private Sub S_identifier_a_Click()
    Dim dbsprojet As Database
    Dim rstUtilisateur As Recordset
    
    Set dbsprojet = CurrentDb
    Set rstUtilisateur = dbsprojet.OpenRecordset("TABLE DES UTILISATEURS", dbOpenSnapshot)

    'On va chercher dans la table l'utilisateur selectionné
    rstUtilisateur.FindFirst "LOGIN = '" & Me.login_a & "'"
    If rstUtilisateur.NoMatch Then
        MsgBox "Entrer un login valide"
        Exit Sub
    End If
    If IsNull(Me.motdepasse_a) Then
        MsgBox "Veuillez entrer un mot de passe!"
        Me.motdepasse_a.SetFocus
        Exit Sub
    End If
    
     If rstUtilisateur(2) <> "AGENT DE SAISIE" Then
        MsgBox "Vous devez faire partie du groupe des AGENT DE SAISIE pour pouvoir vous connecter à cette section.Veuillez entrer un login AGENT DE SAISIE."
        Me.login_a = Null
        Me.motdepasse_a = Null
    Else
        If rstUtilisateur(1) <> Me.motdepasse_a Then
            MsgBox "Mot de passe invalide!"
            Me.motdepasse_a = Null
            Me.motdepasse_a.SetFocus
        Else
            DoCmd.OpenForm ("ID")
            'DoCmd.SetProperty "CONSULTER", acPropertyEnabled, "0"
            DoCmd.Close acForm, "CONNECTION AGENT DE SAISIE"
        End If
    End If
End Sub

après exécution, VBA renvoie: membre de méthode ou de données introuvable quelqu'un peut-il me donner un coup de main?

EDIT : Correction des balises de code

1 réponse

castours Messages postés 2955 Date d'inscription lundi 18 septembre 2006 Statut Membre Dernière intervention 31 août 2019 217
6 juin 2016 à 18:39
bonjour
va dans la rubrique programmation VBA du forum
0