Discussion :

[jokenjo]

Bonsoir
je suis entrain de mettre en place un formulaire d´authentification avec bouton de connexion.j´ai eu le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
 
 
Private Sub Commande5_Click()
Me.Requery
Dim sql, User_id, User_groupe   As String
Dim rs As DAO.Recordset
Static i As Byte
sql = "SELECT * FROM T_USER WHERE TRIGRAMME = '" & Me.User & "' AND PASSWORD ='" & Me.Password & "';"
Set rs = CurrentDb.OpenRecordset(sql)
If Not rs.EOF Then
  DoCmd.OpenForm "Formulaire_nouveau", 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épassé le nombre de tentatives autorisés", vbCritical
DoCmd.Quit
End If
End Sub

Mais le problem cest que F_connxion me donne directment le nom et mot de passe de la table , de plus il affiche aussi (quand je compile ) methode ou de donnée introuvable .Je ne me retrouve pas dedans

merci

[jean-paul lepetit]

Salut,
sur quelle ligne il te met le message d'erreur ?

[jokenjo]

Salut,
sur quelle ligne il te met le message d'erreur ?

BOnsoir
c´est sur la ligne 9, (Me.user ) ou (Me.txt_user) jái teste es 2
merci

[DamKre]

Si je comprends bien ton problème, c'est que Access affiche directement la personne et son mot de passe.

Ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sql = "SELECT * FROM T_USER WHERE TRIGRAMME = '" & Me.User & "' AND PASSWORD ='" & Me.Password & "';"

1) Est-ce que "Me.User" et "Me.Password" sont bien deux zones de texte dans un formulaire ?

et surtout

2) Assure-toi que ton formulaire de connexion ne se base pas sur la table T_User ! Sa source doit être vide ( enfin, moi, c'est ce que j'ai fait, et ça fonctionne très bien ! )

[jokenjo]

Si je comprends bien ton problème, c'est que Access affiche directement la personne et son mot de passe.

Ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sql = "SELECT * FROM T_USER WHERE TRIGRAMME = '" & Me.User & "' AND PASSWORD ='" & Me.Password & "';"

1) Est-ce que "Me.User" et "Me.Password" sont bien deux zones de texte dans un formulaire ?

et surtout

2) Assure-toi que ton formulaire de connexion ne se base pas sur la table T_User ! Sa source doit être vide ( enfin, moi, c'est ce que j'ai fait, et ça fonctionne très bien ! )

Bonjour
Le fomlaire de connexion ne se Base plus sur T_user , mais je comprend pas ce que vous voulez dire par 2 zones de texte dans le formulaire connexion : Bien que si , mais est ce que je dois definir le Me.user et Me.password quelque part dans les proprietes de ces zones de text.....??
merci

[jokenjo]

Bonjour
Le fomlaire de connexion ne se Base plus sur T_user , mais je comprend pas ce que vous voulez dire par 2 zones de texte dans le formulaire connexion : Bien que si , mais est ce que je dois definir le Me.user et Me.password quelque part dans les proprietes de ces zones de text.....??
merci

Merci Bien Damkre
le probleme est resolue , il fallait mettre les noms champs text user et passord dans les propietes du formulaires , et du coup ca marche .
MERCI