高分请问如何在 VB中连接、打开.dbf格式文件，最好给段代码，谢谢！！

Question

'引用 ADO
Dim adoConnection As New ADODB.Connection
Dim adoRecordset As New ADODB.Recordset
'Microsoft VFP:
adoConnection.Open "Provider=MSDASQL.1;Driver={Microsoft Visual Foxpro Driver (*.dbf)};SourceType=DBF;DBQ=d:\dbfs\"
adoRecordset.Open "SELECT * FROM Labels.dbf", adoConnection
If Not adoRecordset.EOF Then
   Debug.Print adoRecordset.GetString & ""
End If
adoRecordset.Close
adoConnection.Close
'dBase:
adoConnection.Open "Provider=MSDASQL.1;Driver={Microsoft dBase Driver (*.dbf)};DBQ=d:\dbfs\"
adoRecordset.Open "SELECT * FROM animals.dbf", adoConnection
If Not adoRecordset.EOF Then
   Debug.Print adoRecordset.GetString & ""
End If

Answer 1

我这儿有几个.dbf格式的文件要用，我怎么才能知道是VFP的，还是dBase的？？