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

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

/ProductList.Asp  ,行 28