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

[rainstormmaster]

注意，是用ADO对象

[CityhunterID]

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

[mndsoft]

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 sqlString

or

'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\]"

[rainstormmaster]

好的，谢谢