www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > admin/hr_jianli.asp

    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="opendb.asp" -->
<%
Call CheckAdmin()
'Call CnkAdminRight(1)

Dim ShowLang,Action,jlid
ShowLang=Trim(Request("ShowLang"))
if ShowLang<>"" then ShowLang=Clng(ShowLang)

thispage=request("page_code")
if thispage="" then
	thispage=1
else
	thispage=clng(thispage)
end if
if thispage<1 then thispage=1
PagePara="?ShowLang="&ShowLang&"&ChannelID="&ChannelID

Action=Trim(Request("Action"))
jlid=Trim(Request("jlid"))

Call Head()
%>
<script language="JavaScript">
<!--
function cform(){
 if(!confirm("您确认删除吗? 请注意删除后无法恢复!"))
 return false;
}//-->
</script>
<body>
<div class="cnkbox">
  <% =GetChannelContent(ChannelID,"ChannelName")%>
  管理导航: <a href="?ChannelID=<%= ChannelID %>">文章管理首页</a> | <a href="?ChannelID=<%= ChannelID %>&Action=Add">添加新文章</a></div>
<% 
select case Action
case "del"
	Call del()
case "" 
%>
<div class="cnkbox">
  <div class="title">
    <% =GetChannelContent(ChannelID,"ChannelName")%>
    文章/新闻管理</div>
  <div class="content"> <a href="?ChannelID=<%=ChannelID%>">显示全部</a> | <a href="?ChannelID=<%=ChannelID%>&ShowLang=0">只显示中文</a> | <a href="?ChannelID=<%=ChannelID%>&ShowLang=1">只显示英文</a>
    <% Dim ipage
	  sql="select * from cnk_hr_jianli where ChannelID="&ChannelID
	  if ShowLang<>"" then sql=sql&" and Lang="&ShowLang
	  sql=sql&" order by initime desc"
      rs.open sql,conn,1,1
	  if rs.recordcount=0 then
	  Response.Write "未有内容"
	  Response.end
	  else
		rs.pagesize=20
		if thispage>rs.pagecount then thispage=rs.pagecount
		rs.AbsolutePage = thispage
	%>
    <table width="96%" border="0" cellpadding="3" cellspacing="1">
      <tr bgcolor="#C2E0FE" align="center">
        <td width="15%">申请时间</td>
        <td width="23%">姓名</td>
        <td width="9%">性别</td>
        <td width="19%">出生日期</td>
        <td width="13%">学历</td>
        <td width="14%">申请职位</td>
        <td width="7%" align="center">删除</td>
      </tr>
      <% for ipage=1 to rs.pagesize%>
      <tr bgcolor="#F6F6F6"  onMouseOut="mOut(this,'#F6F6F6');" onMouseOver="mOvr(this,'#EBFFBB');">
        <td><%=rs("initime")%></td>
        <td><a href="?jlid=<%=rs("jlid")%>&ChannelID=<%=ChannelID%>&ShowLang=<%= ShowLang %>&Action=more"><%=rs("PersonName")%></a></td>
        <td><%if rs("Sex")=1 then Response.Write("男") else Response.Write("女")%></td>
        <td><%=rs("Birthday")%></td>
        <td><%=rs("Studydegree")%></td>
        <td><%=rs("JobPosition")%></td>
        <td align="center"><a href="?jlid=<%=rs("jlid")%>&ChannelID=<%=ChannelID%>&ShowLang=<%= ShowLang %>&Action=del"  onclick="return cform()">删除</a></td>
      </tr>
      <%rs.movenext
      if rs.eof then exit for
      next%>
    </table>
    <table width="96%" height="21" border="0" background="images/bg-xg.gif" bgcolor="#EFEFEF">
      <tr>
        <td width="50%"><% = GetPageList(rs.pagecount,thispage,PagePara,0) %></td>
        <td width="50%" align="right"> 共 <strong><%=rs.recordcount%></strong> 条
          <% = GetPage(rs.pagecount,thispage,PagePara,0) %></td>
      </tr>
    </table>
    <% rs.close
		set rs=nothing
		End If %>
  </div>
</div>
<% Case "more" 
rs.open "select * from cnk_hr_jianli where jlid="&jlid,conn,1,1
%>
<div class="cnkbox">
  <div class="title">
    <% =rs("PersonName") %>
    个人简历</div>
  <div class="content">
          <table width="100%" border="0" cellpadding="3" cellspacing="1" bgcolor="#666666">
        <tr>
          <td width="17%" bgcolor="#F0F0F0">应聘职位:</td>
          <td width="33%" bgcolor="#FFFFFF"><%= rs("JobPosition") %>&nbsp;</td>
          <td width="17%" bgcolor="#F0F0F0">应聘日期:</td>
          <td width="33%" bgcolor="#FFFFFF"><%= zhuan_date(rs("initime")) %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">姓 名:</td>
          <td bgcolor="#FFFFFF"><%= rs("PersonName") %>&nbsp;</td>
          <td bgcolor="#F0F0F0">性 别:</td>
          <td bgcolor="#FFFFFF"><%if rs("Sex")=1 then Response.Write("男") else Response.Write("女")%>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">出生日期:</td>
          <td bgcolor="#FFFFFF"><%= zhuan_date(rs("Birthday")) %>&nbsp;</td>
          <td bgcolor="#F0F0F0">婚姻状况:</td>
          <td bgcolor="#FFFFFF"><%= rs("Marry") %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">毕业院校:</td>
          <td bgcolor="#FFFFFF"><%= rs("School") %>&nbsp;</td>
          <td bgcolor="#F0F0F0">学 历:</td>
          <td bgcolor="#FFFFFF"><%= rs("Studydegree") %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">毕业时间:</td>
          <td bgcolor="#FFFFFF"><%= rs("GradYear") %>&nbsp;</td>
          <td bgcolor="#F0F0F0">E-mail:</td>
          <td bgcolor="#FFFFFF"><%= rs("email") %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">电 话:</td>
          <td bgcolor="#FFFFFF"><%= rs("tel") %>&nbsp;</td>
          <td bgcolor="#F0F0F0">即时通讯:</td>
          <td bgcolor="#FFFFFF"><%= rs("qq") %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">住 址:</td>
          <td bgcolor="#FFFFFF"><%= rs("Address") %>&nbsp;</td>
          <td bgcolor="#F0F0F0">&nbsp;</td>
          <td bgcolor="#FFFFFF">&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">个人简历:</td>
          <td colspan="3" bgcolor="#FFFFFF"><%= cnkUBBContent(rs("Resumes")) %>&nbsp;</td>
        </tr>
        <tr>
          <td bgcolor="#F0F0F0">水平与能力:</td>
          <td colspan="3" bgcolor="#FFFFFF"><%= cnkUBBContent(rs("Ability")) %>&nbsp;</td>
        </tr>
      </table>
          <div align="center" style="margin:10px">
		  <input name="提交" type="button" class="button" value="返回" onClick="history.go(-1);" />
		  <input name="打印" type="button" class="button" value="打印" onClick="print();" />
		  </div>
          
  </div>
</div>
<% 
rs.close 
End Select
Call Foot()
Call Closedb()

Sub del()
	conn.execute("delete from cnk_hr_jianli where jlid="&jlid)
	Call alertmsg_url("删除成功","hr_jianli.asp?ChannelID="&ChannelID&"&ShowLang="&ShowLang)
End Sub

%>