请教一下，如何用vb读取dbase4生成的dbf文件

Question

本人刚接触vb时间不长，对vb的一些控件和语言不是很精通.现在是遇到了这样一个问题，有一个项目，上位机生产的数据是以dbase4的形式生成的，数据类型是宽型，包括小数点共17位，小数点前后各8位。想自己使用vb编一段程序，读取dbase4生成的dbf文件，有熟悉的大侠能帮帮忙吗，程序应该怎么写啊。

Answer 1

能想到的招都用了啊，引用“microsoft ActiveX data objects 2.8 library;"
添加data控件；connect=dbase4，databasename=“存放文件路径”，Defaulttype=odbc，recordsource=”要读取的dbf文件”，添加text，datasource=DATA1(就是添加的data控件），然后想从datafile读取，结果就是提示“无效的参数量”。再应该怎么搞啊，哪个地方有问题吗

Answer 2

'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 3

Private Sub Command1_Click()
   Data1.Connect = "dBASE IV;"
   Data1.DatabaseName = "c:\"
   Data1.RecordSource = "SELECT * from cc.dbf"
   Data1.Refresh
   For i = 1 To Data1.Recordset.RecordCount
       Print Data1.Recordset.Fields(0), Data1.Recordset.Fields(1)
       Data1.Recordset.MoveNext
   Next
   
End Sub

Answer 4

各位的方法都试了，还是不行啊。我的qq：32233505，高手加我help  help  help  help

Answer 5

你的dbase4文件格式不标准，试试改用dbase3或2