'ASP 0105 : 80004005' y store procedure

[nancy8120]

tengo el siguiente problema
Request object error 'ASP 0105 : 80004005'
Index out of range

pero no veo el parametro fuera de rango
les muestro el codigo
se q el store procedure no es el problema pero le muestro el codigo tambia
el codigo asp
lsSql=""

if Request.Form("txtCampo")(6)= trim("False") then
lnActivo=0
else
lnActivo=1
end if

lsSql="exec SP_CCuentas 2,'" & Request.Form("txtCampo")(1) & "','" & Request.Form("txtCampo")(2) & "','" & Request.Form("txtCampo")(3) & "','" & Request.Form("txtCampo")(4) & "','" & Request.Form("txtCampo")(5) & "'," & lnActivo & ",'" & trim(Request.Form("hdnIdRegistro")(1))
cmdSRG.CommandText=lsSql
cmdSRG.Execute()



el strore procedure
CREATE procedure dbo.SP_CCuentas (@PnAccion int, @PsIdCuenta Char(7)=NULL,
@PsCconcepto Varchar(70)=NULL, @PsDescCuenta Varchar(500)=NULL,
@PsClasificación Varchar (30)=NULL,@sActivo bit =null,
@PsIdCuentaE Tinyint=NULL ) as

begin
--Actualización
if (@PnAccion = 2)
update CCuentas set sConcepto=@PsCconcepto,sDescCuenta=@PsDescCuenta,s Clasificacion=@PsClasificación,
sActivo=@sActivo
where @PsIdCuentaE=nConsecCuenta


gracias por la ayuda

[Shiryu_Libra]

esta parte me llamo la atencion a mi....

if Request.Form("txtCampo")(6)= trim("False") then
lnActivo=0
else
lnActivo=1
end if

tienes 7 txtcampo???

[nancy8120]

hay era donde estaba el problema
if Request.Form("txtCampo")(5)= trim("False") then
lnActivo=0

else
lnActivo=1
end if

en efecto no se como se comportas los campos en sql cuando son bit
cuando hacia un response .write me debuelve true o false osea un string
entonces el store procedure esperaba un parametro tipo bit
por eso hice este if
pero seria bueno q se aclare
lo del campo sql tipo bit la verdad aunq ya funciona todabia me tiene confusa

[tammander]

Una opción que te evitará dolores de cabeza es esta:

InActivo = Request.Form("txtCampo")(5) <> trim("False")


Un saludo