Dim conn As New SqlConnection(Ta Chaine de Connexion)Dim Query As String = "SELECT . FROM . where . = '" & TextbBox.Text &"'"Dim adap As New SqlDataAdapter(Query , conn)Dim ds As New DataSetTryconn.Open()adap.Fill(ds)Catch ex As Exception' Fermeture de la connection en baseIf conn IsNot Nothing Thenconn.Close()End If' Libération des objets en mémoireIf adap IsNot Nothing Thenadap.Dispose()End IfEnd Try
WHERE Nom LIKE '" & TextbBox.Text &"'ne marche pas !
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 874 234 membres 27 nouveaux aujourd'hui 16 152 membres club