ACCESS如何使用ADO读取Sql Server数据存放到表里

tmtony

fans版主已告诉你了。
-rs1.AddNew
改为 rs1.add 即可以了

要先理解了代码才能改代码哦

tmtony

-For i = 1 To rs.RecordCount
-rs1.Open "SQL表", CurrentProject.Connection, adopenkeyest, adLockOptimistic
-rs1.AddNew
- rs1("id") = rs(0)
- rs1("name") = rs(1)
- rs1("gender") = rs(2)
-rs1.Update
-rs1.MoveNext
-rs1.Close

写错，应该是rs.movenext 这个才是移动原数据啊

tmtony

roych 发表于 2017-6-17 21:43
没搞懂rs1.MoveNext是什么意思。
我觉得，应该是rs.MoveNext

原来R大师 已经帮你 已经复了。