VB和VF的数据库如何链接？

[sunny719]

我现在正在用VB编，但需要用到VF的一个数据库，请问应该怎样链接。

[Sea2001]

设置ODBC

[sunny719]

怎么设置啊

[Richard2001]

dim cn as adodb.connection
set cn=new adodb.connection
cn.Open "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDb=C:\..\xxx.dbf"

[abing]

foxpro没有库表的区别，一个表一个库，一个库一个文件。同一目录下的.dbf文件用odbc的vfp驱动（free table模式），当作是一个库。
Dim cnn1 As New ADODB.Connection
Dim rs As New ADODB.Record
im strCnn$
strCnn = "Provider=MSDASQL.1;Driver=Microsoft Visual Foxpro Driver;DBQ=c:\setup\database\foxpro\12-15接收;SourceType=DBF;"
cnn1.ConnectionString = strCnn
cnn1.Open
'rs.ActiveConnection = cnn1
rs.Open "table10", strCnn, , , adCmdTable

[sunny719]

多谢