⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 newlogincheck.asp

📁 包含注册、登陆、留言、创建主题等功能
💻 ASP
字号:
<!--#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 + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -