<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/Commoncode.asp"-->
<!--#include file="../inc/CommonFunction.asp"-->
<%
Dim Action
Dim page,si
Dim totalPut
MaxPerpage=40
strFileName="PhotoResume.asp"
page=Trim(Request("page"))
If page<>"" And IsNumeric(page) Then
	If page<1 Or Len(page)>10 Then
		page=1
	Else
    	page=CLng(page)
	End If
Else
	page=1
End If
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="gb2312" />
<meta content="all" name="robots" />
<meta name="author" content="web@yjys.net,嘉挚科技" />
<meta name="Copyright" content="www.yjys.net,版权所有,请勿转载" />
<title>推荐相片人才-<%=SiteTitle%></title>
<link href="../css/<%=MainWebCss%>" rel="stylesheet" type="text/css">
<link rel="icon" href="/favicon.ico" type="image/x-icon" />
<link rel="shortcut icon" href="/favicon.ico" type="image/x-icon" />
</head>
<body>
<%call head()%>
<div class="container">
	<div class="navdh">您现在的位置：<a href="<%=Siteurl%>"><%=Sitename%></a> &gt;&gt; 推荐相片人才</div>
</div>
<div class="container">
	<div class="maintaba">
		<div class="main_tit"><span></span>推荐相片人才 | <a href="CommondResume.asp">推荐精英人才</a> | <a href="NewResume.asp">最新人才</a> </div>
	<%Response.Write"<div class=main_con>"
	Set srcrs= Server.CreateObject(FR_HR_RS)
	srcsql="Select top 1000 Member_logo,resume_id,resume_sex,resume_birth,resume_edu,resume_position,resume_jobtype,resume_workadd,resume_announcedate,resume_name from JOB_Member,job_p_resume where Member_login=resume_pmember and Member_name is not null and resume_openness=0 and resume_usergroup=0 and Member_logo is not null and member_logo<>'nophoto.gif' and resume_jobtype=1 order by resume_announcedate desc,resume_id desc"
	srcrs.open srcsql,conn,1,1
	if srcrs.eof and srcrs.bof then
	Response.Write"<br><li>对不起，没有相关的数据！</li>"
	else
		totalPut=srcrs.recordcount
		if (page-1)*MaxPerpage>totalput then
			if (totalPut mod MaxPerpage)=0 then
				page= totalPut \ MaxPerpage
			else
				page= totalPut \ MaxPerpage + 1
			end if
		end if
		if page=1 then
			Call MainInfo()
		else
			if (page-1)*MaxPerpage<totalPut then
				srcrs.move  (page-1)*MaxPerpage
				dim bookmark
				bookmark=srcrs.bookmark
				Call MainInfo()
			else
				page=1
				Call MainInfo()
			end if
		end if
	end if
	srcrs.close
	set srcrs=nothing
	%>
<%Sub MainInfo()
	si=0
	Do while not srcrs.eof 	
	if srcrs("Member_logo")<>"" and not Isnull(srcrs("Member_logo")) then
		memberlogo=srcrs("Member_logo")
	else
		memberlogo="nophoto.gif"
	end if
	tithtml="编号为"&srcrs("resume_id")&"的简历基本信息：<br>性别："&Hiresex(srcrs("resume_sex"))&"<br>出生日期："&srcrs("resume_birth")&"<br>学历："&Hireedu(srcrs("resume_edu"))&"<br>意向职位："&Hireposition(srcrs("resume_position"),1)&"<br>意向工作类型："&Hiretype(srcrs("resume_jobtype"))&"<br>意向工作地："&Hireworkadds(srcrs("resume_workadd"))&""	
	Response.Write"<li class=perlistlogo style='text-align:center;margin:5px 7px'><a href="&FormatLink(srcrs("resume_announcedate"),1,1,srcrs("resume_id"),0)&" target=_blank><img src='"&InstallDir&FR_UPFILES_DIR&"/Person/"&memberlogo&"' style='padding:1px; border:1px #F0F0F0 solid;' height=120 width=100 title='"&tithtml&"' /></a><br>"&srcrs("resume_name")&"</li>"
	srcrs.movenext
	si=si+1
	if si>=MaxPerPage then exit do
	loop
	
End Sub
Response.Write("</div><div style='width:99%;text-align:right;display:block;clear:both;margin:6px 10px 0 0;'>")
Call Showpage(strFileName,totalput,MaxPerPage,false,true,"条")
Response.Write("</div>")
%>
</div>
</div>
<div class="container">
	<div class="copyright"><center><%call bottom()%></center></div>	
</div>
</body>
</html>
<%CloseConn%>