Error 3078

[Paul]

I am attempting to update a table in one Access database with a table in
another database using a Make Table Query. After successifully creating the
table, I get the error message when the program runs objAcc.CurrentDb.Execute
"BDay - Creation".

CODE:

Dim objAcc As Object
Dim dbs As Database
Dim rstIn As Recordset
Dim lngLastRecID As Long
Dim intFCount As Integer
Dim intRecCount As Integer
Dim intTM As Integer
Dim intTD As Integer
Dim intCt As Integer

' Update the database from the Staff2 database.
DoCmd.SetWarnings False
On Error Resume Next
DoCmd.DeleteObject acTable, "Update"
On Error GoTo 0
Set objAcc = GetObject("O:\Helpdesk &
Security\ADP\~Operations\Databases\Staff2.mdb")
objAcc.CurrentDb.Execute "BDay - Creation"
objAcc.Quit
intCt = 0
Do While intCt < 1000
intCt = intCt + 1
Loop
CurrentDb.Execute "Load Special Data"
DoCmd.SetWarnings True
On Error Resume Next
DoCmd.DeleteObject acTable, "t1"
On Error GoTo 0
DoCmd.Rename "t1", acTable, "Update"

All suggestons welcome.