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

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

D:\FREEHOST\YDEQUIP\WEB\PRODUCTLIST\../inc/AspCms_CommonFun.asp，行 899