Bonjour a tous,
En fouinant dans la FAQ j'ai trouvé mon bonheur, cependant j'ai une erreur qui apparait que je n'arrive pas a comprendre !
Le lien de la FAQ : http://dotnet.developpez.com/faq/asp...=ado_connexion
J'ai donc repris le code de David Pedehourcq, "Comment se connecter à une base Mysql via ODBC" de cette manière :
Cependant j'obtiens l'erreur suivante : 'System.Data.Odbc.OdbcDataReader.Friend Sub New(command As System.Data.Odbc.OdbcCommand, cmdWrapper As System.Data.Odbc.CMDWrapper, commandbehavior As System.Data.CommandBehavior)' n'est pas accessible dans ce contexte, car il est 'Friend'.
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 Imports System Imports System.Data Imports System.Data.Odbc Public Class BDD Private Sub Connexion() Dim ConnexionParams As String = "DRIVER=(MySQL ODBC 3.51 Driver);" + "SERVER=localhost;" + "DATABASE=chocolat;" + "UID=root;" + "PASSWORD=fraise;" Try Dim ConnexionOdbc As New OdbcConnection(ConnexionParams) Dim CommandOdbc As New OdbcCommand() Dim DataReader As New OdbcDataReader() 'Connexion ConnexionOdbc.Open() CommandOdbc.Connection = ConnexionOdbc 'Envoie de requetes CommandOdbc.CommandText = "SELECT * FROM chocolat_users" DataReader = CommandOdbc.ExecuteReader() While DataReader.Read() Console.WriteLine(("Data : " + DataReader.GetString(1) + " " + DataReader.GetString(2))) End While 'Déconnexion DataReader.Close() ConnexionOdbc.Close() Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub End Class
au niveau de cette ligne donc :
Je ne comprends pas l'erreur, comment corriger cela ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part Dim DataReader As New OdbcDataReader()
Merci d'avance et bonne journée !
Partager