Problemas con Command

Hola a todos:

Estoy recien comenzando a trabajar con los objetos command y estoy un poco
perdido con el error
que arroja, el siguiente código es el que utilizo

Set conexion=Server.CreateObject("ADODB.Connection")
conexion.ConnectionString=StrConn
conexion.Open

set Pr=Server.createobject("ADODB.parameter")
Set Cmd = Server.CreateObject("ADODB.Command")

dim retorno
Set Pr=Cmd.CreateParameter("@productID",adInteger,adParamInput,4,1)
Cmd.Parameters.Append Pr
' -> Linea del
error

Cmd.CommandText = "departamento"
Cmd.CommandType = 4 'adCmdStoredProc
Cmd.ActiveConnection = StrConn

Cmd.Execute

y me indica el siguiente error, "Argumentos incorrectos, fuera del
intervalo
permitido o en conflicto con otros."

Si alguien me puede orientar o sugerir alguna solucion, muchas gracias

Atte,
Claudio Valdés

Hola a todos:

Estoy recien comenzando a trabajar con los objetos command y estoy un poco
perdido con el error
que arroja, el siguiente código es el que utilizo

Set conexion=Server.CreateObject("ADODB.Connection")
conexion.ConnectionString=StrConn
conexion.Open

set Pr=Server.createobject("ADODB.parameter")
Set Cmd = Server.CreateObject("ADODB.Command")

dim retorno
Set Pr=Cmd.CreateParameter("@productID",adInteger,adParamInput,4,1)
Cmd.Parameters.Append Pr
' -> Linea del
error

Cmd.CommandText = "departamento"
Cmd.CommandType = 4 'adCmdStoredProc
Cmd.ActiveConnection = StrConn

Cmd.Execute

y me indica el siguiente error, "Argumentos incorrectos, fuera del

permitido o en conflicto con otros."

Si alguien me puede orientar o sugerir alguna solucion, muchas gracias

Atte,
Claudio Valdés

Hola Claudio,

Lo que pasa que en ASP no tienes los valores de las variables o constantes
adInteger y adParamInput, deberías pasar los valores correspondientes como
tal, ejemplo para el adParamInput debería ser el 1 y para adInteger el 3


Saludos,
Jhonny Vargas P.
Santiago de Chile


"Claudio Valdés" escribió en el mensaje
news:%
> Hola a todos:
>
> Estoy recien comenzando a trabajar con los objetos command y estoy un

> perdido con el error
> que arroja, el siguiente código es el que utilizo
>
> Set conexion=Server.CreateObject("ADODB.Connection")
> conexion.ConnectionString=StrConn
> conexion.Open
>
> set Pr=Server.createobject("ADODB.parameter")
> Set Cmd = Server.CreateObject("ADODB.Command")
>
> dim retorno
> Set Pr=Cmd.CreateParameter("@productID",adInteger,adParamInput,4,1)
> Cmd.Parameters.Append Pr
> ' -> Linea

> error
>
> Cmd.CommandText = "departamento"
> Cmd.CommandType = 4 'adCmdStoredProc
> Cmd.ActiveConnection = StrConn
>
> Cmd.Execute
>
> y me indica el siguiente error, "Argumentos incorrectos, fuera del
intervalo
> permitido o en conflicto con otros."
>
> Si alguien me puede orientar o sugerir alguna solucion, muchas gracias
>
> Atte,
> Claudio Valdés
>
>
>