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

📄 repass_check.asp

📁 这是一个用ASP 做的论坛.值得研究一下. 最有趣的是,发帖支持 HTML 代码 可以回出很好玩的帖.本来想把设计架构也发上来的,它在本子上,懒得抄拉
💻 ASP
字号:
<!--#include file="conn.asp"--> 
<%

   loginname=request("login_name")
   loginpass=request("login_pass")
   pass1=request("pass1")
   pass2=request("pass2")
   
'安全
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 pass1<>"" then
if pass1=pass2 then
if not rsT.eof then
    'session("stu_retset")=rst("stu_num")
	'session("stu_retset")=0
	  strsql="update luntan_login set login_pass='"&pass1&"' "   
      set rst=conn.execute(strsql)	    
	'response.End()
	conn.close()
	set conn=nothing
	session("aaa")="修改密码成功!"
	server.Transfer("repass.asp") 
end if
else
session("aaa")="你输入的新密码不同!"
server.Transfer("repass.asp") 
end if
else
session("aaa")="你输入的新密码不能为空!"
server.Transfer("repass.asp")
end if 


 
session("aaa")="你输入的密码或用户名错误!"
server.Transfer("repass.asp")

conn.close()
set conn=nothing
%>

⌨️ 快捷键说明

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