Discussion :

[GarsDuCalvados]

Bonjour,
j'ai easyphp d'installer avec une bdd et un table.
Comment faire pour me connecter à la BDD (tout en localhost)?
Merci,
.GarsDuCalvados

[GarsDuCalvados]

J'ai essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
'Création de la chaîne de connexion
        Dim connectString As String = "Server=localhost;Database=parc;User ID=root;Password=password"
        'Création de la connexion
        Dim connection As SqlClient.SqlConnection = New SqlClient.SqlConnection(connectString)
        'Mouchard n°1
        MessageBox.Show("1")
        'Ouverture
        connection.Open()
        'Mouchard n°2 ==> ERREUR
        MessageBox.Show("2")

J'ai mis des sortes de mouchard pour voir à quelle étape ça buggé.
Surement lors de la connexion.
Et le mouchard n°1 s'affiche mais pas le 2ème.

Avez vous une idée?

[SaumonAgile]

Quelle est l'erreur ? On ne peut pas le deviner juste en regardant ton code

[Aspic]

J'ai essayé ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
'Création de la chaîne de connexion
        Dim connectString As String = "Server=localhost;Database=parc;User ID=root;Password=password"
        'Création de la connexion
        Dim connection As SqlClient.SqlConnection = New SqlClient.SqlConnection(connectString)
        'Mouchard n°1
        MessageBox.Show("1")
        'Ouverture
        connection.Open()
        'Mouchard n°2 ==> ERREUR
        MessageBox.Show("2")

J'ai mis des sortes de mouchard pour voir à quelle étape ça buggé.
Surement lors de la connexion.
Et le mouchard n°1 s'affiche mais pas le 2ème.

Avez vous une idée?

Les points d'arrets sont tout aussi efficaces ainsi que les pièges à erreur
Va voir la partie V de mon cours :
http://aspic.developpez.com/cours/dotnet

[Kaidan]

SqlClient ne peut pas se connecter à MySQL non ? Il faut utiliser ODBC ou le provider de MySQL.

[GarsDuCalvados]

Quelle est l'erreur ? On ne peut pas le deviner juste en regardant ton code

En faite l'erreur c'est que l'appli. se fige.
Rien pas de réaction aprés le mouchard 1 et je ne vois pas le mouchard 2.
J'en déduis que je ne me connect pas correctement à ma base Mysql de easyphp.

SqlClient ne peut pas se connecter à MySQL non ? Il faut utiliser ODBC ou le provider de MySQL.

Que dois faire pour me connecter alors?
ODBC ou Provider(je ne sais pas ce que c'est).

Merci.

EDIT
A l'aide du cours de Aspic "pièges" ;-)
J'ai pu voir un message d'erreur :

<<Image supprimée>>

[Kaidan]

Bonjour,

http://dev.mysql.com/downloads/connector/net/5.0.html

Il y a également un tutorial (assez ancien) :

http://morpheus.developpez.com/mysqldotnet/

[Aspic]

Bon déjà avec le message d'erreur c'est clair non ?

[GarsDuCalvados]

J'ai suivi le tuto téléchargé le connecteur installer.
Mais déja lorsque j'ajoute une référence je n'ai pas ByteFx.MySqlClent.dll mais mysql.data qui correspond au chemin de l'installation du connecteur.
Ensuite j'ai bien fais un imports mais j'ai toujours le meme message d'erreur.

Auriez vous une idée?

Merci,
GarsDuCalvados

[GarsDuCalvados]

Youpie,
j'ai reussi
avec de la recherche et tout et tout
ça fontionne voilà mon code qui me permet de récupérer mon résultat :

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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
        'Déclaration
        Dim RequeteSQL As String
        Dim objCommand As MySqlCommand
        Dim objDataReader As MySqlDataReader
        Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter()
        'Création de la chaîne de connexion
        Dim connectString As String = "Server=localhost;Database=parc;User ID=root;Password=password"
 
        Try 'Ouvre le piège
 
            'Création de la connexion
            Dim Connection As MySqlConnection = New MySqlConnection()
            Connection.ConnectionString = connectString
 
            'Mouchard n°1
            MessageBox.Show("1")
 
            'Ouverture de la connexion
            Connection.Open()
 
            'Mouchard n°1
            MessageBox.Show("2")
 
            'Requete SQl
            RequeteSQL = "SELECT * FROM ordinateur"
 
            'Execution de la requete
            objCommand = New MySqlCommand(RequeteSQL, Connection)
            objDataReader = objCommand.ExecuteReader
 
            While objDataReader.Read
                MessageBox.Show(objDataReader.GetString(0))
            End While
 
            'Fermeture
            objDataReader.Close()
            Connection.Close()
 
        Catch Ex As Exception 'Intercepte l'erreur en cas de pb
            MsgBox(Ex.ToString)
        End Try 'Ferme le piège

[afrodje]

Youpie,
j'ai reussi
avec de la recherche et tout et tout
ça fontionne voilà mon code qui me permet de récupérer mon résultat :

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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
        'Déclaration
        Dim RequeteSQL As String
        Dim objCommand As MySqlCommand
        Dim objDataReader As MySqlDataReader
        Dim MyAdapter As MySqlDataAdapter = New MySqlDataAdapter()
        'Création de la chaîne de connexion
        Dim connectString As String = "Server=localhost;Database=parc;User ID=root;Password=password"
 
        Try 'Ouvre le piège
 
            'Création de la connexion
            Dim Connection As MySqlConnection = New MySqlConnection()
            Connection.ConnectionString = connectString
 
            'Mouchard n°1
            MessageBox.Show("1")
 
            'Ouverture de la connexion
            Connection.Open()
 
            'Mouchard n°1
            MessageBox.Show("2")
 
            'Requete SQl
            RequeteSQL = "SELECT * FROM ordinateur"
 
            'Execution de la requete
            objCommand = New MySqlCommand(RequeteSQL, Connection)
            objDataReader = objCommand.ExecuteReader
 
            While objDataReader.Read
                MessageBox.Show(objDataReader.GetString(0))
            End While
 
            'Fermeture
            objDataReader.Close()
            Connection.Close()
 
        Catch Ex As Exception 'Intercepte l'erreur en cas de pb
            MsgBox(Ex.ToString)
        End Try 'Ferme le piège

Quelle référence as-tu ajouter?

Merci