📄 hover_job_book.asp
字号:
<!--#include file="toptable.asp"-->
<!--#include file="Inc/articleCHAR.INC"-->
<!-- #include file="Inc/Head.asp" -->
<%
'=================================
' 良精科技企业管理系统
' QQ在线客服:65961930 82993936
' 咨询定购Tel:010-81991660
' asp3721@hotmail.com
' www.liangjing.net
' copyright(c)2001-2008 HoverCms 2007特别版
'=================================
%>
<BR>
<%
const MaxPerPage=5 '分页显示的纪录个数
dim sql
dim rs
dim totalPut
dim CurrentPage
dim TotalPages
dim i,j
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
set rs=server.createobject("adodb.recordset")
sql="select * from Hover_Jobbook order by id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
response.write "<p align='center'>还没有任何应聘信息!</p>"
else
totalPut=rs.recordcount
totalPut=rs.recordcount
if currentpage<1 then
currentpage=1
end if
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
showpages
showContent
showpages
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
showpages
showContent
showpages
else
currentPage=1
showContent
end if
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
sub showContent
dim i
i=0
do while not (rs.eof or err)
%>
<table width="100%" border="0" align="center" cellpadding="3" cellspacing="1" class="tableBorder">
<tr>
<td class="title" height="25" align="center" colspan="4"><strong>应聘管理</strong></td>
</tr>
<tr>
<td class="title2" height="25" colspan="4">选择您需要更改的应聘信息</td>
</tr>
<tr bgcolor="#C0C0C0">
<td width="17%" height="25" bgcolor="#C0C0C0" class="table"> 应聘岗位</td>
<td colspan="2" bgcolor="#C0C0C0" class="table"> <b><%=rs("Jobname")%></b> </td>
<td bgcolor="#C0C0C0" class="table"><a href="Hover_Job_Book_Del.asp?id=<%=rs("ID")%>">删除</a> <a href="Hover_Mail_Send.asp?email=<%=rs("email")%>">发信</a> </td>
</tr>
<%if rs("email")<>"" then%>
<tr bgcolor="#E3E3E3">
<td height="10" class="table"> 姓 名</td>
<td width="34%" bgcolor="#E3E3E3" class="table"> <%=rs("mane")%></td>
<td width="13%" bgcolor="#E3E3E3" class="table">性 别</td>
<td width="36%" bgcolor="#E3E3E3" class="table"><%=rs("sex")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" bgcolor="#E3E3E3" class="table"> 出生日期</td>
<td bgcolor="#E3E3E3" class="table"> <%=rs("birthday")%></td>
<td bgcolor="#E3E3E3" class="table">婚姻状况</td>
<td bgcolor="#E3E3E3" class="table"><%=rs("marry")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">毕业院校</td>
<td colspan="3" bgcolor="#E3E3E3" class="table"> <%=rs("school")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">学 历</td>
<td bgcolor="#E3E3E3" class="table"> <%=rs("studydegree")%></td>
<td bgcolor="#E3E3E3" class="table">专 业</td>
<td bgcolor="#E3E3E3" class="table"><%=rs("specialty")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">毕业时间</td>
<td bgcolor="#E3E3E3" class="table"> <%=rs("gradyear")%></td>
<td bgcolor="#E3E3E3" class="table"><font color="#FF0000">应聘日期</font></td>
<td bgcolor="#E3E3E3" class="table"><font color="#FF0000"><%=rs("time")%></font></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">电 话</td>
<td colspan="3" bgcolor="#E3E3E3" class="table"> <%=rs("telephone")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">E-mail</td>
<td colspan="3" bgcolor="#E3E3E3" class="table"> <a href="Hover_Mail_Send.asp?email=<%=rs("email")%>"><%=rs("email")%></a></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="22" class="table">联系地址</td>
<td colspan="3" bgcolor="#E3E3E3" class="table"> <%=rs("address")%></td>
</tr>
<%end if%>
<tr bgcolor="#C0C0C0">
<td height="25" bgcolor="#C0C0C0" class="table">水平与能力</td>
<td height="25" colspan="3" class="table"> <%=rs("ability")%></td>
</tr>
<tr bgcolor="#E3E3E3">
<td height="25" bgcolor="#C0C0C0" class="table"> 个人简历</td>
<td height="25" colspan="3" bgcolor="#C0C0C0" class="table"> <%=rs("resumes")%></td>
</tr>
<tr>
<td colspan="4" align="center" class="table"><%
i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
end sub
sub showpages()
dim n
if (totalPut mod MaxPerPage)=0 then
n= totalPut \ MaxPerPage
else
n= totalPut \ MaxPerPage + 1
end if
if n=1 then
response.write "留言簿管理界面"
exit sub
end if
dim k
response.write "<p align='left'>>> 留言分页 "
for k=1 to n
if k=currentPage then
response.write "[<b>"+Cstr(k)+"</b>] "
else
response.write "[<b>"+"<a href='Hover_Book.asp?page="+cstr(k)+"'>"+Cstr(k)+"</a></b>] "
end if
next
end sub
%> </td>
</tr>
</table>
<BR>
<%htmlend%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -