Error en Ingreso de Parametros

[bakanzipp]

te envio un ejemplo de como lo hago yo...ojala te sirva:

Código:

  
Set cn = server.createobject("ADODB.Connection") 
Set cmd = server.createobject("ADODB.Command") 

cn.ConnectionString = "tu_conexion"
cn.Open 

With cmd 
Set .ActiveConnection = cn 
    .CommandText = "tu_sp" 
    .CommandType = 4 
Set params = .Parameters 
End With 

params.Append cmd.CreateParameter("@input1", adVarChar, adParamInput, 3)
params.Append cmd.CreateParameter("@input2", adVarChar, adParamInput, 4)  
params.Append cmd.CreateParameter("@salida", adVarChar, adParamOutput, 255)
'					
params("@input1") = input1
params("@input2") = input2
			
cmd.Execute   , , adExecuteNoRecords 
			
StrRespuesta = params("@salida")

este sp tiene de entrada dos datos y uno de salida.

suerte amigo :)