Connexion à une base mysql

Résolu
keunene Messages postés 72 Date d'inscription samedi 5 avril 2014 Statut Membre Dernière intervention 10 mars 2023 - 28 nov. 2014 à 16:15
NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 - 29 nov. 2014 à 20:38
Bonjour,
ce code marche et il affiche tous les utilisateurs mais je voudrais alerter
par msgbox qu'un même pseudo ne peut s'inscrire deux fois





Dim conv As New MySqlConnection
Dim result As Integer
'MySqlCommand It represents a SQL statement to execute against a MySQL Database
Dim cmdv As New MySqlCommand
'Represents a set of data commands and a database connection that
'are used to fill a dataset and update a MySQL database. This class cannot be inherited.
Dim dan As New MySqlDataAdapter


Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
try

conv.ConnectionString = ("server=192.168.1.24;user id=keunene;password=;database=activation")
Try
conv.Open()

cmdv.Connection = conv
'in this query it does simply selecting or getting all the user found in the database.
cmdv.CommandText = "Select * from users where pseudo ='" & TextBox3.Text & "' "





Catch ex As Exception
MsgBox(ex.Message)


End Try
conv.Close()
dan.Dispose()
filltable(dtguser)
End Sub


je voudrais ajouter une condition de ce genre
Dim ds As New DataSet

If da.Fill(ds, "login") Then

MsgBox("Ce code existe déjà dans notre base")

end if


merci

1 réponse

NHenry Messages postés 15112 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 13 avril 2024 159
29 nov. 2014 à 20:38
Bonsoir,

Regardes du côté du DataReader, cela sera plus accessible pour une utilisation qui ne concerne pas l'affichage des données reçues.
0
Rejoignez-nous