Pasar parametro

Hola que tal?

Estoy realizando un ejercicio con unos companieros y resulta que
cuando intentamos pasarle un parametro para que ejecute el
procedimiento almacenado genera el siguiente error:

ADODB.Command error '800a0bb9'

Argumentos incorrectos, fuera del intervalo permitido o en conflicto
con otros.

/Consulta.asp, línea 31

El parametro se lo entregamos asi:

cmd.Parameters.Append
cmd.CreateParameter("@Id_Cliente",adVarChar,adParamInput,10,"334787")

Que ocurre que no funciona?


Muchasa gracias.

Juan Suarez.