Discussion :

[Vince]

Bonjour,

Je cherche à me connecter à une table .dbf issue de FoxPro avec Visual Basic.
Peut on s'y connecter par ADO ?
Sinon par quel type de connexion dois-je utiliser ?
Si vous pouviez me donner la syntaxe de connexion...

Merci d'avance de votre aide !

[SilkyRoad]

bonjour

je ne suis pas un specialiste dans ce domaine , mais j'espere que cet exemple pourra t'aider

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
 
'necessite d'activer la reference Microsoft ActiveX Data Objects x.x Library
Dim Cn As ADODB.Connection
Dim Rs As ADODB.Recordset
Dim Chemin As String, Cible As String, laBase As String
 
Chemin = "C:\Documents and Settings\michel\dossier"
laBase = "societes.dbf"
 
Set Cn = New ADODB.Connection
Cn.Open _
"Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=" & _
Chemin & ";"
 
Cible = "SELECT RAIS FROM " & laBase & ";"
Set Rs = New Recordset
Rs.Open Cible, Cn, adOpenKeyset, adLockOptimistic

bonne soiree
michel