Bonjour,
je souhaiterais tester si la valeur que je saisis dans un textbox est bien dans le champs concerné de ma base de donnée. Dans mon cas, j'ai un Username et password que je rentre et je voudrais tester ce que j'ai saisie avec les champs concernée de la table dans ma base de donnée.
Quand l'element recherché existe dans la table cela marche sans problème mais quand il n'existe dans celle ci il y a plantage de mon systeme. y'at'il une methode plus simple pour gerer ces genre de situation ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Dim cmd_user As New OracleCommand cmd_user.Connection = conn cmd_user.CommandText = "Select INTITULE_PROFIL,NOM,PRENOM from UTILISATEUR,PROFIL_UTILISATEUR Where UTILISATEUR.LOGIN='" & Trim(Me.Username.Text) & "' and UTILISATEUR.Password ='" & Trim(Me.Password.Text) & "' and (UTILISATEUR.ID_PROFIL=PROFIL_UTILISATEUR.ID_PROFIL) " cmd_user.CommandType = CommandType.Text Dim dr_user As OracleDataReader = cmd_user.ExecuteReader() If cmd_user.ExecuteReader Is DBNull.Value Then MsgBox("Acces Interdit !!! USER NAME OU MOT DE PASSE INCORRECTE !!!", MsgBoxStyle.OkOnly, " User Authentification") else dr_user.Read() Profil_USER_EN_COURS = dr_user.GetString(0) Nom_User_EN_COURS = dr_user.GetString(1) Prenom_USER_EN_COURS = dr_user.GetString(2)
Merci de votre aide
Partager