dBase IV -> ADO

[R@emdonck]

Hi,

Can somebody tell me how I can make connection to
a "dBase IV" file (*.dbf) using ADO.

R@emdonck

[Clunietp]

Hello

    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    
    Set cn = New ADODB.Connection
    
    'open connection to FOLDER with DBF file
    cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MyDirWithData\;Extended Properties=DBase IV"
    
    Set rs = cn.Execute("Select * from Customers")	'name of DBF file here
    
    MsgBox rs.Fields(1).Value
    
    cn.Close
    
    Set cn = Nothing

Enjoy

[Tonatiuh]

Another tool could be the 'DataDirect Connect ODBC' from Merant Intersolv. This is a set of ODBC drivers to access to almost all databases. You can download an evaluation copy from www.intersolv.com.

Good look!


Edited by Tonatiuh on 02-29-2000 at 12:51 PM