Hola
Eso me pasa por hacer la cosas al vuelo. Espero que ahora si que funcione
Código ASP:
Ver originalif Request.QuerySting("IrA") = "" then
pagina = 1
pag2 = 1
pag3 = 1
else
cual = Request.Querystring("irA")
pagYancla = Split(cual, "-")
Select Case pagYancla(1)
Case 1
pagina = CInt(pagYancla(0))
pag2 = 1
pag3 = 1
Cae 2
pagina = 1
pag2 = CInt(pagYancla(0))
pag3 = 1
Case 3
pagina = 1
pag2 = 1
pag3 = CInt(pagYancla(0))
Case Else
pagina = 1
pag2 = 1
pag3 = 1
End Select
end if
Como ves el problema estaba en que al abrir la página
Request.QuerySting("IrA") no estaba establecido, así que el subindice estaba fuera del intervalo. Por cierto cambia en los vinculos la almohadillas (#) por, por ejemplo, (-). De esta manera no podrá ser interpretado como un ancla
Suerte