admin_administrator.asp

依蓝旅游网站管理系统Elan2008.SP2

}
function CancelAll(){
  for (var i=0;i<document.myform.elements.length;i++){
    var e = document.myform.elements[i];
    if (e.type == 'checkbox' && e.name=='CheckObject' && e.disabled == false){
       e.checked = false;
    }
  }
  getObject("myselect").innerHTML = "[<a href='javascript:CheckedAll()'>全选</a>]";
}
function CheckObject(){
   var frm = getObject("myform");
   for (var i=0;i<frm.elements.length;i++){
    var e = frm.elements[i];
    if (e.type == 'checkbox' && e.name=='CheckObject' && e.disabled == false && e.checked == true ){
       return true
    }
  }
  return false;
}
function Check(frm){
  SubmitOnce(frm);
  return true;
}
function doDelete(){
  var frm = getObject("myform");
  if(!CheckObject()){
     alert("请至少选定1个管理员");
	 return false;
  }
  frm.action = "<%=EL_CurrentScriptName%>?Action=DeleteBatch";
  if(confirm("本次操作将选定管理员删除，以后不可以恢复\n确认要执行选定删除吗？")){
     frm.submit();
	 return;
  }
  return false;
}
</script>
<form name="myform" method="post" onSubmit="return Check(this)">
  <table width="100%" border="0" cellpadding="0" cellspacing="1" class="Border">
    <tr>
      <td width="4%" align="center" nowrap class="top_item"><strong>选择</strong></td>
      <td width="5%" align="center" class="top_item"><strong>ID</strong></td>
      <td width="13%" align="center" class="top_item"><strong>管理员名</strong></td>
      <td width="10%" align="center" class="top_item"><strong>权限</strong></td>
      <td width="8%" align="center" class="top_item"><strong>多人登陆</strong></td>
      <td width="14%" align="center" class="top_item"><strong>最后登陆时间</strong></td>
      <td width="9%" align="center" class="top_item"><strong>最后登陆IP</strong></td>
      <td width="7%" align="center" class="top_item"><strong>登陆次数</strong></td>
      <td width="8%" align="center" class="top_item"><strong>状态</strong></td>
      <td width="22%" align="center" class="top_item"><strong>操作</strong></td>
    </tr>
    <%
  If RowCount = 0 Then
     Response.Write "<tr><td colspan=9 class='td_50' align='center'>没有任何管理员</td></tr>"
  Else
     rsAdmin.Open()
	 For i = 1 To RowCount
  %>
    <tr class="td_25" onMouseOut="this.className='td_25'" onMouseOver="this.className='MouseOver_25'">
      <td align="center"><input name="CheckObject" type="checkbox" id="CheckObject" value="<%=rsAdmin("AdminID")%>" <%If EL_Common.ELClng(EL_Admin.AdminID) = rsAdmin("AdminID") Then Response.Write "disabled"%>></td>
      <td align="center"><%=rsAdmin("AdminID")%></td>
      <td align="center">
	  <%
	    If EL_Common.ELClng(EL_Admin.AdminID) = rsAdmin("AdminID") Then
		   Response.Write "<span class=bluetext>"& EL_Common.ServerHTMLEncode(rsAdmin("AdminName")) &"</span>"
		Else
		   Response.Write EL_Common.ServerHTMLEncode(rsAdmin("AdminName"))
		End If
	  %>
	  </td>
      <td align="center"><%=EL_Admin.ArrLevelName(rsAdmin("Purview"))%></td>
      <td align="center"><%=EL_Common.ShowBoolean(rsAdmin("EnableMultiLogin").value, "<span class=greentext>允许</span>", "<span class=redtext>不允许</span>")%></td>
      <td align="center"><%=rsAdmin("LastLoginTime")%></td>
      <td align="center"><%=rsAdmin("LastLoginIp")%></td>
      <td align="center"><%=rsAdmin("LoginTimes")%></td>
      <td align="center"><%=EL_Common.ShowBoolean(rsAdmin("Actived").value, "<span class='greentext'>正常</span>", "<span class='redtext'>冻结</span>")%></td>
      <td align="center">
	  <a href="<%=EL_CurrentScriptName%>?Action=Modify&AdminID=<%=rsAdmin("AdminID")%>">修改管理员信息</a> | 	  
	  <%
	   If Clng(EL_Admin.AdminID) = rsAdmin("AdminID") Then
	      Response.Write "<span class='graytext'>删除</span> | "
		  If rsAdmin("Actived") Then
	         Response.Write "<span class='graytext'>冻结</span>"
	      Else
	         Response.Write "<span class='graytext'>激活</span>"
	      End If
	   Else
	      Response.Write "<a href="& EL_CurrentScriptName &"?Action=Delete&AdminID="& rsAdmin("AdminID") &" onclick=""return confirm('确认要删除此管理员吗？')"">删除</a> | "
		  If rsAdmin("Actived") Then
	         Response.Write "<a href="& EL_CurrentScriptName &"?Action=SetActived&AdminID="& rsAdmin("AdminID") &">冻结</a>"
	      Else
	         Response.Write "<a href="& EL_CurrentScriptName &"?Action=SetActived&AdminID="& rsAdmin("AdminID") &">激活</a>"
	      End If
	   End If
	  %>	  </td>
    </tr>
    <%
        If i<RowCount Then rsAdmin.MoveNext
	 Next
	 rsAdmin.Close()
  End If
  %>
  </table>
  <table width="100%" border="0" cellspacing="1" cellpadding="0">
  <tr>
    <td width="12%"><span id="myselect">[<a href="javascript:CheckedAll()">全选</a>]</span></td>
    <td width="88%" align="right" nowrap><%Call EL_Common.ShowPage(URLParameters, CurrentPage, PageSizes, PageCounts, TotalRowCount, "管理员", "个")%></td>
  </tr>
</table>
<table width="100%" border="0" cellspacing="1" cellpadding="0">
  <tr>
    <td height="50" align="center" class="td_topline"><input type="button" name="Submit" value="删除选定管理员" onClick="doDelete()"></td>
  </tr>
</table>
</form>
<%
Set rsAdmin = Nothing
Set AdminCmd = Nothing
EL_Common.ShowScriptError()
End Sub

Sub AddAdmin()
On Error Resume Next
Dim i
%>
<script language="javascript">
function CheckAll(s){
  for (var i=0;i<document.myform.elements.length;i++){
    var e = document.myform.elements[i];
    if (e.type == 'checkbox' && e.name==s && e.disabled == false){
       if(window.event.srcElement.checked)
	      e.checked = true;
	   else
	      e.checked = false;
    }
  }
}
function onPurviewChange(value){
   switch(parseInt(value)){
      case 1:
	     getObject("TR_ChannelAdmin").style.display = "none";
		 getObject("TR_ClassAdmin").style.display = "none";
		 getObject("TR_OtherPurview").style.display = "none";
		 ResetPurviewClass();
		 ResetPurviewChannel()
		 break;
	  case 2:
	     getObject("TR_ChannelAdmin").style.display = "";
		 getObject("TR_ClassAdmin").style.display = "none";
		 getObject("TR_OtherPurview").style.display = "";
		 ResetPurviewClass();
		 break;
	  case 3:
	     getObject("TR_ChannelAdmin").style.display = "none";
		 getObject("TR_ClassAdmin").style.display = "";
		 getObject("TR_OtherPurview").style.display = "";
		 ResetPurviewChannel()
		 break;
	  default: break;
   }
   ResetPurviewOthers();
}
function ResetPurviewChannel(){
   var e = getObject("myform").ChannelPurview; 
   for(var i=0;i<e.length;i++){
      e[i].checked = false;
   }
   getObject("CheckAllPurviewChannel").checked = false;
}
function ResetPurviewClass(){
   var sPurviewInChannel = getObject("PurviewInChannel").value;
   if(sPurviewInChannel == "0") return;
   var frm = getObject("myform");
   var arr = sPurviewInChannel.split(",");
   for(var i=1;i<arr.length;i++){
	  frm["ClassPurviewInChannel_"+ arr[i]][1].checked = true;
      ShowClass(arr[i], 0);
   }
   getObject("PurviewInChannel").value = "0";
}
function ResetPurviewOthers(){
   var e = getObject("myform").PurviewOthers;
   for(var i=0;i<e.length;i++){
      e[i].checked = false;
   }
   e[0].checked = true;
   getObject("CheckAllPurviewOthers").checked = false;
}
function ShowClass(id, type){
   if(type == 1){
      getObject("Table_"+ id).style.display = "";
	  PurviewChannel(id, 1);
   }else{
      getObject("Table_"+ id).style.display = "none";
	  var frm = getObject("myform");
	  for(var i=0;i<frm.PurviewClassObject.length;i++){
	     if(frm.PurviewClassObject[i].ChannelID == id.toString()){
		    frm.PurviewClassObject[i].checked = false;
			getObject("TRClass_"+ frm.PurviewClassObject[i].value).className = 'td_25';
			PurviewChannel(id, 0);
		 }
	  }
   }
}
function PurviewChannel(id, type){
   var e = getObject("PurviewInChannel");
   var str = e.value.trim();
   var arr = str.split(",")
   if(type == 1){
      if(str == "0"){
	     str += ","+ id;
	  }else{
	     if(!foundInArray(arr, id.toString())){
	        str += ","+ id;
	     }
	  }
   }else{
      var re =  new RegExp(","+ id);	  
	  str = str.replace(re, "");
   }
   e.value = str;
}
function foundInArray(arr, value){
   for(var i=0;i<arr.length;i++){
      if(arr[i].trim() == value.trim()){
	     return true;
	  }
   }
   return false;
}
function onCheckPurviewClass(id, flag){
   if(flag){
      getObject("TRClass_"+ id).className = 'MouseOver_25';
   }else{
      getObject("TRClass_"+ id).className = 'td_25';
   }
}
function CheckAdminName(){
   var AdminName = getObject("myform").AdminName.value.trim();
   var CheckResult = getObject("CheckResult");
   if(AdminName == ""){
      CheckResult.innerHTML = "<span class=redtext>请输入管理员名</span>";
	  return;
   }
   var url = "<%=EL_CurrentScriptName%>?Action=CheckName&AdminName="+ AdminName;
   createXMLHttp();
   CheckResult.innerHTML = "<span class=bluetext>正在检测…</span>";
   try{
     XMLHttp.open("GET",url,true);
	 XMLHttp.onreadystatechange = CheckState;
	 XMLHttp.setRequestHeader("Content-Type","text/xml;charset=GB2312;");
	 XMLHttp.send(null);	
   }catch(e){
     CheckResult.innerHTML = "<span class=redtext>正在检测失败</span>";
   } 
}
function CheckState(){
   if(XMLHttp.readyState==4){
    if(XMLHttp.status==200){
	   if(XMLHttp.responseText == "0"){	   
	      CheckResult.innerHTML = "<span class=greentext>此管理员名正常，可以使用</span>";
	   }else{
	      CheckResult.innerHTML = "<span class=redtext>此管理员名已经存在，请重新输入</span>";
	   }
	}else{
	  CheckResult.innerHTML = "<span class=redtext>正在检测失败</span>";
	}	
  }
}
function Check(frm){
   if(frm.AdminName.value.trim()==""){
      alert("请输入管理员名");
	  frm.AdminName.focus();
	  return false;
   }
   if(frm.Password.value.trim()==""){
      alert("请输入初始密码");
	  frm.Password.focus();
	  return false;
   }
   
   SubmitOnce(frm);
   return;
}
</script>
<form name="myform" action="Admin_Administrator.asp" method="post" onSubmit="return Check(this)">