oxytomire
-
9 mai 2013 à 12:59
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024
-
9 mai 2013 à 20:04
Bonjour/Bonsoir
J'ai trouvé ce code sur internet:
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdok.Click
Dim conn As MySqlConnection
conn = New MySqlConnection
conn.ConnectionString = "server=mysql5.000webhost.com; user id=user; password=test; database=database"
Try
conn.Open()
Catch myerror As MySqlException
MsgBox("Error 404")
End Try
Dim myAdapter As New MySqlDataAdapter
Dim sqlquery "SELECT * FROM login WHERE username '" + txtuser.Text + "' AND password= '" + txtpass.Text + "'"
Dim myCommand As New MySqlCommand()
myCommand.Connection = conn
myCommand.CommandText = sqlquery
myAdapter.SelectCommand = myCommand
Dim MyData As MySqlDataReader
MyData = myCommand.ExecuteReader
If MyData.HasRows = 0 Then
MsgBox("Invalid Login Info.")
Else
MsgBox("valid Login Info.")
Form1.Show()
Me.Hide()
End If
Mais le soucis c'est que j'ai une erreur à cette ligne:
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024159 9 mai 2013 à 14:28
Bonjour,
As-tu espionné les valeurs de ta connexion en pas à pas, si non, je te conseil de le faire ?
As-tu eu un message 404 s'afficher ?
En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024159 9 mai 2013 à 14:49
Bonjour,
A la place d'avoir uniquement MsgBox"..")
Fais :
MessageBox.Show(myerror.ToString)
Cela indique que ta connexion a eu une erreur lors de son ouverture.
Tout est indiqué dans mon message pour Option Strict et Option Explicit.
Sinon, pour les erreurs dues à Microsoft.VisualBasic, voici un exemple de remplacement :
MsgBox -> MessageBox.Show
Sinon, postes tes lignes qui posent pb et on regarde ensemble.
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024159 9 mai 2013 à 16:51
Bonjour,
Oui, si ta connexion échoue, elle n'est pas ouverte.
Et comme tu n'as pas mis le message d'erreur, je ne peux rien dire de plus que :
http://www.connectionstrings.com/
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024159 9 mai 2013 à 20:04
Bonjour,
Il te dit qu'il ne peut pas se connecter à ton serveur car l’hôte n'est pas autorisé, revérifie ta configuration (client et serveur)
v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list ---
Mon site