Great thanks, I got my query working but I wanted to add the code to a VBA - but suprise suprise it doesnt work. Can you see what Ive done wrong?
Code:
Private Sub ExitAccess_Click()
Mysql = "INSERT INTO TimesheetTable ( ID, sUser, Activity, Department, Hours, Project, [Task Date], Description ) Values "
Mysql = Mysql & "('" & TimesheetTableTemp.ID & "', '" & TimesheetTableTemp.sUser & "', '" & TimesheetTableTemp.Activity & "', '" & TimesheetTableTemp.Department & "', '" & TimesheetTableTemp.Hours & "', '" & TimesheetTableTemp.Project & "', '" & TimesheetTableTemp.[Task Date] & "', '" & TimesheetTableTemp.Description & "'"
DoCmd.RunSQL "DELETE * FROM TimesheetTableTemp"
DoCmd.SetWarnings False
DoCmd.Quit
End Sub
Thanks