📄 usersetting.asp
字号:
<!--#include file="headfiles/Connection.inc"-->
<%
dim userid,oper,username,userpower
userid=request.Form("sltUser")
oper=request.Form("txtOper")
dim rsUser,rsUserPower,rsUserDetail
set rsUser=server.CreateObject("adodb.recordset")
set rsUserDetail=server.CreateObject("adodb.recordset")
set rsUserPower=server.CreateObject("adodb.recordset")
if oper="1" then
username=request.Form("txtName")
userpower=request.Form("sltUserP")
strSql="select * from UserTable where Employee_ID="&cint(userid)
rsUser.open strSql,conn,3,2
rsUser("User_ID")=username
rsUser("User_Power")=cint(userpower)
rsUser.update()
rsUser.close()
end if
strSql="select * from UserTable"
rsUser.open strSql,conn,3,1
strSql="select * from UserPowerTable"
rsUserPower.open strSql,conn,3,1
if userid<>"" then
strSql="select * from UserTable where Employee_ID="&cint(userid)
rsUserDetail.open strSql,conn,3,1
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<link href="headfiles/text.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
function userSelect(){
frmUS.txtOper.value=0;
if(frmUS.sltUser.value!="0"){
frmUS.submit();
}else{
return false;
}
}
function userSave(){
if(frmUS.txtName.value==""){
alert("用户登录名不能为空！");
frmUS.txtName.focus();
return false;
}
frmUS.txtOper.value=1;
frmUS.submit();
}
function userModify(){
frmUS.txtName.disabled=false;
frmUS.sltUserP.disabled=false;
frmUS.btnSave.disabled=false;
}
<%
if userid<>"" then
%>
function modifyPower(){
if("<%=rsUserDetail("User_Power")%>"=="1"){
var msg;
msg=confirm("确定要修改高级管理员的权限吗？","");
if(msg==false){
frmUS.sltUserP.value="<%=rsUserDetail("User_Power")%>";
return false;
}
}
}
<%
end if
%>
</script>
</HEAD>
<BODY background="images/bg.gif">
<table width="600" cellspacing="0" cellpadding="5" border="0">
<form id="frmUS" name="frmUS" action="UserSetting.asp" method="post">
<tr><td bgcolor="#6699ff" height="40" valign="middle" align="center" class="title5">用户设置</td></tr>
<tr><td>
<table width="100%" border="0" cellspacing="0" cellpadding="10">
<tr><td height="50"></td></tr>
<tr><td align="right" width="40%" class="title2">请选择用户登录名：</td><td width="60%">
<select style="width:120px" id="sltUser" name="sltUser" onChange="userSelect();">
<option value="0"></option>
<%
do while not rsUser.eof
%>
<option value="<%=rsUser("Employee_ID")%>"><%=rsUser("User_ID")%></option>
<%
rsUser.movenext
loop
%>
</select>
<script language="JavaScript">
frmUS.sltUser.value="<%=userid%>";
</script>
</td></tr>
<tr><td align="right" class="title2">用户登录名：</td><td><input name="txtName" id="txtName" style="width:120px" disabled value="<%if userid<>"" then response.Write(rsUserDetail("User_ID")) end if%>"></td></tr>
<tr><td align="right" class="title2">用户权限：</td><td><select id="sltUserP" name="sltUserP" disabled style="width:120px" onChange="modifyPower();">
<%
do while not rsUserPower.eof
%>
<option value="<%=rsUserPower("UserPower_ID")%>"><%=rsUserPower("UserPower_Name")%></option>
<%
rsUserPower.movenext
loop
%>
</select></td></tr>
<script language="JavaScript">
frmUS.sltUserP.value=<%if userid<>"" then response.Write(rsUserDetail("User_Power")) else response.Write("3") end if%>;
</script>
<tr><td class="title2"><input id="txtOper" name="txtOper" style="width:20px;visibility:hidden"></td>
<td><input type="button" id="btnModify" name="btnModify" style="width:60px" value="修改" onClick="userModify();">
<input type="button" id="btnSave" name="btnSave" style="width:60px" value="保存" onClick="userSave();" disabled></td></tr>
</table>
</td></tr>
</form></table></BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -