<%@ Language=VBScript %>
<%
Dim Nick, Password
Nick=Request.Form("Nick")
Password=Request.Form("Password")
Set Conn = Server.CreateObject("ADODB.Connection")
P1="Provider=Microsoft.Jet.OLEDB.4.0;"
Path1="Data Source="&Server.MapPath("Users.mdb")
Conn.Open P1&Path1
sql="Select Password,UserID From Users "&_
"Where Nick='"&Nick&"'"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open sql,Conn,0,1
If rs.BOF AND rs.EOF Then
    Response.Write "<center>登录名不存在,"&_
    "按<a href=JavaScript:history.go(-1)>这里</a>返回。"
    rs.Close
    Set rs=Nothing
    Set Conn=Nothing
    Response.End
End if
If rs("Password")<>Password Then
    Response.Write "<center>密码错误,"&_
    "按<a href=javaScript:history.go(-1)>这里</a>返回。"
    rs.Close
    Set rs=Nothing
    Set Conn=Nothing
    Response.End
End if
Session("Nick")=Nick
Session("UserID")=rs("UserID")
rs.Close
Set rs=Nothing
Set Conn=Nothing
Response.Redirect "Exam.asp"
%>
我输入的帐号，密码都对..还是跳不到Exam.asp的页面啊

vb呀？

debug吧

恩..vb那出错了。为什么不行？