Microsoft VBScript 运行时错误 错误 '800a0009'

下标越界: '[number: -1]'

/shiwu.asp,行 4