OVH Cloud OVH Cloud

Connection ODBC sous VB 2005

2 réponses
Avatar
Camelia
Bonjour,

Je souhaiterai savoir pourquoi je n'ai pas la méthode Fill sur mon objet
DataAdapter DaMain et même un message d'erreur "Declaration expected" pour
l'objet DaMain alors qu'il est déjà défini.
Voici les qqls lignes écrites...

Imports System.Data.Odbc
Imports System.Data
Imports System.Data.Common

Public Class Toto
Dim ConMain As New System.Data.Odbc.OdbcConnection("DSN=MyDSN")
Dim DaMain As New System.Data.Odbc.OdbcDataAdapter("select * from MyTable",
ConMain)
Dim DsMain As New System.Data.DataSet()

DaMain.fill(DsMain) --- erreur à ce niveau

End Class

Merci pour votre aide

2 réponses

Avatar
Eric Vernié [MS]
Bonjour Camelia,

La méthode Fill() ne peut s'appeler que dans une Fonction mais pas
directement dans la classe.
Si tu veux l'appeler à l'initialisation de ta classe, il faut utiliser un
Constructeur comme suit par exemple :
Sub New()
DaMain.fill(DsMain)
End Sub

Cordialement

Eric Vernié
Microsoft France

"Camelia" wrote in message
news:
Bonjour,

Je souhaiterai savoir pourquoi je n'ai pas la méthode Fill sur mon objet
DataAdapter DaMain et même un message d'erreur "Declaration expected" pour
l'objet DaMain alors qu'il est déjà défini.
Voici les qqls lignes écrites...

Imports System.Data.Odbc
Imports System.Data
Imports System.Data.Common

Public Class Toto
Dim ConMain As New System.Data.Odbc.OdbcConnection("DSN=MyDSN")
Dim DaMain As New System.Data.Odbc.OdbcDataAdapter("select * from
MyTable",
ConMain)
Dim DsMain As New System.Data.DataSet()

DaMain.fill(DsMain) --- erreur à ce niveau

End Class

Merci pour votre aide



Avatar
Camelia
Je vous remercie pour aide!!


"Camelia" a écrit :

Bonjour,

Je souhaiterai savoir pourquoi je n'ai pas la méthode Fill sur mon objet
DataAdapter DaMain et même un message d'erreur "Declaration expected" pour
l'objet DaMain alors qu'il est déjà défini.
Voici les qqls lignes écrites...

Imports System.Data.Odbc
Imports System.Data
Imports System.Data.Common

Public Class Toto
Dim ConMain As New System.Data.Odbc.OdbcConnection("DSN=MyDSN")
Dim DaMain As New System.Data.Odbc.OdbcDataAdapter("select * from MyTable",
ConMain)
Dim DsMain As New System.Data.DataSet()

DaMain.fill(DsMain) --- erreur à ce niveau

End Class

Merci pour votre aide