Microsoft VBScript 编译器错误 错误 '800a03ea' 。。。求解决啊...

那是系统或程序出了问题，需要使用一些工具来修复。答案已发到窗口右上方“我的消息”里，请使用。挺管用的！完后，效果不好的话，也可考虑系统还原一下（选好还原点）。---有人盗用答案 ，无奈只好用这种方式，请理解。

这个是由于你之前中了暴风一号这个病毒，需要对系统进行修复。百度搜索一下金山U盘专杀这个软件，可以很好的处理这个暴风病毒同时修复病毒造成的破坏，之后根据提示下载金山网盾进行其他病毒的处理，因为一般你还会同时中了其他病毒。

你中毒了，用WINRAR打开那个目录，然后删除AUTORUN.INF，什么不会？那么新建一个文档输入 del f:\autorun.inf /f 然后保存，把扩展名改成.bat然后双击运行就行了

删除d.e.f盘根目录下的autorun.vbs 和autorun.inf(它们可能是隐藏文件,通过文件选项,查看勾选显示所有文件和受系统保护的文件才能看到)删除后重起电脑

改成这样:if birthday="" then errmsg=errms+"<br>"+"<li>生日为必填项，请输入。"founderr=true end if

<%if 条件%> 。。。<%else Response.Write "<table width=700 border=0 height=25><tr><td align=center>暂无文章类别，请<a href=admin/login.asp>登陆</a>后添加！</td></tr></table>"end if%> 估计是。。。之上的地方出问题了，仔细查查，或者把完整的贴上来。

Function getIP()Dim strIPAddr If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then strIPAddr = Request.ServerVariables("REMOTE_ADDR")ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",...

Response.Write "<td><a href='views_show.asp?page="&rs("id")&"'>"&rs("name") & "</a></td>"发现了没有，我的程序两个特色，一是一个程序只要一个<% %>，不要反复嵌套，否则会自己都不知道错在哪里；二是尽量避免在HTML语法里面使用双引号，我上面的代码输出的HTML就是这样的单...

htmlencode是一个自己定义的函数吧.你前面定义了吗?htmlencode函数一般是用来插入数据库中的大段文本保持原有断行缩进格式用的.