Ejecutar Stored procedures en ASP

-
¡Importante!: Colabora con el grupo. Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
Estas incluyendo adovbs.inc????? para usar constantes en una página asp
debes incluirlo...

Sashka
MS MVP Access
MCP ASP.Net

"Rafael" escribió en el mensaje
news:141401c4da87$6766b180$
Hola Amigos.
Si por favor me pueden ayudar estoy realizando una pagina
desde donde quiero ejecutar 1 procedimiento almacenado el
codigo es el siguiente:
dim cnx
dim rst1
dim cmd1
set cnx=server.CreateObject("ADODB.Connection")
set rst1=server.CreateObject("ADODB.Recordset")
set cmd1=server.CreateObject("ADODB.Command")
cnx.Open "Provider=SQLOLEDB.1; Data Source=videonet;
Initial Catalog=Contabilidad; Integrated Security=SSPI;"
cmd1.ActiveConnection = cnx
cmd1.CommandType = adCmdStoredProc
cmd1.CommandText = "usp_PagoSocio"

set p1=cmd1.CreateParameter("codsocio", adChar,
adParamInput, 11, "s0000001133")
set p2=cmd1.CreateParameter("año", adChar, adParamInput,
4, "2004")
set p3=cmd1.CreateParameter("saldo", adCurrency,
adParamOutput)
cmd1.Parameters.append p1
cmd1.Parameters.append p2
cmd1.Parameters.append p3

set rst1=cmd1.Execute

y me sale el siguiente error:
Tipo de error:
ADODB.Command (0x800A0BB9)
Argumentos incorrectos, fuera del intervalo permitido o
en conflicto con otros.
/formularios/socio1.asp, línea 21

Y la linea 21 es esta: cmd1.CommandType = adCmdStoredProc

y lo raro es que lo probado desde visual basic y funciona
bien.
no se cual es el problema si por favor me pueden ayudar.
Gracias de antemano.