Discussion :

[driver]

salut
voila j'ai cree sous visual basic 3 forms
form 1 contien :
textbox1 (id)
textbox2(mot de passe)
1 bouton
une base de donner access
qui contien une table users
champs:
id : identifient
password : mot de passe
grade : administrateur/simple user

voila ce que je veux faire

quand un utilisateur entre son id et son mot de pass et click sur le bouton

si le l'utilisateur est enregistre sur la base de donner alors il va voir dans le champ grade si c'est un simple utilisateur il doit etre dirige sur la form 2
si c'est un administrateur dirige sur la form 3

[driver]

j'ai placer un controldata et avec se code

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
Public str_id, str_password, str_grade As String
Private Sub Command1_Click()
str_id = Text1.Text
str_password = Text2.Text
Data1.Recordset.FindFirst "id like '" & str_id & "'"
Data1.Recordset.FindFirst "password like '" & str_password & "'"
If str_id = Data1.Recordset.Fields("id") And str_password = Data1.Recordset.Fields("password") Then
If Data1.Recordset.Fields("grade") = "administrateur" Then frm_admin.Show
If Data1.Recordset.Fields("grade") = "user" Then frm_index.Show
 
Else
 
    MsgBox "Vérifiez votre nom d'utilisateur ou mot de passe !"
    Text1.Text = ""
    Text2.Text = ""
    Text1.SetFocus
End If
 
 
 
End Sub

ca marche tres bien