Menyatukan beberapa Kueri Hapus atau menggabungkan

0

Saya memiliki 3 kueri penghapusan terpisah yang ingin saya pilih: Bersatu sehingga mereka dapat dijalankan dalam satu klik atau menulis ulang sehingga saya bisa melakukan semua tindakan dalam satu permintaan. Sejauh ini saya belum bisa melakukannya. Pertanyaannya adalah sebagai berikut:

Hapus Duplikat Prospek

DELETE WorkBook.*, Exists (select 1 
       from Leads 
WHERE WorkBook.Email=Leads.Email) AS Expr1
FROM WorkBook
WHERE (Exists (select 1 
       from Leads
WHERE WorkBook.Email=Leads.Email));

Hapus Pelanggan dari Buku Kerja

DELETE WorkBook.*, Exists (select 1 
       from Customers
WHERE WorkBook.Company Like "*" & [Customers].[Company] & "*";) AS Expr1
FROM WorkBook
WHERE (((Exists (select 1 
       from Customers
WHERE WorkBook.Company Like "*" & [Customers].[Company] & "*";))<>False));

Hapus Pesaing dari Buku Kerja

DELETE WorkBook.*, Exists (select 1 
       from Competitors
WHERE WorkBook.Company Like "*" & [Competitors].[Company] & "*";) AS Expr1
FROM WorkBook
WHERE (((Exists (select 1 
       from Competitors
WHERE WorkBook.Company Like "*" & [Competitors].[Company] & "*";))<>False));

Bantuan apa pun tentang cara menggabungkan, membuat penyatuan atau menulis ulang pertanyaan ini menjadi satu item akan sangat dihargai.

T.RiskWatch
sumber

Jawaban:

0

Anda tidak menyatakan versi Microsoft Access apa yang Anda gunakan, tetapi ini harus berlaku.

Sudahkah Anda mempertimbangkan menjalankan tiga kueri ini dalam a transaction? Ini dapat dieksekusi dari subrutin dalam modul VBA, dan subrutin dapat dieksekusi dari tombol pada formulir atau makro.

Anda dapat menemukan informasi tentang pernyataan Transaksi di sini: https://msdn.microsoft.com/en-us/library/bb208950(v=office.12).aspx

STLDev
sumber