Microsoft VBScript 编译器错误 错误 '800a03f6'缺少 'End

dim curhour dim aa 要分两行吧 --- set myobject=wscript.createobject("wscript.network")set myshell=wscript.createobject("wscript.shell")name=trim(myobject.username)dim curhour dim aa if name="XXX" then curhour=hour(time)aa=curhour do curhour=hour(time)loop until curhour>=...

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

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

sqlc = "select * from info where username='" & request.form("username") & "' and password='" & request.form("password") & "'"应该是 request.form 而不是 request.from, 拼写错误, 但不是你给出的语句未结束错误.也许你贴出的代码不是错误信息指出的错误的行....

还是单引号双引号的问题了,你上面这多代码可以精简成下面一行：fout.write""&chr(13)&""&chr(13)另外不知道你的fout是个什么东东，建议检查一下

"&Server.MapPath("CourseSys.mdb")还有下面这两句也是放到一行上就没之前显示的问题了 strSQL="select * from Access where Username='"&strUsername&"'and Password='"&strPassword&"'"但是新的问题又来了，是关于你连接数据库的设定问题，问题如下：错误类型：Microsoft OLE DB Provider for ODBC ...

conndata="driver={SQL Server};server=222.77.178.55;uid=sa;pwd=123456;database=sq_99airen"pwd不用使用引号。如果使用，请用单引号。

Remark="nowRemark", sql语法错误啦,应该是Remark='nowRemark',单引号,注意你的SQL语句都用的是双引号,注意改过来就OK了.

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

删除第三行即可，或者加个单引号；