我用的是ADODC控件,查询后只能得到表结构,有数据却返EOF为真,请高手指教是哪用得不对?
连结字符串如下:
Driver={Microsoft Visual FoxPro Driver};SourceType=DBC;SourceDB=C:\Sunco\data\personnel.dbc;Exclusive=No;RecordSource = "select * from person"
连结字符串如下:
Driver={Microsoft Visual FoxPro Driver};SourceType=DBC;SourceDB=C:\Sunco\data\personnel.dbc;Exclusive=No;RecordSource = "select * from person"
搜索“Visual FoxPro”
Private Sub Form_Load()
Dim mycnn As New ADODB.Connection
Dim myrst As New ADODB.Recordset
mycnn.Open "Provider=MSDASQL.1;Driver=Microsoft Visual Foxpro Driver;SourceDB=E:\mydbf;SourceType=DBF; " 'ConnectString
myrst.Open Trim$("select * from DANCI "), mycnn, adOpenKeyset, adLockOptimistic ' OPEN A TABLE
myrst.MoveFirst
MsgBox myrst.Fields(1).Value 'CHECK WHETHER YOU HAVE DONE RIGHT
End Sub