Microsoft VBScript 编译器错误 '800a0400' 的问题

是你做的网页，还是别人做的网页。这是网页程序本身的缺陷（BUG），它使用的编程语言是ASP（VBScript）。要是是你自己做的，那你把showarticle.asp那个文件的第34行附近的代码帖出来。要是是别人做的，那我帮不了你了。相信别人也帮不了你。除非是那个网站的程序开发者或网站维护者，或者是那个服务器...

"&foodID"'&,'"& 改为 "&foodID&"','"& FoodId 后面的 & 放错位置了

没发现此行代码有问题,语法是正确的,检查一下该行前后是否有全角空格吧,全角空格是经常引起这个问题的原因,而且不注意的话很难发现.或者,你贴错了代码,看看你贴出的是否是 inc\class.asp 的第40行代码.

估计你的文件里有这句:const MM_conn_STRING "xxx"表示定义一个字符串常量.再dim MM_conn_STRING 时就重复定义了.

<%do while not rs.eof <a target="_blank" href="<%=rs('id')%>.html"><%=left(rs("title"),20)%></a><br /> <%rs.movenext '移到下一条记录 loop%> 改为 <%do while not rs.eof%> <a target="_blank" href="<%=rs("id")%>.html"><%=left(rs("title"),20)...

strSql ="Select * From student"rs.Open strSql,conn,1,2 改为 strSql ="Select * From student"rs.Open strSql,conn,1,2 注意换行

你看看头文件里面的声明和保存的文件格式是不是一致，比如头文件声明编码为GB2312你就得保存成ANSI格式的，如果头文件声明编码为UTF-8那么你就得保存成UTF-8

exit do 换成break或continue if n=1 then break end if 或 if n=1 then continue end if

bgcolor="#FBFEFF"改成 bgcolor=#FBFEFF

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