注册 登录
编程论坛 ASP.NET技术论坛

帮帮看看那些出错了...谢谢啦

uatoily 发布于 2007-11-30 22:40, 793 次点击
<%@ 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的页面啊
2 回复
#2
冰彩虹2007-12-01 01:40
vb呀?

debug吧
#3
uatoily2007-12-01 22:27
恩..vb那出错了。为什么不行?
1