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_ClickDoCmd.SetWarnings FalseDoCmd.OpenQuery "Query1", acNormal, acEditDoCmd.OpenQuery "Query2", acNormal, acEditDoCmd.OpenQuery "Query3", acNormal, acEdit
DoCmd.OpenQuery "Query4", acNormal, acEdit
DoCmd.OpenQuery "Query5", acNormal, acEdit
DoCmd.SetWarnings TrueExit_cmdUPDATE_Click:Exit SubErr_cmdUPDATE_Click:MsgBox Err.DescriptionResume Exit_cmdUPDATE_ClickEnd Sub
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) |
SPAM IS PROHIBITED
.
__,_._,___
No comments:
Post a Comment