Microsoft VBScript runtime error '800a0009'

Subscript out of range: 'UBound'

/global/scripts/visual.inc, line 174