Microsoft VBScript runtime error '800a0009'

Subscript out of range: 'indiceSubSeccion'

/particulares/componentes/menu.asp, line 1659