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

ASP写的登录界面怎么实现跳转啊??希望各位哥哥姐姐帮帮忙。

qiaoly521 发布于 2010-09-28 16:58, 684 次点击
<%
username=replace(request.form("username"),"'","''")
password=replace(request.form("password"),"'","''")
aRePassWD = Trim(Request("checkcode"))
If aRePassWD = CStr(Session("pSN")) Then
  sql="select * from admin_login where(username='"&username&"' and password='"&md5(password)&"')"
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,1,1
  if not rs.eof then
 session("type_admin")=username
 response.Redirect "AdminIndex.asp"
  else
    session("type_admin")=""
 response.Redirect "Error.asp"
  end if
  rs.close
  conn.close
Else
  response.Redirect "Error.asp"
End If
End If
%>
登录成功后怎么老跳到http://localhost/index.asp?action=login界面就不动了。。我想让它跳到AdminIndex.asp的 怎么办啊  呜呜。。。。
4 回复
#2
hams2010-09-28 18:05
代码不对吧,两个IF,三个END IF
#3
孤独冷雨2010-09-29 09:17
<%
username=replace(request.form("username"),"'","")
password=replace(request.form("password"),"'","")
aRePassWD = Trim(Request("checkcode"))
If aRePassWD = CStr(Session("pSN")) Then
  sql="select * from admin_login where (username='"&username&"' and password='"&md5(password)&"')"
  set rs=server.createobject("adodb.recordset")
  rs.open sql,conn,1,1
      if not rs.eof then
        session("type_admin")=username
        response.Redirect "AdminIndex.asp"
      else
        session("type_admin")=""
        response.Redirect "Error.asp"
      end if
  rs.close
  conn.close
Else
  response.Redirect "Error.asp"
End If
%>
#4
a1900662010-10-02 03:36
response.redirect "AdminIndex.asp"
#5
kangli_kl2010-10-09 15:43
response.write(<script>windiws.location.herf='your url'</script>)
1