📄 admin_user.asp
字号:
<input name="maosinNewsFlag" type="checkbox" id="newsFileAdmin" value="newsFileAdmin" <%if MaoSinReAdminFlag("newsFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="newsFileAdmin">附件管理</label></div>
</td>
</tr>
<tr class="td_bgcolor">
<td height="24" align="right" valign="middle">文章栏目管理:</td>
<td valign="middle">
<div>
<input name="maosinArtFlag" type="checkbox" id="isAddArt" value="isAddArt" <%if MaoSinReAdminFlag("isAddArt",rs(4)) then%> checked="checked"<%end if%>><label for="isAddArt">添加文章</label>
<input name="maosinArtFlag" type="checkbox" id="artAdmin" value="artAdmin" <%if MaoSinReAdminFlag("artAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="artAdmin">文章管理</label>
<input name="maosinArtFlag" type="checkbox" id="artClassAdmin" value="artClassAdmin" <%if MaoSinReAdminFlag("artClassAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="artClassAdmin">分类管理</label>
<input name="maosinArtFlag" type="checkbox" id="artPlAdmin" value="artPlAdmin" <%if MaoSinReAdminFlag("artPlAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="artPlAdmin">评论管理</label>
<input name="maosinArtFlag" type="checkbox" id="artFileAdmin" value="artFileAdmin" <%if MaoSinReAdminFlag("artFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="artFileAdmin">附件管理</label></div></td>
</tr>
<tr class="td_bgcolor">
<td height="25" align="right" valign="middle">下载栏目管理:</td>
<td valign="middle">
<div>
<input name="maosinDownFlag" type="checkbox" id="isAddDown" value="isAddDown" <%if MaoSinReAdminFlag("isAddDown",rs(4)) then%> checked="checked"<%end if%>><label for="isAddDown">添加下载</label>
<input name="maosinDownFlag" type="checkbox" id="downAdmin" value="downAdmin" <%if MaoSinReAdminFlag("downAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="downAdmin">下载管理</label>
<input name="maosinDownFlag" type="checkbox" id="downClassAdmin" value="downClassAdmin" <%if MaoSinReAdminFlag("downClassAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="downClassAdmin">分类管理</label>
<input name="maosinDownFlag" type="checkbox" id="downPlAdmin" value="downPlAdmin" <%if MaoSinReAdminFlag("downPlAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="downPlAdmin">评论管理</label>
<input name="maosinDownFlag" type="checkbox" id="downFileAdmin" value="downFileAdmin" <%if MaoSinReAdminFlag("downFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="downFileAdmin">附件管理</label>
<input name="maosinDownFlag" type="checkbox" id="isDownErrorAdmin" value="isDownErrorAdmin" <%if MaoSinReAdminFlag("isDownErrorAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="isDownErrorAdmin">错误报告</label></div></td>
</tr>
<tr class="td_bgcolor">
<td height="24" align="right" valign="middle">图片栏目管理:</td>
<td valign="middle">
<div>
<input name="maosinPicFlag" type="checkbox" id="isAddPic" value="isAddPic" <%if MaoSinReAdminFlag("isAddPic",rs(4)) then%> checked="checked"<%end if%>><label for="isAddPic">添加图片</label>
<input name="maosinPicFlag" type="checkbox" id="picAdmin" value="picAdmin" <%if MaoSinReAdminFlag("picAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="picAdmin">图片管理</label>
<input name="maosinPicFlag" type="checkbox" id="picClassAdmin" value="picClassAdmin" <%if MaoSinReAdminFlag("picClassAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="picClassAdmin">分类管理</label>
<input name="maosinPicFlag" type="checkbox" id="picPlAdmin" value="picPlAdmin" <%if MaoSinReAdminFlag("picPlAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="picPlAdmin">评论管理</label>
<input name="maosinPicFlag" type="checkbox" id="picFileAdmin" value="picFileAdmin" <%if MaoSinReAdminFlag("picFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="picFileAdmin">附件管理</label> </div></td>
</tr>
<tr class="td_bgcolor">
<td height="24" align="right" valign="middle">免费资源栏目管理:</td>
<td valign="middle">
<div>
<input name="maosinResFlag" type="checkbox" id="isAddRes" value="isAddRes" <%if MaoSinReAdminFlag("isAddRes",rs(4)) then%> checked="checked"<%end if%>><label for="isAddRes">添加免费资源</label>
<input name="maosinResFlag" type="checkbox" id="resAdmin" value="resAdmin" <%if MaoSinReAdminFlag("resAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="resAdmin">免费资源管理</label>
<input name="maosinResFlag" type="checkbox" id="resClassAdmin" value="resClassAdmin" <%if MaoSinReAdminFlag("resClassAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="resClassAdmin">分类管理</label>
<input name="maosinResFlag" type="checkbox" id="resPlAdmin" value="resPlAdmin" <%if MaoSinReAdminFlag("resPlAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="resPlAdmin">评论管理</label>
<input name="maosinResFlag" type="checkbox" id="resFileAdmin" value="resFileAdmin" <%if MaoSinReAdminFlag("resFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="resFileAdmin">附件管理</label> </div></td>
</tr>
<tr class="td_bgcolor">
<td height="25" align="right" valign="middle">数据管理权:</td>
<td valign="middle"><input name="maosinDataFlag" type="checkbox" id="dataBackup" value="dataBackup" <%if MaoSinReAdminFlag("dataBackup",rs(4)) then%> checked="checked"<%end if%>><label for="dataBackup">数据库备份</label>
<input name="maosinDataFlag" type="checkbox" id="dataResume" value="dataResume" <%if MaoSinReAdminFlag("dataResume",rs(4)) then%> checked="checked"<%end if%>><label for="dataResume">数据库恢复</label>
<input name="maosinDataFlag" type="checkbox" id="dataCompress" value="dataCompress" <%if MaoSinReAdminFlag("dataCompress",rs(4)) then%> checked="checked"<%end if%>><label for="dataCompress">数据库压缩</label>
<input name="maosinDataFlag" type="checkbox" id="dataSQL" value="dataSQL" <%if MaoSinReAdminFlag("dataSQL",rs(4)) then%> checked="checked"<%end if%>><label for="dataSQL">数据库操作</label></td>
</tr>
<tr class="td_bgcolor">
<td height="25" align="right" valign="middle">其它管理:</td>
<td valign="middle">
<input name="maosinOtherFlag" type="checkbox" id="pubilcUpFileAdmin" value="pubilcUpFileAdmin" <%if MaoSinReAdminFlag("pubilcUpFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="pubilcUpFileAdmin">栏目公共上传文件管理</label>
<input name="maosinOtherFlag" type="checkbox" id="dataFileAdmin" value="dataFileAdmin" <%if MaoSinReAdminFlag("dataFileAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="dataFileAdmin">数据库文件管理</label>
<input name="maosinOtherFlag" type="checkbox" id="eventLogAdmin" value="eventLogAdmin" <%if MaoSinReAdminFlag("eventLogAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="eventLogAdmin">操作事件日志管理</label>
<input name="maosinOtherFlag" type="checkbox" id="SQLINLogAdmin" value="SQLINLogAdmin" <%if MaoSinReAdminFlag("SQLINLogAdmin",rs(4)) then%> checked="checked"<%end if%>><label for="SQLINLogAdmin">SQL注入日志管理</label></td>
</tr>
</tbody>
<tr align="center" valign="middle">
<td height="25" colspan="2" class="td_titleB">
<input name="saveModifyAdminUser" type="submit" id="saveModifyAdminUser" value="保存修改">
<input type="reset" name="Submit2" value="清空重置"> </td>
</tr>
</form>
</table>
<script language="JavaScript" type="text/javascript">
<%if rs(3)=0 then%> showEditFlag(0,'editFlag') <%end if%>
function showEditFlag(objValue,idname){
var obj=document.getElementById(idname)
var Value=parseInt(objValue)
if (Value==0){
obj.style.display='block';
}else{
obj.style.display='none';
}
}
</script>
<%
End Sub
Sub addUser()
if getPopedom("userAdmin")=false then
popedomMsg
exit sub
end if
%>
<script type="text/javascript">
function mouseXY(){
window.status=window.event.height;
}
</script>
<table width="100%" border="0" cellpadding="4" cellspacing="1" onmousemove="mouseXY()" class="text table_border mainTable">
<tr valign="middle"><td height="26" colspan="2" class="td_titleT">添加新的用户</td></tr>
<tr valign="middle" class="td_topT"> <td height="25" colspan="2">基本资料↓↓</td></tr>
<form action="?action=saveAddUser" method="post" name="addUserForm">
<tr valign="middle" class="td_bgcolor"><td width="180" height="22" align="right">用户名称:</td><td width="*"><input name="userName" type="text" id="userName" class="wenbenkang"> *</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户密码:</td><td><input name="userPass1" type="password" id="userPass1" class="wenbenkang" size="21"> *</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">确认密码:</td><td><input name="userPass2" type="password" id="userPass2" class="wenbenkang" size="21"> *</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">密码问题:</td><td><input name="question" type="text" id="question" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">问题答案:</td><td><input name="answer" type="text" id="answer" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户性别:</td><td><input name="sex" type="radio" value="男" id="sex1" checked><label for="sex1">男性</label> <input type="radio" name="sex" value="女" id="sex2"><label for="sex2">女性</label></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">真实姓名:</td><td><input name="trueName" type="text" id="trueName" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户头像:</td><td><input name="maosinFace" type="text" id="maosinFace" value="0" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_topT"><td height="22" colspan="2">通信资料↓↓</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">QQ号码:</td><td><input name="QQ" type="text" id="QQ" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">电子邮箱:</td><td><input name="email" type="text" id="email" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">个人主页:</td><td><input name="homePage" type="text" id="homePage" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">联系电话:</td><td><input name="telNumber" type="text" id="telNumber" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">联系地址:</td><td><input name="address" type="text" id="address" size="30" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">邮政编码:</td><td><input name="maosinCode" type="text" id="maosinCode" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">个性签名:</td><td><textarea name="maosinInfo" cols="40" rows="5" id="maosinInfo"></textarea> <a href="javascript:edit_size(-5,'maosinInfo')"><img src="images/minus.gif" align="bottom" border="0"></a><a href="javascript:edit_size(5,'maosinInfo')"><img src="images/plus.gif" align="bottom" border="0"></a></td></tr>
<tr valign="middle" class="td_topT"><td height="22" colspan="2">用户属性↓↓</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户财富:</td><td valign="middle"><%=pointName%>:<input name="maosinPoint" type="text" id="maosinPoint" size="10" value="0" class="wenbenkang"> <%=pointUnits%> <%=moneyName%>:<input name="maosinMoney" type="text" id="maosinMoney" size="10" class="wenbenkang" value="0"> <%=moneyUnits%></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户级别:</td><td valign="middle" class="td_bgcolor"><select name="maosinLevel" id="maosinLevel"><option value="1" selected>普通会员</option><option value="2">VIP会员</option><option value="3">管理员</option></select></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户状态:</td><td valign="middle"><input name="maosinStatus" type="radio" value="0" id="status1" checked><label for="status1">正常</label></a> <input type="radio" name="maosinStatus" id="status2" value="1"><label for="status2">锁定</label></td></tr>
<tr valign="middle"><td height="22" colspan="2" align="center" class="td_titleB"> <input type="submit" name="Submit" value="确认添加"><input type="reset" name="Submit2" value="清空重写"> </td></tr>
</form>
</table>
<%End Sub
Sub editUser()
if getPopedom("userAdmin")=false then
popedomMsg
exit sub
end if
dim userID,rs
userID=trim(Request.QueryString("userID"))
if isInteger(userID)=false then
adminShowMsg "参数出错","用户ID参数应为一个数字整型参数"
exit sub
end if
Set rs=conn.execute("select * from ms_user where user_id="&userID)
if rs.eof and rs.bof then
adminShowMsg "没有此用户","找不到此用户信息,可能已经删除或者不存在"
exit sub
end if
%>
<table width="100%" border="0" cellpadding="4" cellspacing="1" class="text table_border mainTable">
<tr valign="middle"><td height="26" colspan="2" class="td_titleT">修改用户[<%=rs("user_name")%>]资料</td></tr>
<tr valign="middle" class="td_topT"> <td height="25" colspan="2">基本资料↓↓</td></tr>
<form action="?action=saveMdfUser" method="post" name="ModifyUserForm">
<tr valign="middle" class="td_bgcolor"><td width="180" height="22" align="right">用户名称:</td><td width="*"><input name="userName" type="text" id="userName" value="<%=rs("user_name")%>" Disabled class="wenbenkang"> <input type="hidden" name="userID" value="<%=rs("user_id")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户密码:</td><td><input name="userPass1" type="password" id="userPass1" class="wenbenkang" size="21"> <font color="#ff4400">*不修改请留空</font></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">确认密码:</td><td><input name="userPass2" type="password" id="userPass2" class="wenbenkang" size="21"> <font color="#ff4400">*不修改请留空</font></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">密码问题:</td><td><input name="question" type="text" id="question" size="30" class="wenbenkang" value="<%=rs("user_question")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">问题答案:</td><td><input name="answer" type="text" id="answer" size="30" class="wenbenkang"> <font color="#ff4400">*不修改请留空</font></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户性别:</td><td><input name="sex" type="radio" value="男" id="sex1" <%if rs("sex")="男" then%> checked<%end if%>><label for="sex1">男性</label> <input type="radio" name="sex" value="女" id="sex2" <%if rs("sex")="女" then%> checked<%end if%>><label for="sex2">女性</label></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">真实姓名:</td><td><input name="trueName" type="text" id="trueName" class="wenbenkang" value="<%=rs("linkman")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户头像:</td><td><input name="maosinFace" type="text" id="maosinFace" class="wenbenkang" value="<%=rs("face")%>"></td></tr>
<tr valign="middle" class="td_topT"><td height="22" colspan="2">通信资料↓↓</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">QQ号码:</td><td><input name="QQ" type="text" id="QQ" class="wenbenkang" value="<%=rs("qq")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">电子邮箱:</td><td><input name="email" type="text" id="email" size="30" class="wenbenkang" value="<%=rs("email")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">个人主页:</td><td><input name="homePage" type="text" id="homePage" size="30" class="wenbenkang" value="<%=rs("homePage")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">联系电话:</td><td><input name="telNumber" type="text" id="telNumber" size="30" class="wenbenkang" value="<%=rs("tel")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">联系地址:</td><td><input name="address" type="text" id="address" size="30" class="wenbenkang" value="<%=rs("address")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">邮政编码:</td><td><input name="maosinCode" type="text" id="maosinCode" class="wenbenkang" value="<%=rs("postalcode")%>"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">个性签名:</td><td><textarea name="maosinInfo" cols="40" rows="5" id="maosinInfo"><%=rs("info")%></textarea> <a href="javascript:edit_size(-5,'maosinInfo')"><img src="images/minus.gif" align="bottom" border="0"></a><a href="javascript:edit_size(5,'maosinInfo')"><img src="images/plus.gif" align="bottom" border="0"></a></td></tr>
<tr valign="middle" class="td_topT"><td height="22" colspan="2">用户属性↓↓</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户财富:</td><td valign="middle"><%=pointName%>:<input name="maosinPoint" type="text" id="maosinPoint" size="10" value="<%=rs("user_point")%>" class="wenbenkang"> <%=pointUnits%> <%=moneyName%>:<input name="maosinMoney" type="text" id="maosinMoney" size="10" class="wenbenkang" value="<%=rs("user_money")%>"> <%=moneyUnits%></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户级别:</td><td valign="middle" class="td_bgcolor"><select name="maosinLevel" id="maosinLevel"><option value="1" <%if rs("user_type")=1 then%>selected<%end if%>>普通会员</option><option value="2" <%if rs("user_type")=2 then%>selected<%end if%>>VIP会员</option><option value="3" <%if rs("user_type")=3 then%>selected<%end if%>>管理员</option></select></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">用户状态:</td><td valign="middle"><input name="maosinStatus" type="radio" value="0" id="status1" <%if rs("islock")=0 then%> checked<%end if%>><label for="status1">正常</label></a> <input type="radio" name="maosinStatus" id="status2" value="1" <%if rs("islock")=1 then%> checked<%end if%>><label for="status2">锁定</label></td></tr>
<tr valign="middle" class="td_topT"><td height="22" colspan="2">登录详细情况↓↓</td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">登陆次数:</td><td><input type="text" name="logonNum" value="<%=rs("logon_num")%>" class="wenbenkang"></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">最后登陆IP:</td><td><input type="text" name="lastIP" value="<%=rs("last_ip")%>" class="wenbenkang" Disabled></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">最后登陆时间:</td><td><input type="text" name="lastTime" value="<%=rs("last_time")%>" class="wenbenkang" Disabled></td></tr>
<tr valign="middle" class="td_bgcolor"><td height="22" align="right">注册时间:</td><td><input type="text" name="regTime" value="<%=rs("reg_date")%>" class="wenbenkang" Disabled></td></tr>
<tr valign="middle"><td height="22" colspan="2" align="center" class="td_titleB"> <input type="submit" name="Submit" value="保佑修改"> </td></tr>
</form>
</table>
<%
rs.close
set rs=nothing
End Sub
Sub modifyPass()
if Request.Form("saveModify")<>"" then
dim oldPass,newPass1,newsPass2
oldPass=trim(Request.Form("oldPass"))
newPass1=trim(Request.Form("newPass1"))
newPass2=trim(Request.Form("newPass2"))
if chkIsOut=false then
showmsg "<font color=""#ff0000"">茂盛系统返回如下信息:</font><br><br>对不起,本站不允许从外部提交数据","系统出错信息"
exit sub
end if
if oldPass="" then
adminShowMsg "出错信息","原始密码不能为空"
exit sub
end if
if newPass1="" then
adminShowMsg "出错信息","新密码不能为空"
exit sub
elseif len(newPass1)>20 then
adminShowMsg "出错信息","新密码长度最多不能大于 20 个字符"
exit sub
elseif newPass1<>newPass2 then
adminShowMsg "出错信息","新密码与确认密码不相同"
exit sub
end if
if conn.execute("select count(adminID) from ms_admin where adminName='"&replace(adminInfo(1),",","")&"' and adminPass='"&md5(oldPass)&"'")(0)=0 then
adminShowMsg "密码出错","您输入的原始密码不正确"
exit sub
end if
dim operateNum
conn.execute "update ms_admin set adminPass='"&md5(newPass1)&"' where adminName='"&replace(adminInfo(1),",","")&"' and adminPass='"&md5(oldPass)&"'",operateNum
if operateNum<>0 then
adminShowMsg "密码修改成功","恭喜恭喜,新密码修改成功,请保存好您的新密码"
else
adminShowMsg "密码修改失败","此次密码修改不成功"
end if
exit sub
end if
%>
<table width="100%" border="0" cellpadding="4" cellspacing="1" class="text table_border mainTable">
<tr valign="middle"><td height="18" colspan="2" class="td_titleT">管理员密码修改</td></tr>
<form action="?action=mdfPass" name="modifPassForm" method="post">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -