Running multiple queries in ACCESS 2000

T

TG

I am trying to execute multiple queries using one command button will
this work or should I be doing something else? Here is my code...

Private Sub cmdClearData_Click()
On Error GoTo Err_cmdClearData_Click

Dim stDocName As String

stDocName = "qry_Delete_T1_Clients,
qry_Delete_T9_Clinic_Attendance, qry_Delete_T9_Clients_Massage,
qry_Delete_T1_Students, qry_Delete_T1_STD_Program,
qry_Delete_T9_Clinic_Roster, qry_Delete_T9_Clinic_Sessions,
qry_Delete_T9_Session_Times"
DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_cmdClearData_Click:
Exit Sub

Err_cmdClearData_Click:
MsgBox Err.Description
Resume Exit_cmdClearData_Click

End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top