?? updataadmin.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="md5.asp"-->
<%
dim admin
admin=session("myuser")
set rs=server.createobject("adodb.recordset")
cmd="select * from admin where username like '"&admin&"'"
rs.open cmd,conn,1,3
if not rs.eof then
dim psw,quanxian
quanxian=request.form("quanxian")
psw=request.form("psw")
rs("key")=quanxian
if psw<>"" then
rs("password")=md5(psw)
end if
rs.update
session("myuser")=""
response.Write("<script>alert('修改成功');window.location.href('Manageadmin.asp')</script>")
else
response.Write("<script>alert('請選擇管理員');window.location.href('Manageadmin.asp')</script>")
response.end
end if
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -