用vb的command按钮连接dbf数据库的代码？？

Question

我是本地连接本地的不要写什么ADODB！还有我是菜鸟中的菜鸟！写代码时最好加说明！谢谢！

Answer 1

需要 dbase+/foxbase/foxpro 的 provider 支持。
然后配置下 connectstring，用 ADODB 就能实现。

Answer 2

是啊,和连access数据库区别不大,主要是连接字符串中Provider部分不同,检查DBF的支持库装上没

Answer 3

'ADO连接DBF数据库
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 4

http://download.csdn.net/source/1498324

Answer 5

连接dbf去用data控件（它是DAO，不是ADO），对于dbf文件的操作ADO并不好用。
窗体添加控件data1Option ExplicitPrivate Sub Command1_Click()
    Data1.Connect = "dBASE III"  '打开数据库的类型
    Data1.DatabaseName = "C:\111222" 'dbf数据库所在文件夹
    Data1.RecordSource = "biblio" 'dbf数据库文件名biblio.dbf取biblio
    Data1.Refresh '打开数据库
    Data1.Recordset.MoveFirst '移动指针到第一条记录
    MsgBox Data1.Recordset.Fields(0) '显示第一条记录第一个字段的值End Sub