使用DoCmd.RunSQL进行INSERT和DELETE时删除确认

Question

我正在使用DoCmd.RunSQL方法根据用户在表单中执行的操作来INSERT和DELETE记录.它工作正常,但在删除或附加记录之前要求确认.如何删除确认.

顺便说一下,BeforeDelConfirm事件似乎不能与DoCmd.RunSQL一起运行.

Answer 1

而不是使用DoCmd.RunSql运行SQL并担心警报,您可以使用它.

Dim sql as string
Dim dbs as DAO.Database
set dbs = CurrentDb()

sql = "INSERT INTO table(field1) VALUES(1)"
dbs.Execute sql, dbFailOnError

dbs.close
set dbs = nothing