比如:adodc1控件连接远程SQL服务器,adodc2控件连接本地SQL数据库adodc1.RecordSource="select * from 表名 where 字段 like '" & check1.Caption & "'" adodc1.Refresh do while adodc1.Recordset.EOF=False adodc2.recordset.addnew adodc2.recordset("字段")=adodc1.recordset("字段") . . adodc2.recordset.update adodc1.recordset.movenext loop 额~~大概差不多是这样吧~~
adodc1.Refresh
do while adodc1.Recordset.EOF=False
adodc2.recordset.addnew
adodc2.recordset("字段")=adodc1.recordset("字段")
.
.
adodc2.recordset.update
adodc1.recordset.movenext
loop
额~~大概差不多是这样吧~~