Discussion :

[bm225]

Salut à tous .....
Mon but était au fait de contrôler l'accès a une petite application avec vb 2008 et mysql.
J'ai une base nommée " Authent" sur mon server mysql.
Authent à une table compte(user,niveau,code).
Le niveau est soit haut ou bas.
Sur ma page vb, j'ai 2 textbox :
textbox1 pour saisir le nom user
textbox2 " " " mot de passe.
1 button pour valider....
Je veux afficher un message si le mot de pàsse est bon.
Par exemple, si un mot de passe est bon et que son niveau est bas alors j'affiche "Bravo, mais ton niveau est bas"
----------------------------------------------
Voici le code je tape
-----------------------------------------------

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
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
 
try
Dim SQL As String
Dim MyCommand As New MySqlCommand
Dim ConnnectionStr = "Database=Authent;Data Source=1.2.3.4;User Id=root;Password=0000"
Dim Connection = New MySqlConnection
Connection.ConnectionString = ConnnectionStr
Connection.Open()
SQL = "SELECT niveau FROM compte WHERE ('user'='"&textbox1.text&"' )AND ('code'='"&textbox2.text&"');"
MyCommand.Connection = Connection
MyCommand.CommandText = SQL
dim k as string
k= MyCommand.ExecuteNonQuery()
if ="bas" then
msgbox("bravo,mais ton niveau est bas")
else
msgbox("bravo,mais ton niveau est haut")
end if
catch ex as exception
msgbox("mot de passe eronnée")
end try
End Sub

----------------------------------------------
Rien ne marche .
Quel est le probleme ?
Avez vous une autre methode ?

Merci d'avance.

[bobo10]

ConnexionString:
server=MonServeur;user id=User;password=MotPasse;database=MaBase

Ensuite il ne faut pas faire ExecuteNonQuery() mais ExecuteScalar()
Qui te retourne le champ que tu veux au type Objet
Il ne te reste plus qu'à convertir -> Objet.ToString