newlogincheck.asp

来自「包含注册、登陆、留言、创建主题等功能」· ASP 代码 · 共 30 行

ASP
30
字号
<!--#include file=04406shujuku.asp-->
<%
Dim sql
Dim reuser,mypass
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>登录检查页面</title>
</head>
<body>

<% reuser=request("no")
   mypass=request("pass1")
   if(instr(reuser,"'")>0 or instr(mypass,"'")>0) then
   response.redirect"newlogin.asp"
   else
   sql="select* from user where userid='"&reuser&"' and password='"&mypass&"'"
   set rs=conn.execute(sql)
     if rs.eof then
	   response.redirect"renewlogin.asp"
     else
  	   response.cookies("username")=reuser'此处应该可以共用  发表文章是可以检验
	   response.cookies("name")=rs("username")
	   response.cookies("rank")=rs("rank")
	   response.redirect"loginsuccess.asp"
     end if
  end if%>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?