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

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

/wholesale-d/Default.asp,行 15