A family of Microsoft relational database management systems designed for ease of use.
So the problem is with whatever the value of vsql is at the time that code is run.
What you need to do is put the line Debug.Print vsql in front of the line that is throwing the error and run the code again. when it errors, hit Debug and Immediate Window should show the SQL statement. Copy and paste that into a response here so we can see if we can spot the problem.