⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 pmember_searchlist.asp

📁 嘉缘人才6.0精简 ,很好用的人才系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
%>
<%Sub MainInfo()%> 
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
  <tr>
    <th height=25 colspan="11" class="tableHeaderText">个人会员列表</th>
  </tr>
<form name="form2" action="pmember_searchlist.asp" method="post">		
		<tr class="tableHeaderText" height=25> 
          <td width="13%" align="center"><font color="ff6600"><b class="style1">会员登录名</b></font></td>
		  <td width="10%" align="center"><font color="ff6600"><b class="style1">姓名</b></font></td>
          <td align="center"><font color="ff6600"><b class="style1">照片</b></font></td>
          <td align="center"><font color="ff6600"><b class="style1">会员类型</b></font></td>
          <td align="center"><font color="ff6600"><b class="style1">最近访问日期</b></font></td>
          <td width="17%" align="center"><font color="ff6600"><b class="style1">激活数/总数</b></font></td>
		  <td width="6%" align="center"><font color="ff6600"><b class="style1">状态</b></font></td>
          <td width="8%" align="center"><b class="style1">精英推荐</b></td>
          <td width="5%" align="center"><span class="bodytitle">
            <input name="checkSelect" type="checkbox" class="checkbox" onClick="javascript: checkAll(this)" value="checkbox">
          </span></td>
        </tr>
<%do while not rs.eof%>
        <tr> 
          <td align="center"><a href="#" onClick="window.open ('../User/Member_info.asp?id=<%=rs("Member_id")%>','newwindow','height=500,width=550,top=0,left=0,toolbar=no,menubar=no,scrollbars=yes, resizable=no,location=no, status=no') "><%=rs("Member_login")%></a></td>
		  <td align="center"><a href="#" onClick="window.open ('pmember_info.asp?id=<%=rs("Member_id")%>','newwindow','height=500,width=550,top=0,left=0,toolbar=no,menubar=no,scrollbars=yes, resizable=no,location=no, status=no') "><%=rs("Member_name")%></a></td>
          <td width="9%" align="center"><%
		  if rs("Member_logo")&""<>"" or not isnull(rs("Member_logo")) then %>
		  	<img src="../images/haveimg.gif" alt="个人照片:&lt;br&gt;&lt;img src=<%=sUploadDir&rs("Member_logo")%> border=1 width=100 height=140&gt;" width="12" height="12" border="0" >
          <%		  	
				if rs("Member_logoflag")=1 then
					if rs("Member_logostatus")=0 then	  
						response.write "<font color='#666666'>已屏蔽</font>"
					else
						response.write "正常"
					end if
				else
					response.Write "<font color='#666666'>未审核</font>"
				end if
			else
			response.write "未上传"
		   end if%></td>
          <td width="16%" align="center"><a href="#" title="点击可进入设置<%=rs("member_name")%>会员类型及会员服务时间。" onClick="if (confirm('确实要修改用户类型吗?')) window.open ('pmember_usertypemodi.asp?id=<%=rs("member_id")%>','newwindow','height=260,width=550,top=0,left=0,toolbar=no,menubar=no,scrollbars=no, resizable=no,location=no, status=no') ">
		  <%if rs("Member_groupid")<>0 or rs("Member_groupid")<>"" then
		  set rst=conn.execute("select * from job_Group where Group_membertype=1 and Group_id="&rs("Member_groupid")&"")
			  if not rst.eof then
			  Response.Write rst("Group_name")
			  else
			  Response.Write("未归类")
			  end if
		end if
		  if cint(rs("member_typeid"))<>5 and rs("member_enddate")<date() then
		  	response.Write "(<font color=red>已过期</font>)"
			end if
		  %>
		  </a></td>
          <td width="16%" align="center"><%=rs("member_logindate")%></td>
          <td width="17%" align="center">
	      <%
			set rst=server.createobject("ADODB.Recordset")
            sql="select count(*) as resumenum from job_p_resume where resume_pmember='"&rs("member_login")&"'"
            rst.open sql,conn,1,1
			 resumenum=rst("resumenum")
			rst.close
			sql="select count(*) as resumeactivate from job_p_resume where resume_pmember='"&rs("member_login")&"' and (resume_cnstatus=1)"
            rst.open sql,conn,1,1
			 resumeactivate=rst("resumeactivate")
			rst.close
			set rst=nothing
			if resumenum<>0 then
			response.write "<a href='#' onclick=""window.open ('pmember_activeresume.asp?pmember="&rs("member_login")&"','win_point','height=150,width=550,top=150,left=200,toolbar=no,menubar=no,scrollbars=no, resizable=no,location=no, status=no');""><strong><font color=red>"&resumeactivate&"</font></strong></a>"
			else
			Response.Write"<strong><font color=red>"&resumeactivate&"</font></strong>"
			end if
			Response.Write"/"&resumenum&""
		   %>          </td>
		  <td width="6%" align="center"><%
		  if rs("member_flag")=1 then
		  	response.Write "正常"
		  else
		  	response.Write "<font color='#999999'>未审核</font>"
		  end if		  
		  %></td>
          <td width="8%" align="center">
		  <%if rs("member_command")=1 then%><font color="#0000FF">精英</font><%else%>普通<%end if%></td>
          <td align="center"><input name="member" type="checkbox" class="checkbox" value="<%=rs("member_id")%>"></td>
        </tr>
       <%
		i=i+1
		if i>=MaxPerPage then exit do
		rs.movenext
		loop
  %>
  	<input type="hidden" name="keyword" value="<%=keyword%>"> 
	<input type="hidden" name="segment" value="<%=segment%>">
	<input type="hidden" name="currentpage" value="<%=ipage%>">
   <tr >
    <td height="25" colspan="12" align="right" aligh="right">
      <input name="button" type="button" class="inputs" onClick="confirmX(1);" value="审   核"> 
      <input name="button" type="button" class="inputs" onClick="confirmX(2);" value="撤销审核">
      <input name="button" type="button" class="inputs" onClick="confirmX(6);" value="照片审核">
      <input name="button" type="button" class="inputs" onClick="confirmX(7);" value="撤销照片审核">
      <input name="button" type="button" class="inputs" onClick="confirmX(3);" value="精英推荐">
	  <input name="button" type="button" class="inputs" onClick="confirmX(4);" value="撤销精英">
	  <input name="button" type="button" class="inputs" onClick="confirmX(5);" value="删   除">    </td>
  </tr>
  
  <tr >
    <td height="25" colspan="12" aligh="right"><%If totalput>0 Then
	Call Showpage(strFileName,totalput,MaxPerPage,false,true,"个人才")
End If%></td>
  </tr></form>
</table>
<%end sub%>
<!--#include file="../inc/copy.asp" -->
</body>
</html>
<script language="javascript">
function confirmX(num)
{
	var ids = document.getElementsByName("member");
	var check=false;
	if (ids != null) {
		
		for (i=0; i<ids.length; i++) 
		{
			var obj = ids(i);
			if (obj.checked==true)
			{
				check=true;
				
			}
		}
		if(check==false){alert("请选择操作对象!");return false;}
	}
	if(num==1)
	{
		if(confirm("你确定要审核你所选择的个人账号吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=adui";
			document.form2.submit();		
		}
	}
	if(num==2)
	{
		if(confirm("你确定要撤销审核你所选择的个人账号吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=unadui";
			document.form2.submit();		
		}
	}
	if(num==3)
	{
		if(confirm("你确定要推荐此人为精英人才吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=command";
			document.form2.submit();		
		}
	}
	if(num==4)
	{
		if(confirm("你确定要撤销此人的精英人才状态吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=uncommand";
			document.form2.submit();		
		}
	}
	if(num==5)
	{
		if(confirm("警告:此操作将会删除包括个人账号在内,以及在此账号的所有相关信息!\n是否继续操作下去?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=del";
			document.form2.submit();		
		}
	}
	if(num==6)
	{
		if(confirm("你确定要审核你所选择的照片吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=picture";
			document.form2.submit();		
		}
	}
	if(num==7)
	{
		if(confirm("你确定要撤销审核你所选择的照片吗?"))	
		{
			document.form2.action="pmember_searchlist.asp?step=unpicture";
			document.form2.submit();		
		}
	}
	return false;	
}
function checkAll(box1) {
    var ids = document.getElementsByName("member");
	if (ids != null) {
		for (i=0; i<ids.length; i++) {
			var obj = ids(i);
			obj.checked = box1.checked;
		}
	}
}
</script>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -