Quote Originally Posted by DataMiser View Post
I see you did not answer the questions about have you tried using break, logging or stepping through the code to see where it is actually hanging up.
This should be your first step. Much easier to fix a problem once you know where the problem occurs.

I have used breakpoints and the code is hanging up when executing the command Set rec = db.OpenRecordset("Table1", dbOpenTable)