Question : Unknown reason for Error

Hi I have some code and am getting the following Error Message (When i remove On err go to.....)

Run Time Error '3078'

"The Microsoft Jet Database cannot find the input table or query ", make sure it exists and name is spelled correctly."

Can anyone advise from the below code why i would get this error?

Thanks
Seamus

Private Sub Command1_Click()

Dim db As Database
Set db = CurrentDb

DoCmd.SetWarnings False

CurrentDb.Execute SQL
mySQL = "ALTER TABLE [Employees who have had plug applied] ADD [Plug or Match] varchar(5)"
db.Execute mySQL
mySQL = "UPDATE [Employees who have had plug applied] SET [Plug or Match] = ""Plug"""

MsgBox "Flag Applied"

DoCmd.SetWarnings True

db.Execute mySQL

Exit Sub

Err_Here:

MsgBox "Flag Already Applied!!"

End Sub

Answer : Unknown reason for Error

Check out the following articles
http://msdn.microsoft.com/en-us/library/ms998579.aspx - Measuring performance
http://msdn.microsoft.com/en-us/library/ms998581.aspx - Testing performance
http://msdn.microsoft.com/en-us/library/ms998583.aspx - Tuning performance

All part of the Improving .NET Application performance and Scalability (http://msdn.microsoft.com/en-us/library/ff649152.aspx)