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

类型不匹配: 'Checkstr'

/ShowNewsReady.asp，行 15