📄 person_searchresult.asp

📁 嘉缘人才6.0精简 ,很好用的人才系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
12 下一页
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/Commoncode.asp"-->
<!--#include file="../inc/CommonFunction.asp"-->
<%link="person_searchresult.asp"%>
<!--#include file="checkpmember.asp" -->
<%
numbers=Trim(Request("numbers"))
If numbers<>"" And IsNumeric(numbers) Then
	numbers=CLng(numbers)
Else
	numberss=Trim(Request("numberss"))
	If numberss<>"" And IsNumeric(numberss) Then
		numbers=CLng(numberss)
	Else
		numbers=20
	end if
End If
taxis=Trim(Request("taxis"))
If taxis<>"" And IsNumeric(taxis) Then
    taxis=CLng(taxis)
Else
	taxiss=Trim(Request("taxiss"))
	If taxiss<>"" And IsNumeric(taxiss) Then
		taxis=CLng(taxiss)
	Else
		taxis=1
	end if
End If
detail=Trim(Request("detail"))
If detail<>"" And IsNumeric(detail) Then
    detail=CLng(detail)
Else
	details=Trim(Request("details"))
	If details<>"" And IsNumeric(details) Then
		detail=CLng(details)
	Else
		detail=2
	end if
End If
usergroup=Replace(trim(request("usergroup")),"'","")
trade=Replace(trim(request("trade")),"'","")
position=Replace(trim(request("position")),"'","")
workadd=Replace(trim(request("workadd")),"'","")
datetime=Replace(trim(request("datetime")),"'","")
profession=Replace(trim(request("profession")),"'","")
edu1=Replace(trim(request("edu1")),"'","")
edu2=Replace(trim(request("edu2")),"'","")
experience1=Replace(trim(request("experience1")),"'","")
experience2=Replace(trim(request("experience2")),"'","")
sex=Replace(trim(request("sex")),"'","")
age=Replace(trim(request("age")),"'","")

keyword=Replace(trim(request("keyword")),"'","")
if keyword="关键字搜索..." then
keyword=""
end if
keywordtype=trim(request("keywordtype"))
if keywordtype<>"" And IsNumeric(keywordtype) then
keywordtype=Clng(keywordtype)
else
keywordtype=3
end if

Dim Action
Dim FoundErr,ErrMsg

Dim page,si
Dim totalPut
MaxPerpage=numbers
strFileName="person_searchresult.asp?numberss="&numbers&"&taxiss="&taxis&"&details="&detail&"&usergroup="&usergroup&"&trade="&trade&"&position="&position&"&workadd="&workadd&"&datetime="&datetime&"&datetimes="&datetimes&"&keyword="&keyword&"&keywordtype="&keywordtype&"&profession="&profession&"&edu1="&edu1&"&edu2="&edu2&"&sex="&sex&"&experience1="&experience1&"&experience2="&experience2&"&age="&age&""
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" />
<title>个人会员中心--<%=SiteTitle%></title>
<script language="javascript">
function confirmX(num)
{
	var ids = document.getElementsByName("checks");
	var check=false;
	var a=0;
	if (ids != null) 
	{
		for (i=0; i<ids.length; i++) 
		{
			var obj = ids(i);
			if (obj.checked==true)
			{
				check=true;
				a+=1
			}
		}
		if(check==false){alert("请选择操作对象！");return false;}
	}
	if(num==1)
	{
		document.simplesearch.action="person_resumesend.asp?action=hire";
		document.simplesearch.target="_blank";
		document.simplesearch.submit();		
	}
	if(num==2)
	{
		document.simplesearch.action="person_resumesend.asp?action=hire";
		document.simplesearch.target="_blank";
		document.simplesearch.submit();		
	}
	if(num==3)
	{
		document.simplesearch.action="person_favoriteadd.asp";
		document.simplesearch.target="_blank";
		document.simplesearch.submit();	
	}
	return false;	
}
function checkAll(box1) {
    var ids = document.getElementsByName("checks");
	if (ids != null) {
		for (i=0; i<ids.length; i++) {
			var obj = ids(i);
			obj.checked = box1.checked;
		}
	}
}
</script>
<link href="../css/<%=MainWebCss%>.css" rel="stylesheet" type="text/css" />
</head>
<body>
<center>
<div id="head">
	<div id="logo"><img src="<%=SiteUrl&InstallDir&LogoUrl%>" alt="欢迎访问<%=SiteName%>" /></div>
	<div id="banner"><%Call Loginshow()%></div>
	<ul><%Call Membernav(1)%></ul>
</div>
<%Call Pmembermenu(5)%>
<div class="maintaba">
<span class="maintit">快速查询</span>
<div class="searchmaincon">
<%Set srcrs= Server.CreateObject(FR_HR_RS)
srcsql="select * from job_c_hire where hire_status=1"
if FR_HR_DataBaseType=1 then
srcsql=srcsql&" and datediff(d,hire_enddate,"&FR_HR_Now&")<=0"
Else
srcsql=srcsql&" and datediff('d',hire_enddate,"&FR_HR_Now&")<=0"
End If
if usergroup<>"" and IsNumeric(usergroup) then
	if usergroup<>3 and usergroup<>0 then
		srcsql=srcsql&" and hire_type="&usergroup
	end if
end if
if trade<>"" and trade<>"0000" then
mystring=split(trade,",")
  for i=0 to ubound(mystring)
  if i=0 then
    srcsql=srcsql&" and (hire_trade  like '%"&trim(mystring(i))&"%'"
   else
    srcsql=srcsql&" or hire_trade like '%"&trim(mystring(i))&"%'"
   end if
  next
   srcsql=srcsql&")"
end if
if position<>"" and position<>"0000" then
mystring=split(position,",")
  for i=0 to ubound(mystring)
  if i=0 then
    srcsql=srcsql&" and (hire_position like '%"&trim(mystring(i))&"%'"
   else
    srcsql=srcsql&" or hire_position like '%"&trim(mystring(i))&"%'"
   end if
  next
   srcsql=srcsql&")"
end if
if workadd<>"" and workadd<>"0000" then
mystring=split(workadd,",")
  for i=0 to ubound(mystring)
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -