📄 admin_changepass.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="../include/md5.asp"-->
<%
'On Error Resume next
admintop()
Dim admin_flag
admin_flag=",1,"
if session("admin_name")="" or instr(","&session("flag")&",",admin_flag)=0 then
adminflag()
else
Select Case Request("action")
Case "updat" : update()
Case "del" : Del()
Case "pasword" : pasword()
Case "newpass" : newpass()
Case "add" : addadmin()
Case "edit" : userinfo()
Case "savenew" : savenew()
Case "log" : Log()
Case Else
userlist()
End Select
end if
sub userlist()
%>
<table width="98%" border="0" cellspacing="1" cellpadding="0" vspace="0" hspace="0" bgcolor="#183789" align="center">
<tr>
<td>
<table border="0" cellspacing="1" cellpadding="4" bgcolor="#FFFFFF" align="center" width="100%">
<tr>
<td height="27" class="classtop" align="center" colspan="5">绠$悊鍛樼
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -