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") %> </td> <td width="17%" bgcolor="#F0F0F0">应聘日期:</td> <td width="33%" bgcolor="#FFFFFF"><%= zhuan_date(rs("initime")) %> </td> </tr> <tr> <td bgcolor="#F0F0F0">姓 名:</td> <td bgcolor="#FFFFFF"><%= rs("PersonName") %> </td> <td bgcolor="#F0F0F0">性 别:</td> <td bgcolor="#FFFFFF"><%if rs("Sex")=1 then Response.Write("男") else Response.Write("女")%> </td> </tr> <tr> <td bgcolor="#F0F0F0">出生日期:</td> <td bgcolor="#FFFFFF"><%= zhuan_date(rs("Birthday")) %> </td> <td bgcolor="#F0F0F0">婚姻状况:</td> <td bgcolor="#FFFFFF"><%= rs("Marry") %> </td> </tr> <tr> <td bgcolor="#F0F0F0">毕业院校:</td> <td bgcolor="#FFFFFF"><%= rs("School") %> </td> <td bgcolor="#F0F0F0">学 历:</td> <td bgcolor="#FFFFFF"><%= rs("Studydegree") %> </td> </tr> <tr> <td bgcolor="#F0F0F0">毕业时间:</td> <td bgcolor="#FFFFFF"><%= rs("GradYear") %> </td> <td bgcolor="#F0F0F0">E-mail:</td> <td bgcolor="#FFFFFF"><%= rs("email") %> </td> </tr> <tr> <td bgcolor="#F0F0F0">电 话:</td> <td bgcolor="#FFFFFF"><%= rs("tel") %> </td> <td bgcolor="#F0F0F0">即时通讯:</td> <td bgcolor="#FFFFFF"><%= rs("qq") %> </td> </tr> <tr> <td bgcolor="#F0F0F0">住 址:</td> <td bgcolor="#FFFFFF"><%= rs("Address") %> </td> <td bgcolor="#F0F0F0"> </td> <td bgcolor="#FFFFFF"> </td> </tr> <tr> <td bgcolor="#F0F0F0">个人简历:</td> <td colspan="3" bgcolor="#FFFFFF"><%= cnkUBBContent(rs("Resumes")) %> </td> </tr> <tr> <td bgcolor="#F0F0F0">水平与能力:</td> <td colspan="3" bgcolor="#FFFFFF"><%= cnkUBBContent(rs("Ability")) %> </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 %>