Microsoft JScript 编译错误 (0x800A03EC)
缺少 '; '
/check.asp, line 11, column 4
set conn=Server.Createobject( "adodb.connection ")adoconn.Open "Driver={Microsoft Access Driver(*.mdb)};DBQ= "&Server.MapPath( "user.mdb ")
---^
代码如下：
<%
set conn=Server.Createobject( "adodb.connection ")adoconn.Open "Driver={Microsoft Access Driver(*.mdb)};DBQ= "&Server.MapPath( "user.mdb ")
username=request.form( "usename ")
password=request.form( "password ")
if username= " " or password= " " then
response.write ( " <script language=javascript> alert '用户名和密码不能为空！ ';history.go(-1); </script> ")
else
set rs=Createobject( "adodb.connection ")
sql= "select * from user "
rs.open.sql conn,1,3
if username=rs( "username ") and password=rs( "password ") then
response.redirct "kq1.asp "
else
response.write ( " <script language=javascript> alert '用户名或密码输入错误，请确认！ ';history.go(-1); </script> ")
%>
<%end if%>
<%end if%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
请大家帮帮忙！
------解决方案--------------------
set conn=Server.Createobject( "adodb.connection ")adoconn.Open "Driver={Microsoft Access Driver(*.mdb)};DBQ= "&Server.MapPath( "user.mdb ")
两条语句要分两行写
set conn=Server.Createobject( "adodb.connection ")
conn.Open "Driver={Microsoft Access Driver(*.mdb)};DBQ= "&Server.MapPath( "user.mdb ")