请教各位达人：这两句 SQL 语句 如何在Access模块中如何执行！

山中老人

SQL语句两条：
DELETE *
FROM Sheet12
WHERE 体检编号 in (select 体检编号 from Sheet11);

INSERT INTO Sheet12
SELECT *
FROM Sheet11;

作为查询，执行没问题。但写入到模块中，无论用DAO还是ADO，执行都出错！

   请老师列出执行代码！ 不胜感谢！！{:soso_e100:}

styhs

1.     With CurrentDb
   
2.         .Execute "DELETE * FROM Sheet12 WHERE 体检编号 in (select 体检编号 from Sheet11)"
   
3.         .Execute "INSERT INTO Sheet12 SELECT * FROM Sheet11"
   
4.     End With
   
5. 
   
6. 
   

复制代码

Renco

不知道提示是什么，可不可以把示例拿上来看看