cs_vortexxx
Messages postés2Date d'inscriptionlundi 11 août 2003StatutMembreDernière intervention13 décembre 2005
-
9 déc. 2005 à 16:18
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 2006
-
13 déc. 2005 à 22:36
Bonjour,
Je cherche à lire les enregistrements d'une table Dbase avec VB6
Après avoir crée un DSN ODBC appelé "monDsn"
Je me connecte a ma table de la façon suivante (ça marche)
----------
Dim ConnexionDbase As ADODB.Connection
Dim rst As ADODB.Recordset
Set ConnexionDbase = New ADODB.Connection
ConnexionDbase.CursorLocation = adUseClient
ConnexionDbase.Provider = "MSDASQL;dsn=mondsn;uid=;pwd="
ConnexionDbase.Open "DataBase=c:\monfichierdbase.dbf"
Set rst = New ADODB.Recordset 'declaration d'un recordset pour lire la table
-----------
Comment exprime t'on le nom de la table à lire en fn du nom du fichier dbf
car aucune des instructions suivantes ne marchent
cs_vortexxx
Messages postés2Date d'inscriptionlundi 11 août 2003StatutMembreDernière intervention13 décembre 2005 13 déc. 2005 à 21:06
Bien que la demande originale concerne une connexion avec un DSN ODBC ,
je m'en suis sorti avec le code qui suit:
-----------------
Dim ConnexionDbase As New ADODB.Connection
Dim rstsource As New ADODB.Recordset
ConnexionDbase.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\monrepertoire ;Extended Properties=DBASE IV"
rstsource.Open "select * from NomDuFichierDbf", ConnexionDbase, 1, 3
'puis la lecture (sequentielle)
Do While Not rstsource.EOF
toto= rstsource!NomDuChampDbase
etc...
---------------
LE POINT IMPORTANT EST EN EFFET DE NE DONNER QUE LE REPERTOIRE DES FICHIERS DBF ET NON PAS LE NOM D UN FICHIER COMME Data Source. LE REPERTOIRE EST CONSIDERE COMME BASE DE DONNEES ET LES FICHIERS DBASE COMME LES TABLES DE CETTE BD.
Merci, et si quelqu'un sait comment on fait avec un DSN, je suis toujours preneur !
cs_CanisLupus
Messages postés3757Date d'inscriptionmardi 23 septembre 2003StatutMembreDernière intervention13 mars 200620 13 déc. 2005 à 22:36
Je ne traite que très rarement des bases dBase. Encore moins par ODBC, mais, promis je regarde ça demain car ce soir je n'ai pas tout ce qu'il faut pour tester.
Mais, je pense que le principe est le même : database = repertoiredbf.
-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?