急问VB6如何连接dbase数据库，谢谢！

Question

我这么写为什么不行？Dim cn As New ADODB.Connection
Dim connstr As String
connstr = "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;DBQ=e:\aa.DBF;"
cn.Open connstr出现信息：
[Microsoft][ODBC dBase Driver]'(未知的)'不是一个有效的路径。确定路径名称拼写是否正确，以及是否连接到文件存放的服务器。
可是，文件“e:\aa.DBF”的确是一个dbase IV数据库文件，它也可以在EXCEL打开。请问如何正确地打开，万分感谢！

Answer 1

Dim conn as new ADODB.Connection
conn.ConnectionString = "provider=msdasql;DRIVER=Microsoft Visual FoxPro Driver;UID=;Deleted=yes;Null=no;Collate=Machine;BackgroundFetch=no;Exclusive=No;SourceType=DBF;SourceDB=C:\fox\data;"
conn.Open

Answer 2

谢谢，可是你这个是连到foxpro的哦，我要连的是dbase

Answer 3

连接上了，谢谢！可是，我怎么select 呢？select * from aa?不行啊！谢谢！

Answer 4

Set Read = New Recordset
    Read.Open "select * from aa", cn, adOpenDynamic, adLockOptimistic

Answer 5

Set rs = New Recordset
rs.Open "select * from aa", cn, 1,3

Answer 6

是啊，不会错。
先定义一个recordset ,再open.就能实现呀！

Answer 7

strConnect = "Driver={Microsoft Visual FoxPro Driver};" & _
            "SourceType=DBF;SourceDB=c:\test;" & _
            "Exclusive=No;Collate=Machine;NULL=NO;DELETED=NO" & _
            ";BACKGROUNDFETCH=NO" 

Answer 8

查询dbf文件，需要连文件后缀一起写上：
rs.Open "select * from aa.dbf", cn, adOpenDynamic, adLockOptimistic