?? update_editadmin.asp
字號(hào):
<!--#include file="conn.asp"-->
<!--#include file="chkmanage.asp"-->
<!--#include file="inc/const1.asp"-->
<!--#include file="inc/const2.asp"-->
<!--#include file=md5.asp -->
<%
dim pass1,pass2,passtem
pass=request("pass")
pass1=request("pass1")
pass2=request("pass2")
if pass1="" then
session("wrong")="密碼不能為空"
response.redirect "error.asp"
end if
if pass1<>pass2 then
session("wrong")="兩次輸入的密碼不同"
response.redirect "error.asp"
end if
name=request("name")
pass3=request("pass1")
pass3=MD5(pass3)
pass=MD5(pass)
set rs=server.createobject("adodb.recordset")
sql="select * from [admin] where id=1"
rs.open sql,conn,1,3
if pass<>rs("password") then
rsclose()
connclose()
session("wrong")="舊密碼錯(cuò)誤!"
response.redirect "error.asp"
end if
rs("username")=name
rs("password")=pass3
rs.update
rsclose()
connclose()
%>
<%
Response.Cookies("lunjilyb")("username")=request("name")
Response.Cookies("lunjilyb")("password")=MD5(pass3)
%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>成功修改--<%=lybtitle%>
</title>
<!--#include file="css.asp"-->
</head><body topmargin="1" bgcolor="<%=bodybgcolor%>" alink=<%=alink%> vlink=<%=vlink%> link=<%=link%> >
<!--#include file="menu.asp"--><br><br>
<p align="center">成功修改!</p>
</body>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -