Consultas parametrizadas
Hola! Como estas!
1. Como hago para ejecutar una consulta parametrizada y que esta almacenada en una base de datos acces97. ¿Con ado?
ANTES LO HACIA CON SET CON=BASE.QUERYDEF("CONSULTA")
CON("PARAMETROS1")=DATOS
SET RES=CON.OPENRECORDSET()
¿Pero eso es con dao. Mi pregunta es como lo hago con ado?
1. Como hago para ejecutar una consulta parametrizada y que esta almacenada en una base de datos acces97. ¿Con ado?
ANTES LO HACIA CON SET CON=BASE.QUERYDEF("CONSULTA")
CON("PARAMETROS1")=DATOS
SET RES=CON.OPENRECORDSET()
¿Pero eso es con dao. Mi pregunta es como lo hago con ado?
1 Respuesta
Respuesta de denciso
1
Prueba el segmento de código que te anexo,
Lo haces así
dim rs as ADODB. Recordset
dim cmd as ADODB.Command
set rs = new ADODB.recordset
set cmd = new ADODB.command
set cmd.activeconnection = cnn
cmd.commandtext = "Estado"
cmd.CommandType = adCmdStoredProc
set rs = cmd.execute(,Array("Londres"))
set cmd = nothing
Con eso ya tienes el resultado en rs
Lo haces así
dim rs as ADODB. Recordset
dim cmd as ADODB.Command
set rs = new ADODB.recordset
set cmd = new ADODB.command
set cmd.activeconnection = cnn
cmd.commandtext = "Estado"
cmd.CommandType = adCmdStoredProc
set rs = cmd.execute(,Array("Londres"))
set cmd = nothing
Con eso ya tienes el resultado en rs
Hola de nuevo!, perdona pero cmd.execute(, ¿Array("Londres")) la comilla antes del array que significa y si la consulta consta de 2 o más parámetros? Gracias!,
Creo que deje una comita demás, no comilla ('), pero bueno eso de copiar pegay mandar, tiene sus pequeños errores, ahora para definir varios parámetros pues es algo como lo siguiente:
dim rs as ADODB. Recordset
dim cmd as ADODB.Command
set rs = new ADODB.recordset
set cmd = new ADODB.command
set cmd.activeconnection = cnn
cmd.commandtext = "Estado"
cmd.CommandType = adCmdStoredProc
cmd.commandtext = "Ciudad"
cmd.CommandType = adCmdStoredProc
set rs = cmd.execute(Array("Londres","Manchester"))
set cmd = nothing
.
dim rs as ADODB. Recordset
dim cmd as ADODB.Command
set rs = new ADODB.recordset
set cmd = new ADODB.command
set cmd.activeconnection = cnn
cmd.commandtext = "Estado"
cmd.CommandType = adCmdStoredProc
cmd.commandtext = "Ciudad"
cmd.CommandType = adCmdStoredProc
set rs = cmd.execute(Array("Londres","Manchester"))
set cmd = nothing
.
