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

📄 login_check.asp

📁 这是一个用ASP 做的论坛.值得研究一下. 最有趣的是,发帖支持 HTML 代码 可以回出很好玩的帖.本来想把设计架构也发上来的,它在本子上,懒得抄拉
💻 ASP
字号:
<!--#include file="conn.asp"--> 
<%
   loginname=request("login_name")
   loginpass=request("login_pass")
'安全
session("login_name")=loginname
session("login_pass")=loginpass
sapsT=replace(sapsT,"'","*")
sapsT=replace(sapsT,"""","*")
adminSql="select * from luntan_login where login_name='"&loginname&"' and login_pass='"&loginpass&"'  "
set rsT=conn.execute(adminSql)
if not rsT.eof then
    'session("stu_retset")=rst("stu_num")
	'session("stu_retset")=0
	'response.Cookies("stu_num")=rsT("stu_num")
	'response.redirect "ksliucheng.htm"
	 session("check")=1
response.Write("<p>&nbsp;</p><center><img src='img/succ.gif' border='1'></center>")
	 'response.write(rst(3))
	 'rst(3)=1
	  strsql="update luntan_login set indexname=1 where login_name='"&loginname&"'"   
      set rst=conn.execute(strsql)	  
	  
	response.End()
	conn.close()
	set conn=nothing
end if

'conn.close()
'set conn
session("aaa")="你输入的密码或用户名错误!"
server.Transfer("login.asp")

conn.close()
set conn=nothing
%>

⌨️ 快捷键说明

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