rescatar parametro de un procedimiento almacenado

[paef]

aca esta la llamada al procedimiento**************************
With Cmd
.ActiveConnection = cDB
.CommandType = adCmdStoredProc
.CommandText = "Sp_Copiar_sistemas"
While .Parameters.Count > 0
.Parameters.Delete (.Parameters.Count - 1)
Wend
.Parameters.Append Cmd.CreateParameter("equipo", advarchar, adParamInput, 50, cmbEquipo_a_copiar)
.Parameters.Append Cmd.CreateParameter("sistema", advarchar, adParamInput, 50, rDB("id_sistema"))
.Parameters.Append Cmd.CreateParameter("ingresada", adinteger, adParamoutput, , ingresada)
Set rDB2=.execute
}End With
***********************************fin llamada procedimento
**************************************
****aca esta el procedimiento
CREATE procedure Sp_Copiar_sistemas
@id_equipo varchar(50),
@id_sistema varchar(50),
@ingresada int output
as
begin

set @ingresada=0

if not exists (Select * from sistema_en_equipo where id_equipo=@id_equipo and id_sistema=@id_sistema)

begin

Insert into sistema_en_equipo values (@id_equipo,@id_sistema)
set @ingresada=@ingresada+1
end

end
GO
****************************fin procedimiento

ahora necesito rescatar el parametro que devuelve el procedimiento

asi lo estoy haciendo
Parameters(2).value

y aca el error que me da

Error de Microsoft VBScript en tiempo de ejecución error '800a000d'

No coinciden los tipos: 'Parameters'

/copiar.asp, line 88


chao desde ya muchas gracias