生成html提示Microsoft VBScript 编译器错误 '800a03ea' 错误

这是因为你这个strIf变量不是一个逻辑表达式，比如说是个空字符串，就会出现800A03EA（即语法错误）的提示了。你可以在这条语句之前用msgbox strIf 来看看strIf究竟是什么值。另外，你这条语句完全可以简化为：Execute "ifFlag=(" & strIf & ")"因为ifFlag是个逻辑变量，strIf也是个逻辑表达式，...

中毒 了！文件夹选项→显示所有文件，隐藏类勾全去掉，删除每个分区下的VBS文件和 Autorun.inf，重启。

代码没问题 缺少end class < Class clsThief '___Private value_ '窃取到的内容 Private src_ '要偷的目标URL地址 Private isGet_ '判断是否已经偷过 public property let src(str) '赋值—要偷的目标URL地址/属性 src_=str end property end class > ...

看起来是格式问题 你把里面的空格什么的都检查一下，或者去掉对这个function的调用以及去掉这个function也面的include看看

class的调用不正确，应该是 set sss = new cls_Other 然后可以对sss这个类进行相关的操作。我改了之后可以正常执行。

错误提示很清楚啊。 11行 if user== then 改成 if user = "" then 补充：你这是将 vb跟js 语法混淆并且在混淆的同时还使用错误。在vbscript中 是没有（据我现在所掌握的知识来讲）==这种写法的。而在js中 两个等号（==）的中文翻译就是“等于”；而一个等号（=）的中文翻译就是“赋值”...

等号后面你要赋值啊！比如 Const slideTextStatus="abc"或者 Const slideTextStatus=123