procedimiento almacenado

[HORUSNET]

hola alguien me puede ayudar, he mirado por todos lados y no se como va, me da el siguiente error


ADODB.Command (0x800A0BB9)
Argumentos incorrectos, fuera del intervalo permitido o en conflicto con otros.


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

With cmd
Set cmd.ActiveConnection = conn
cmd.CommandText = "insertar_solicitud "
cmd.CommandType = 4
Set params = cmd.Parameters
End With

params.Append cmd.CreateParameter("@tuentrada1 ", adVarChar, adParamInput, 18)


params.Append cmd.CreateParameter("@tusalida", adInteger, adParamOutput, 4)
variable1="Fsdfsaaa"

params("@tuentrada1") = variable1


cmd.Execute , , adExecuteNoRecords
Respuesta = params("@tusalida")
set cn= nothing
set cmd= nothing

ayuda por favor estoy desesperado

[maestro]

Uff, que nombres mas retorcido buscas para las variables y las declaraciones
Hay un bloque with , que no me cuadra.
¿Que se supone que tiene que hacer ese codigo?.

[HORUSNET]

oye gracias esto ya lo he solucionado, ahora tengo otra duda quiero hacer una dll q sirva para llamar a procedimientos de forma general, la historia es q tengo un procedimiento q devuelve un dato y quiero que el dato enviarlo a la pagina asp.
En fin necesito hacer una funcion para una dll que sea estandar para llamar a procedimientos q devuelven algun dato, y a ver si sabias como se puede reducir el codigo para q no tenga que pasar una sentencia sql

vamos seria algo asi

' Dim strSql
'Dim rs
'valor1 = "fssaaaasdf"
'valor2 = Null
'strSql = "Exec insertar_SOLICITUD " & "'" & valor1 & "'" & " , '" & valor2 & "'"

'cmd.CommandText = strSql
'cmd.Execute (strSql)
'valor = cmd.Parameters("valor2")
'Response.Write (valor)

pero no se como hacerlo me puedes ayudar

gracias