Reprise d'un code de la FAQ et il y a une erreur que je ne comprends pas

**taspai** · 03/04/2014, 12h09

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 :

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

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'.

au niveau de cette ligne donc :

Code :

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