Microsoft VBScript runtime error '800a0009'

Subscript out of range: '2'

/direct_Capsula.asp, line 163