Microsoft VBScript 运行时失误 失误 '800a000d'

类型不匹配: 'cint'

/xiaoshou.asp,行 18