Microsoft VBScript 编译器错误 错误 '800a0400' 缺少语句

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

Microsoft VBScript 编译器错误 错误 '800a03f6'缺少 'End'/iisHelp/mon/500-100，行242 ADODB.Recordset 错误 '800a0bb9'变量或者类型不正确，或者不在可以接受的范围之内，要不就是与其他数据冲突。/truck/chaxun，行112 解析:我发现一个错误：你前面使用的记录集是rs,但最后移动游标却用tuoce....

粗略一看，Dim Recordset1 Dim Recordset1_numRows都重复定义了，其实在vbscript中这种定义可以不用，直接拿来用就可以了，如果你要定义，就得小心最好都在前面定义，不要这定义一块，那定义一块，出问题不好找。

没有，是代码有问题，关键是那个Else if 应该写成Elseif不能写开了。代码改为：if two1="A"AND two2= "B"and two3= "C"and two4="" then grade=grade+25 elseif two4="" and two1="A" or two2="B" or two3="C" then grade=grade+12.5 end if 要是回答的内容有问题，或...

Execute("if "&strIf&" then ifFlag=true else ifFlag=false")一行输出的判断句只能是一个,不能是二个 Execute("if "&strIf&" then ifFlag=true ") '如果ifFlag是一个完整定义的话

vbscrpt中的函数不能放在，while do while if 等语句里面，应放在最外面才行。

有 sub checkuser()就应该有 end sub 来结束这个sub啊 1楼的错了，next就相当于end for，两者是等价的

缺少next, 已经说的很清楚了.你的循环没有指定边界

dim comeurl,curl,adminname else cUrl=trim("http://" & Request.ServerVariables("SERVER_NAME"))你这里凭空出来了else还能不报错啊

oFields.item("http://schemas.microsoft.com/cdo/configuration/sendemailaddress")=sendFrom //sender mail oFields.item("http://schemas.microsoft.com/cdo/configuration/smtpaccountname")=sendFrom //email account vbscript中注释符是"'",而不能用"//"你把"//sender mail"和"//email ...