Question

利用asp完成access数据库中2个表的数据更新

例如 现在一个数据库中有 表一 和表二
表一的字段为 userid 和 password
表二的字段为userid 和password
那么如果现在想把表二中userid不在表一的数据全部插入表一中。
请问 这个该怎么完成？
按照

按照 xmc125888 的写法 我自己改了一下 ，结果确实可向表一中添加数据 但是是一个死循环，一直加添加 并且重复的添加。不知道为什么。

dim conn,connstr,rs1,rs2,sql1,sql2
set conn=server.createobject("adodb.Connection")
connstr="provider=Microsoft.Jet.OLEDB.4.0;data source="&Server.MapPath("data.mdb")&";"
conn.Open connstr

set rs1 = Server.CreateObject("adodb.recordset")
sql1 ="select userid,password from users where userid not in (select userid from user1)"
rs1.open sql1,conn,1,1

set rs2 = Server.CreateObject("adodb.recordset")
sql2="select * from user1 "
rs2.open sql2,conn,1,3

do while not rs1.eof
rs2.addnew
rs2("userid")=rs1("userid")
rs2("password")=rs1("password")
rs2.update
rs2.movenext
loop

Answer 1

<%
sql1="select userid,password from 表二 where userid not in(select userid from 表一) "
set rs1 = server.CreateObject("adodb.recordset")
rs1.open sql1,conn,1,1
sql2="select userid,password fron 表一"
set rs2 = server.CreateObject("adodb.recordset")
rs2.open sql2,conn,1,3
do while not rs1.eof
rs2.addnew
rs2("userid")=rs1("userid")
rs2("password")=rs1("password")
rs2.update
rs2.movenext
loop
%>

Answer 2

sql="insert into 表1 select * from 表2 where userid not in(select userid from 表1) "
conn.execute sql

Answer 3

rs2.movenext

改为

rs1.movenext

粗心了