<% If Request.Form <> "" Then City=Request.Form("City") County=Request.Form("County") if City="不限" then City="" end if if County="不限" then County="" end if Response.Redirect("Company_Index.asp?Position_b="& Request.Form("Position_b") & "&Position_s=" & Request.Form("Position_s") & "&Qualification=" & Request.Form("Qualification") & "&Province=" & Request.Form("Province") & "&City=" & Request.Form("City") & "&County=" & Request.Form("County") & "&ValidityDate=" & Request.Form("ValidityDate") & "&searchType=" & Request.Form("searchType") & "&keyword=" & Request.Form("keyword")) Response.End() End If Dim strMenu,PageTitle,fenzhanwzz,rs3,rsfz,commmid,CompanyLocation_Province,companyLocation_City,CompanyLocation_County strMenu = "最新职位" Set jyrcw = New Site_Class Jyrcw.SiteConfig() Jyrcw.GotoErrPage() %> <% Dim CurrentPage,FileName Dim TodayDate,strDate,strIsLockId,tdcss Dim strSelComId,strIsshId,guge,gugegg,cnzp,sqll,vip,hygjc,page Set Rs = server.CreateObject("ADODB.recordset") Dim Position_b,Position_s,Qualification,ValidityDate,keyword,searchType Position_b = Jyrcw.chgStr(Trim(Request.QueryString("Position_b"))) Position_s = Jyrcw.chgStr(Trim(Request.QueryString("Position_s"))) Qualification = Jyrcw.chgStr(Trim(Request.QueryString("Qualification"))) Province = Jyrcw.chgStr(Trim(Request.QueryString("Province"))) City = Jyrcw.chgStr(Trim(Request.QueryString("City"))) County = Jyrcw.chgStr(Trim(Request.QueryString("County"))) ValidityDate = Jyrcw.chgStr(Trim(Request.QueryString("ValidityDate"))) keyword = Jyrcw.chgStr(Trim(Request.QueryString("keyword"))) cnzp = Jyrcw.chgStr(Trim(Request.QueryString("cnzp"))) vip = Jyrcw.chgStr(Trim(Request.QueryString("vip"))) hygjc = Jyrcw.chgStr(Trim(Request.QueryString("hygjc"))) page = Jyrcw.chgStr(Trim(Request.QueryString("page"))) searchType=Jyrcw.chgStr(Trim(Request.QueryString("searchType"))) if page="" then page=1 end if if searchType="" or isnull(searchType) then searchType=3 end if If keyword = "请输入关键字" or keyword = "请输入要查询的关键字" Then keyword = "" end if TodayDate = Jyrcw.FormatDate(Date()) Sql = " ValidityDate >= '"& TodayDate &"' " If Position_b <> "" Then Sql = Sql & " and Position_b = '"& Position_b &"' " End If If Position_s <> "" And Position_s <> "不限" Then Sql = Sql & " and (Position_s = '"& Position_s &"' or Position_s = '不限') " End If If Qualification <> "" And Qualification <> "不限" Then Sql = Sql & " and Qualification = '"& Qualification &"' " End If If Province <> "" Then Sql = Sql & " and Province = '"& Province &"' " End If If City <> "" Then Sql = Sql & " and City = '"& City &"' " End If If cnzp <> "" Then Sqll = " and IsYear = '1' " End If If hygjc <> "" Then Sqll = " and CompanyIndustry = '"&hygjc&"' " End If If vip <> "" Then Sqll = "and MemberType>0 and DateDiff("&sjksjxz5&")<=0 " End If If County <> "" And County <> "不限" Then Sql = Sql & " and (County = '"& County &"' or County = '不限') " End If If ValidityDate <> "" Then If Not IsNumeric(ValidityDate) Then ValidityDate = 0 If ValidityDate > 0 Then strDate = Jyrcw.FormatDatee(Now() - ValidityDate,2) Sql = Sql & " and DateDiff("&sjksjxz1&")<="&ValidityDate&"" End If End If strSelComId = selComId(keyword) If keyword <> "" And keyword <> "请输入关键字" Then if searchType=0 then Sql = Sql & " and JobName like '%"& keyword &"%'" end if if searchType=2 or searchType=3 then Sql = Sql & " and (JobName like '%"& keyword &"%' or JobNote like '%"& keyword &"%')" end if End If strIsLockId = IsLockId("Company") strIsshId = IsshId("Company") if searchType=2 then Sql = "select * from RecruitTbl where "& Sql &" and IsPause = '0' or ComId in (Select Comid From [CompanyTbl] Where IsLock='0' and (CompanyName like '%"& keyword &"%' or CompanyContent like '%"& keyword &"%') and IsSh='0' "&sqll&" "&jyrcwzpxz&" ) order by EditDate desc" end if if searchType=0 then Sql = "select * from RecruitTbl where "& Sql &" and IsPause = '0' and ComId in (Select Comid From [CompanyTbl] Where IsLock='0' and IsSh='0' "&sqll&" "&jyrcwzpxz&" ) order by EditDate desc" end if if searchType=1 then Sql = "select * from RecruitTbl where "& Sql &" and IsPause = '0' and ComId in (Select Comid From [CompanyTbl] Where IsLock='0' and CompanyName like '%"& keyword &"%' and IsSh='0' "&sqll&" "&jyrcwzpxz&" ) order by EditDate desc" end if if searchType=3 then Sql = "select * from RecruitTbl where "& Sql &" and IsPause = '0' and ComId in (Select Comid From [CompanyTbl] Where IsLock='0' and IsSh='0' "&sqll&" "&jyrcwzpxz&" ) order by EditDate desc" end if FileName = "Company_Index.asp?hygjc="&hygjc&"&Position_b="& Position_b & "&Position_s=" & Position_s & "&Qualification=" & Qualification & "&Province=" & Province & "&City=" & City & "&County=" & County & "&ValidityDate=" & ValidityDate & "&keyword=" & keyword %> <%if jyrcwfenzhanmbxz=0 or jyrcwfenzhanmbxz=1 or jyrcwfenzhanmbxz=2 then%> <%end if%> <%if jyrcwfenzhanmbxz=3 then%> <%end if%> <%if jyrcwfenzhanmbxz=4 then%> <%end if%>