El error es claro: "Se esperaba un final de instrucción", tienes una asignación mal hecha.
Cita: pathtomdb =con3.open"Driver={SQL Server};server=nombreservidor;UID=username;PWD=pas sword;DATABASE=nombre de la bd;"
Deberia ser:
Cita: pathtomdb ="Driver={SQL Server};server=nombreservidor;UID=username;PWD=pas sword;DATABASE=nombre de la bd;"
con3.open pathtomdb