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

类型不匹配: 'PE_CLng'

/Shop/Search.asp,行 16