J'ai besoin d'aide pour taper une requete SQL dans un code VBA

Fermé
bassory2008 Messages postés 7 Date d'inscription samedi 10 novembre 2012 Statut Membre Dernière intervention 1 juin 2015 - Modifié par bassory2008 le 8/07/2013 à 15:21
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 - 9 juil. 2013 à 15:56
Bonjour a tous je veux taper une requete SQL dans un code VBA pour recuperer les valeurs de 2 Champs sous Access 2007 afin de les faires verifier par un bouton nommer "connecter" j'ai taper mon code mais il passe pas voici mon code

Private Sub Commande8_Click()
Dim Login, MotPass As String
Dim UTILISATEUR As String

Login.Value = Login.Text
MotPass.Value = MotPass.Text

UTILISATATEUR = "SELECT Count(*) FOR UTILISATEUR WHERE Login.Text = (Login) MotPass.Text = (MotPass) "

End Sub
A voir également:

2 réponses

Utilisateur anonyme
8 juil. 2013 à 16:15
Bonjour

Tu pourrais faire un petit effort d'attention...
UTILISATEUR et UTILISATATEUR, ce n'est pas la même chose
et surtout

c'est SELECT FROM et pas SELECT FOR
0
bassory2008 Messages postés 7 Date d'inscription samedi 10 novembre 2012 Statut Membre Dernière intervention 1 juin 2015
9 juil. 2013 à 12:16
Merçi pour la remarque je suis un debutant mais j'ai vraiment besoin d'aide pour ameliorer mon code!
0
bassory2008 Messages postés 7 Date d'inscription samedi 10 novembre 2012 Statut Membre Dernière intervention 1 juin 2015
9 juil. 2013 à 12:17
Bonjour a tous je veux taper une requete SQL dans un code VBA pour recuperer les valeurs de 2 Champs sous Access 2007 afin de les faires verifier par un bouton nommer "connecter" j'ai taper mon code mais il passe pas voici mon code

Private Sub Commande8_Click()
Dim Login, MotPass As String
Dim UTILISATEUR As String

Login.Value = Login.Text
MotPass.Value = MotPass.Text

UTILISATEUR = "SELECT Count(*) FROM UTILISATEUR WHERE Login.Text = (Login) MotPass.Text = (MotPass) "

End Sub
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707
9 juil. 2013 à 15:56
Bonjour,

plutot qu'une requete, utilisez DCount pour savoir si au moins un login possible

AuMoinsUn = DCount("[login]", "UTILISATEUR", "[login] = '" & login.Text & "' AND [motpass] ='" & motpass.Text & "'")

et faites des tests sur AuMoinsUn :
0---> personne
>1---> plusieurs(pas normale)
1 ----> ok

A+
0