volvi a programar en visual y vuelvo a pedir su ayuda, me sale el siguiente error:

Código:
login.SQL = "select * from usuario where usuario = '" + login.user + "' and clave = '" + login.clave + "'" login.rst.Open login.SQL, login.cnn, adOpenDynamic, adLockOptimistic login.est = True
muchas gracias por su ayuda
