Boucle Pour Parcourir les ligne d'une table
Moise
-
blux Messages postés 5032 Date d'inscription Statut Modérateur Dernière intervention -
blux Messages postés 5032 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
j'arrive pas a trouver la bonne boucle pour parcourir tout ma table et verifier le user dans toute la table .. mon code test juste la premier ligne de ma table ..
Dim User As Recordset
Set User = CurrentDb.OpenRecordset("Employee")
If Texte2 = User("UserName") And Texte4 = User("Password") And User("Profile") = "A" Then
MsgBox ("Admin")
DoCmd.Close
DoCmd.OpenForm ("Menu form")
ElseIf Texte2 = User("UserName") And Texte4 = User("Password") And User("Profile") = "U" Then
MsgBox ("Simple User")
DoCmd.Close
DoCmd.OpenForm ("Menu form")
Else
MsgBox ("Password Or UserName Incorrect")
End If
j'arrive pas a trouver la bonne boucle pour parcourir tout ma table et verifier le user dans toute la table .. mon code test juste la premier ligne de ma table ..
Dim User As Recordset
Set User = CurrentDb.OpenRecordset("Employee")
If Texte2 = User("UserName") And Texte4 = User("Password") And User("Profile") = "A" Then
MsgBox ("Admin")
DoCmd.Close
DoCmd.OpenForm ("Menu form")
ElseIf Texte2 = User("UserName") And Texte4 = User("Password") And User("Profile") = "U" Then
MsgBox ("Simple User")
DoCmd.Close
DoCmd.OpenForm ("Menu form")
Else
MsgBox ("Password Or UserName Incorrect")
End If