me llego el archivo perfecto.. te cuento cual es tu error en las referencias que seleccionas en tu proyecto microsoft dao, microsoft world etcc.. estas tienen niveles de jerarquia o sea que la que se encuentra mas arriba es la mas importante
y vos tenias una referencia a activex data objets 2.5 arriba de la de dao 3.6 asi que aparentemente te tomaba la consulta sql como si fuera de ese control y mandaba el error porque debe ser diferente la sintaxis.
solucionalo de esta forma en la ventana de referencias selecciona dao 3.6 y hace click en la flechita para arriba de prioridad hasta que este abajo de OLE automation.
asi se va a solucinar tu problem.
PD: por mas que lo analize y mire mil veces no entiendo para que es el programita que estas haciendo.... jeje