管理中心——>新闻管理

<% 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 jobbook order by id desc" rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "

还没有任何应聘信息!

" 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

<% set rs=Server.CreateObject("ADODB.RecordSet") sql= "select * from reg where id="&request.QueryString("id")&" " rs.open sql,conn,1,1 %>

发布简历 → 查看<%=rs("name")%>简历 ">删除

姓名：	<%=rs("name")%>
身份证号码：	<%=rs("code")%>
生日：	<%=rs("shengre")%>
性别：	<%=rs("xb")%>
身高：	<%=rs("sg")%>

" width="140" height="140">

体重：	<%=rs("tz")%>	民族：<%=rs("mz")%>
婚姻状况：	<%=rs("hunyin")%>	户口所在地：<%=rs("huold")%>
目前所在地：	<%=rs("hunew")%>	您的最高教育程度：<%=rs("xueli")%>
专业名称：	<%=rs("zhuanyi")%>	毕业院校：<%=rs("yuanxiao")%>
政治面貌：	<%=rs("zhengzhi")%>	毕业日期：<%=rs("biyireqi")%>
现有职称：	<%=rs("zhichen")%>	联系电话：<%=rs("tel")%>
联系邮箱：	<%=rs("web")%>	月薪要求：<%=rs("xinshui")%>
工作地点：	<%=rs("didian")%>	住房要求：<%=rs("fang")%>
工作方式：	<%=rs("gongzuo")%>
受教育培训经历及个人简历：
<%=rs("peixun")%>

<% 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 "

>> 招聘分页 " for k=1 to n if k=currentPage then response.write "["+Cstr(k)+"] " else response.write "["+""+Cstr(k)+"] " end if next end sub %>