从MS Access连接到Foxpro

时间:2017-12-12 06:50:47

标签: ms-access visual-foxpro

我找到了一个OLEDB Foxpro提供程序来连接MS Access中的VFP表。我想将连接切换为DSN较少,所以我所要做的就是让客户安装OLEDB驱动程序而不是设置DSN。我会使用什么连接字符串?

这是我正在使用的代码,但它似乎不起作用。当我运行它时,它会提示我输入ODBC DSN。

    Set db = CurrentDb()
  tablecount = db.TableDefs.Count  '  Number of tables

  ' Loop through all tables, reattaching those with nonzero-length Connect strings.
  oldconnect = ""
  For i = 0 To tablecount - 1
    Set td = db.TableDefs(i)
    If td.Connect <> "" Then       'Connect is empty if local table
       Debug.Print td.Name, td.Connect
       td.Connect = "Provider=vfpoledb;Data Source=C:\Donor6\Data\"
       td.RefreshLink              'refresh link
    End If
  Next i

1 个答案:

答案 0 :(得分:0)

使用连接字符串,如:

Provider = VFPOLEDB;数据源= c:\ YourDataFolder

它只是有效。