Using VB6.0 and need to access FoxP

[07sprint]

Using VB6.0 and need to access FoxPro database. I downloaded vfpoledb. It still doesn't work.

 

[vb5prgrmr]

FAQ222-2244

Simplest way is to create an ODBC DSN and if you do not see Microsoft FoxPro Driver (*.dbv) version 4 or greater then download MDAC 2.6 or 2.7 and 4.7 from MS. Then you can use ADO or DAO ODBC Direct with either a free table or database setup to access your FoxPro database.

Good Luck

 

[07sprint]

I'm MDAC 2.8 and version is 4. What code should I use then.
My database is .dbf.

 

[Swi]

Try this:

' Sets up objects to be used
Set Fso = CreateObject("Scripting.FileSystemObject&quot
Set CONN = New ADODB.Connection
Set RS = New ADODB.Recordset

' Gets the drive and file names
DriveName = IIf(Right$(Fso.GetDriveName(lblInputFile.Caption), 1) = "\", Fso.GetDriveName(lblInputFile.Caption), Fso.GetDriveName(lblInputFile.Caption) & "\&quot
FileName = Fso.GetFileName(lblInputFile.Caption)

' Connects to the database
CONN.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & DriveName & ";" & _
"Extended Properties=dBASE IV;"

' Populates the recordset
RS.Open "Select * From " & DriveName & FileName, CONN, adOpenDynamic, adLockOptimistic, adCmdText

Swi

 

[07sprint]

Error Message:
could not find installable ISAM