Estoy metienendo en un array la rutas por donde va navegando el usuario y me da un error donde estoy haciendo el redim ??? por que puede ser
Yo creo que no lo esta guardando bien en la session, poque cuando la pinto da error.
Código:
dim tam
ruta_aux = split(request.ServerVariables("url"),"/")
tam = UBOUND(ruta_aux)
if ruta_aux(tam) = "login.asp" then
'response.Write("hola")
'response.end
DIM ArrayRuta(1)
'redim ArrayRuta(1,0)
TotalRutas = 0
ruta = split(request.ServerVariables("URL"),"/")
Tam = UBOUND(ruta)
ArrayRuta(0)= ruta(tam)
response.Write(ArrayRuta(0))
Session("Rutas") = ArrayRuta(0)
Session("TotalRutas") = 1
Else
ArrayRuta = Session("Rutas")
TotalRutas = Session("TotalRutas")
Redim preserve ArrayRuta(TotalRutas)
RUTa = split(request.ServerVariables("HTTP_REFERER"),"/")
Tam = UBOUND(Ruta)
ArrayRuta(TotalRutas)= ruta(tam)
Session("Rutas") = ArrayRuta
Session("TotalRutas") = Session("TotalRutas") +1
for i=0 to TotalArticulos-1
response.Write("<br />"& arrayRuta(i) )
next
End if