Forum Clubic

VBA:un code incorrect. - formulaire et table VBA ACCESS 2002

salut à tous!
voila mon pb:
j’ai une table T_User(login,mot_de_passe) et je voudrait faire une compraison entre les identifiant saisie sur le formulaire et ceux de la table.
lorsque c bon le formulaire FM_Evaluation s’ouvre sinon à la 3eme tentiteve tout s’arrete.
mais le code si-dessous que j’ai écrit ne marche pas. il me met:erreur 424 objet non requis.
Private Sub connexion_Click()
Dim Sql As String
Dim rs As Recordset
Static i As Byte
‘Dim bd As Database
Set rs = bd.OpenRecordset(Sql)----> c’est ici l’erreur
Sql = “SELECT login,[mot_de_passe] FROM T_User WHERE login = '” & Me.txt_user & "’ AND [mot_de_passe]=’" & Me.txt_pass & “’;”
If Not rs.EOF Then
DoCmd.OpenForm “FM_Evaluation”, acNormal, , , , acWindowNormal
DoCmd.Close acForm, “F_CONNEXION”
Else
MsgBox "(Identifiant, Mot de Passe) incorrect ", vbInformation, “Connexion”
i = i + 1
End If
If i = 3 Then
MsgBox “Vous avez dépassé le nombre de tentatives autorisés”, vbCritical
DoCmd.Quit
End If
Me.Requery
End Sub

Set rs = bd.OpenRecordset(Sql)----> c'est ici l'erreur
Sql = "SELECT login,[mot_de_passe] FROM T_User WHERE login = '" & Me.txt_user & "' AND [mot_de_passe]='" & Me.txt_pass & "';"

tu n’aurais pas inverser les 2 lignes ??

tu lui fait ouvrir un recordset avec le paramètre Sql mais tu définis Sql après…

Sinon, pour la sécurité, c’est largement mieux de passer par le menu Outils / Sécurité que de créer un formulaire comme celui la

je ne peu pas proteger toute l’appli si tu veux.les acteurs( ceux qui utiliserons la base sont) 125 osteopathe.mais seul 25 ont le droit d’evaluer il faut bien que les autre arrive jusqu’a l’évaluation et des que tu veux aller au formulaire d’evaluaition stop.j’ai remis les deux ligne dans l’odre mais ca marche tours pas!

tu peux faire tout cela dans avec la sécurité mais bon c’est toi qui voit

c’est toujours la même erreur ?

oui! là j’ai tout effacer et je recommence.
je vais faire outils tout ça à la fin de l’appli.
mais pour les droit d’acces au formulaire evaluation je fais comment? :non:

tuto

http://www.ybet.be/access/15-securite.htm

http://www.info-3000.com/access/resecurite.php

et sinon tu voulais ceci

http://access.developpez.com/sources/?page=frms#Verfifmdp