2013-05-30 25 views
5

DoCmd.RunSQLメソッドを使用して、ユーザーがフォーム内で行う操作に基づいてレコードをINSERTおよびDELETEしています。正常に動作しますが、レコードを削除または追加する前に確認を求められます。どうすれば確認を取り除くことができますか?DoCmd.RunSQLをINSERTとDELETEに使用する場合の確認を削除する

ところで、BeforeDelConfirmイベントはDoCmd.RunSQLでは実行されていないようです。

+0

'Application.DisplayAlerts = False'? –

+1

ありがとうございます。私はApplication.DisplayAlertsはExcel用だと思います。私は同等のものを見つけた。 DoCmd.SetWarnings。彼らが優れたアクセスとアクセスでより一貫していない理由を知らないでください。 – jaromey

答えて

12

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 
+2

ありがとうございます。私はDoCmd.SetWarningsを使用して終了しました。私はあなたにも同様にSQLコマンドを実行できるかどうか分からなかったので、何か新しいことを学びました。 – jaromey

+3

'SetWarnings'をオフにすると情報が抑制されるため、トラブルシューティングが難しくなります。 (MS-AccessとSetWarningsのSOを検索する) 'Database.Execute'は、特に' dbFailOnError'オプションの方が優れています。 +1 – HansUp

関連する問題