弱问，如何用代码方式访问本地的DBF啊？越简单越好

[leoxue]

弱问，如何用代码方式访问本地的DBF啊？越简单越好。
就是不要用data控件或者ADO控件，我记得是用
dim dbs as database
dim rs as recordset
set dbs=opendatabase(***)
set rs=dbs.openrecordset(****)
可是调试不出来，哪位大哥帮下忙啦，最好能给些能使用的代码，谢谢啦

[饮水需思源]

Dim Cn As New ADODB.Connection

Cn.ConnectionString = "provider=msdasql;DRIVER=Microsoft Visual FoxPro Driver;UID=;Deleted=yes;Null=no;Collate=Machine;BackgroundFetch=no;Exclusive=No;SourceType=DBF;SourceDB=C:\DBF;"
Cn.Open

[simanh]

Dim Cn As New ADODB.Connection
dim rs as new adodb.recordset
dim str as string

str ="连接字符串"

cn.open str '打开连接
rs.open "select * from Table",cn '打开记录集

rs可以使用了

[rainstormmaster]

ConnectionString :
Provider=MSDASQL.1;Driver=Microsoft Visual Foxpro driver;SourceDB=e:\dbfs;SourceType=DBF;

Provider=MSDASQL.1;Driver=Microsoft Visual Foxpro Driver;DBQ=e:\dbfs;SourceType=DBF;