你至少到有一个东东来代表二个表相同的唯一标准。
比如ID号是最好的,
sql="select * form b表"
Set rs2 = CreateObject("ADODB.Recordset")
rs2.Open sql, gconnect, 1, 1
for n=1 to rs2.recordcount
sql="select * form a表 where id="& rs2("id") '这里的ID指的是我说的那个唯一标准
Set rs1 = CreateObject("ADODB.Recordset")
rs1.Open sql, gconnect, 1, 3
if rs1.eof then
rs1.addnew
end if
rs2("字段1")=rs2("字段1")
......
rs2.update
next