怎样用ado对象把vfp格式的数据库转为access格式的数据库

Question

注意，是用ADO对象

Answer 1

用 两个 ADO 对像,先从 VFP 中读出数据,然后根据结构生成 SQL 的 insert 语句
再到连接 access 中执行就可以了。当然，还有别的方便的方法，就是对像去对像之间的写法，很简单。

Answer 2

Dim cnn As New ADODB.Connection
  Dim sqlString As String
  cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\Data\Feedb.mdb;" & "Jet OLEDB:Engine Type=4"
  sqlString = "INSERT INTO ZHK SELECT * FROM [dBase III;DATABASE=" & pMndDatePath & "].[" & .Fields!xdm & .Fields!cdm & "]"
  cnn.Execute sqlStringor'adoConnection.Execute "SELECT * INTO CopyOfAnimals FROM animals IN ''[dBASE IV;DATABASE=d:\dbfs\]"
'adoConnection.Execute "INSERT INTO CopyOfAnimals SELECT * FROM animals IN ''[dBASE IV;DATABASE=d:\dbfs\]"