PROBLEMA CON ODBCDirect
Publicado por ramon (67 intervenciones) el 10/01/2003 13:52:02
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")
Valora esta pregunta


0