/* */

Wednesday, November 21, 2012

[belajar-access] MENCEGAH PENEKANAN TOMBOL ESC

 

Buat para master, saya ada permasalahan sebagai berikut :
Saya buat satu command yang menjalankan beberapa query secara bersambungan

Private Sub cmdUPDATE_Click()
On Error GoTo Err_cmdUPDATE_Click
     DoCmd.SetWarnings False
    DoCmd.OpenQuery "Query1", acNormal, acEdit
    DoCmd.OpenQuery "Query2", acNormal, acEdit
             DoCmd.OpenQuery "Query3", acNormal, acEdit
    DoCmd.OpenQuery "Query4", acNormal, acEdit
    DoCmd.OpenQuery "Query5", acNormal, acEdit
     DoCmd.SetWarnings True
Exit_cmdUPDATE_Click:
    Exit Sub
Err_cmdUPDATE_Click:
    MsgBox Err.Description
    Resume Exit_cmdUPDATE_Click
End Sub

Secara normal command berjalan lancar, semua query berjalan berurutan dengan baik secara backgrund, dibawah form yang terbuka. Permasalahnnya karena banyaknya data sehingga waktu yang dijalankan cukup lama, sehingga terkadang user tidak sabar menekan tombol Esc hal ini berakibat berhentinya query ditengah-tengah, baru sampai Query4 atau sebelumnya proses sudah terhenti karena penekanan tombol Esc tersebut. 
Menurut para teman2 acceser semua bagaimana cara mengatasi hal ini? Terima kasih responnya

__._,_.___
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)
Recent Activity:
SPAM IS PROHIBITED
.

__,_._,___

No comments:

Post a Comment