PROBLEMA CON ODBCDirect
tengo una conexion a una base de datos acces a traves de ODBCDirect. La aplicacion conecta bien y puedo hacer un recordset de la tabla, pero cuando intento hacer un querydefs me dice que la operacion no es valida para este tipo de objetos.
dim conex as Connection
dim db as Database
dim RS as RecordSet
Dim qd As QueryDef
Set conex = ws.OpenConnection("", , False, "ODBC;DSN=Gestion;UID=" & usuario & ";PWD=" & contraseña & "")
Set db = conex.Database
Set RS = db.OpenRecordset("select * from clientes")
Set qd = db.QueryDefs("SQLclientes")
dim conex as Connection
dim db as Database
dim RS as RecordSet
Dim qd As QueryDef
Set conex = ws.OpenConnection("", , False, "ODBC;DSN=Gestion;UID=" & usuario & ";PWD=" & contraseña & "")
Set db = conex.Database
Set RS = db.OpenRecordset("select * from clientes")
Set qd = db.QueryDefs("SQLclientes")
