a，b表具有相同结构
删除a表 中 站号 年份 月份 同时与b表相同的记录

或解决下面问题
合并b表到a表中 如果 a表 站号 年份 月份 同时与b表相同的记录
用b表代替

请给出查询语句

你至少到有一个东东来代表二个表相同的唯一标准。
比如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

谢谢
我表格
每个记录是否相同
需要 站号 年份 月份 三个字段才能确定的
逐个记录写进去
当表比较大时需要花很多时间
更希望有几个查询语句就能搞定

一般情况下,循环比一条语句来得快.

另外：
我的两个个表需要
站号 年份 月份 3个字段同时相同
才能说这两个记录相同
请问需要写出判断

那就and下去就是了啊

再来问题：
如果a表和b表有相同记录
删除a表里面的内容
判断记录是否相同的条件:
如果站号,年份,月份同时相同；那么两个记录相同

我的表没有给主键

晕，试了二次好象不对，
这个删除用一句的我还没试过
哈哈

[此贴子已经被作者于2007-1-22 16:23:22编辑过]

sql="select * form b表"
Set rs2 = CreateObject("ADODB.Recordset")
rs2.Open sql, gconnect, 1, 1
for n=1 to rs2.recordcount
sql="delete form a表 where id="& rs2("id") '你把这一句的条件改一下就是了。
gconnect.Execute (sql)
next

delete from A表 where 站号 IN (select 站号 from A表,B表 where A.站号=B.站号 AND A.年份=B.年份 AND A.月份=B.月份)

或者
delete from A表 where 站号 IN (select 站号，年份, 月份 from A表 INTERSECT select 站号，年份, 月份 from B表)

[此贴子已经被作者于2007-1-22 17:30:17编辑过]