<MM:BeginLock translatorClass="MM_SSI" type="ssi_comment" orig="%3C!--#include file=%22../Include/Class_Conn.asp%22 --%3E" fileRef="../Include/Class_Conn.asp" depFiles="file:///E|/开发中的项目/东北英才网/wwwroot/Include/Class_Conn.asp"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="language" depFiles="" orig="%3C%25@ LANGUAGE = VBScript CodePage = 936%25%3E" ><MM_SCRIPT_LANGUAGE NAME=VBScript><MM:EndLock>
<!--#include file="Class_Safe.asp" -->

<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25
Response.Buffer = True
'On Error Resume Next
Dim Conn,Connstr
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source

'Sqldatabase=%22sq_ahtg_data%22            
'Sql_pass_word=%22%23ah175%23tg186%22   
'Sql_User_ID=%22sq_ahtg_data_f%22      
'Sql_Data_Source=%22222.191.251.10%22

Sqldatabase=%22Db_HopeJob_Data%22            
Sql_pass_word=%22123456%22   
Sql_User_ID=%22sa%22      
Sql_Data_Source=%22127.0.0.1%22 
	
Set Conn = Server.CreateObject(%22ADODB.Connection%22)
ConnStr = %22Provider=SQLOLEDB.1;Password='%22&Sql_pass_word&%22';Persist Security Info=False;User ID='%22&Sql_User_ID&%22';Initial Catalog='%22&Sqldatabase&%22';Data Source='%22&Sql_Data_Source&%22'%22	
Conn.Open Connstr

Function CloseDB
 Conn.close
 Set conn = Nothing
End Function

Function CloseRs
 Rs.Close
 Set Rs = Nothing
End Function

If Err Then
	err.Clear
	Set Conn = Nothing
	Response.Write %22数据库连接出错，请检查连接字串。%22
	Response.End
End If

%25%3E" ><MM_ASPSCRIPT><MM:EndLock><MM:EndLock>
<MM:BeginLock translatorClass="MM_SSI" type="ssi_comment" orig="%3C!--#include file=%22../Include/Class_Main.asp%22 --%3E" fileRef="../Include/Class_Main.asp" depFiles="file:///E|/开发中的项目/东北英才网/wwwroot/Include/Class_Main.asp"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25
'//Session保存期
Session.Timeout = 30
'//网站通用参数
Const Cls_WebName    = %22东北英才网%22
Const Cls_WebUrl     = %22http://www.Hopejob.cn/%22
Const Cls_DoMain     = %22Hopejob.cn%22
Const Cls_MainName   = %22Hopejob%22
Const Cls_WebKey     = %22VR%22
Const Cls_WebJobs    = 15 '//免费企业会员允许发布的职位数
Const Cls_PersonTopNumber = 10 '//设置个人会员的固顶数目
Const sCacheName     = %22Ihost20060515%22
Const Cls_Websub     = %22www%22
'//网站的联系方式
Const Cls_Phone      = %220595-22511119%22
Const Cls_QQ         = %22530794483%22
Const Cls_Msn        = %22info@hopejob.cn%22
Const Cls_Email      = %22info@hopejob.cn%22
Const Cls_Fax        = %220595-22511110%22
Const Cls_Address    = %22福建省东北市泉秀路聚豪特区1601%22
Const Cls_ZipCode    = %22230031%22
Const Cls_Icp        = %22ICP许可证-闽B2-20050001%22

'//网站邮箱参数
Const Cls_Mailname = %22ccie@baisuo.cn%22
Const Cls_Mailpass = %2280298139%22
Const Cls_Mailform = %22ccie@baisuo.cn%22
Const Cls_Mailsmtp = %22mail.baisuo.cn%22

'//发送邮件函数
Sub SendEmail(MailBox,MailBody,MailSubject)
  
  Set Jmail=server.createobject(%22Jmail.Message%22)
  Jmail.Charset = %22gb2312%22
  JMail.ContentType = %22text/html%22
  Jmail.Silent = true
  Jmail.Priority = 3
  Jmail.MailServerUserName = Cls_Mailname  '有效电子邮件帐号
  Jmail.MailServerPassword = Cls_Mailpass  '有效电子邮件密码
  Jmail.From = Cls_Mailform    
  Jmail.FromName = Cls_WebName             '来自
  Jmail.Subject = MailSubject              '邮件标题
  
  Jmail.AddRecipient  %22%22&MailBox&%22%22        '收件人的邮件地址  

  Jmail.Body = MailBody     '邮件内容       
  Jmail.Send(Cls_Mailsmtp)  'smtp服务器地址
  Set Jmail=nothing
End Sub

'//学历的输出
Function Cls_Edus(Edus)
 Dim Edu_Str
 Select Case Edus
  Case 10: Edu_Str = %22小学%22
  Case 20: Edu_Str = %22初中%22
  Case 30: Edu_Str = %22高中%22
  Case 40: Edu_Str = %22中专%22
  Case 50: Edu_Str = %22专科%22
  Case 60: Edu_Str = %22本科%22
  Case 70: Edu_Str = %22硕士%22
  Case 80: Edu_Str = %22博士%22
  Case 90: Edu_Str = %22博士后%22
 End Select
 Cls_Edus = Edu_Str
End Function

'//性别输出
Function Cls_Sex(Sex)
 Dim Sex_Str
 If Sex = True Then
  Sex_Str = %22男%22
 Elseif Sex = False Then
  Sex_Str = %22女%22
 End if
 Cls_Sex = Sex_Str
End Function

'//个人证件类型输出
Function Cls_CodeType(CodeType)
 Dim CodeType_Str
 Select Case CodeType
  Case 0
   CodeType_Str = %22身份证%22
  Case 1
   CodeType_Str = %22护 照%22
  Case 2
   CodeType_Str = %22军官证%22
  Case 3
   CodeType_Str = %22学生证%22
  Case 4
   CodeType_Str = %22其他证件%22
 End Select
 Cls_CodeType = CodeType_Str
End Function

'//婚姻状况输出
Function Cls_Marry(Marry)
 Dim Marry_Str
 Select Case Marry
  Case 0
   Marry_Str = %22保密%22
  Case 1
   Marry_Str = %22未婚%22
  Case 2
   Marry_Str = %22已婚%22
  Case 3
   Marry_Str = %22离异%22
 End Select
 Cls_Marry = Marry_Str
End Function

'//工作年限输出
Function Cls_Works(Works)
 Dim Works_Str
 Select Case Works 
  Case 0: Works_Str = %22一年以内%22
  Case 1: Works_Str = %22一年以上%22
  Case 2: Works_Str = %22二年以上%22
  Case 3: Works_Str = %22三年以上%22
  Case 4: Works_Str = %22四年以上%22
  Case 5: Works_Str = %22五年以上%22
  Case 10: Works_Str = %22十年以上%22
  Case 20: Works_Str = %22二十年以上%22
  Case 30: Works_Str = %22三十年以上%22
  Case 50: Works_Str = %22退休人员%22
 End Select
 Cls_Works = Works_Str
End Function

'//职称输出
Function Cls_JobTitle(JobTitle)
 Dim JobTitle_Str
 Select Case JobTitle 
  Case 1: JobTitle_Str = %22初级职称%22
  Case 2: JobTitle_Str = %22中级职称%22
  Case 3: JobTitle_Str = %22高级职称%22
  Case 4: JobTitle_Str = %22其他%22
 End Select
 Cls_JobTitle = JobTitle_Str
End Function

'//企业性质输出
Function Cls_Properity(Properity)
 Dim Properity_Str
 Select Case Properity 
  Case 1: Properity_Str = %22国有企业%22
  Case 2: Properity_Str = %22外资企业%22
  Case 3: Properity_Str = %22合资企业%22
  Case 4: Properity_Str = %22私营企业%22
  Case 5: Properity_Str = %22民营企业%22
  Case 6: Properity_Str = %22股份制企业%22
  Case 7: Properity_Str = %22集体企业%22
  Case 8: Properity_Str = %22集体事业%22
  Case 9: Properity_Str = %22乡镇企业%22
  Case 10: Properity_Str = %22行政机关%22
  Case 11: Properity_Str = %22社会团体%22
  Case 12: Properity_Str = %22事业单位%22
  Case 13: Properity_Str = %22跨国企业%22
  Case 14: Properity_Str = %22其他%22  
 End Select
 Cls_Properity = Properity_Str
End Function

'//行业输出
Function Cls_Industry(Industry)
 Dim Industry_Str
 Select Case Industry 
  Case 1: Industry_Str = %22互联网、电子商务%22
  Case 2: Industry_Str = %22计算机业（软件、数据库、系统集成）%22
  Case 3: Industry_Str = %22计算机业（硬件、网络设备）%22
  Case 4: Industry_Str = %22电子、微电子技术%22
  Case 5: Industry_Str = %22通讯、电信业%22
  Case 6: Industry_Str = %22家电业%22
  Case 7: Industry_Str = %22批发零售(百货、超市、专卖店)%22
  Case 8: Industry_Str = %22贸易、商务、进出口%22
  Case 9: Industry_Str = %22电气%22
  Case 10: Industry_Str = %22电力、能源、矿产业%22
  Case 11: Industry_Str = %22石油、化工业%22
  Case 12: Industry_Str = %22生物工程、制药、环保%22
  Case 13: Industry_Str = %22机械制造、机电设备、重工业%22
  Case 14: Industry_Str = %22汽车、摩托车%22
  Case 15: Industry_Str = %22仪器仪表、电工设备%22
  Case 16: Industry_Str = %22广告、公关、设计%22
  Case 17: Industry_Str = %22媒体、影视制作、新闻出版%22
  Case 18: Industry_Str = %22艺术、文化传播%22
  Case 19: Industry_Str = %22快速消费品（食品、饮料、粮油、化妆品、烟酒）%22
  Case 20: Industry_Str = %22纺织品业（服饰、鞋类、家纺用品、皮具）%22
  Case 21: Industry_Str = %22咨询业（顾问、会计师、审计师、法律）%22
  Case 22: Industry_Str = %22金融业（投资、保险、证券、银行、基金）%22
  Case 23: Industry_Str = %22建筑、房地产、物业管理、装潢%22
  Case 24: Industry_Str = %22餐饮、娱乐、酒店%22
  Case 25: Industry_Str = %22运输、物流、快递%3C%22
  Case 26: Industry_Str = %22旅游业%22
  Case 27: Industry_Str = %22办公设备、文化体育休闲用品、家居用品%22
  Case 28: Industry_Str = %22印刷、包装、造纸%22
  Case 29: Industry_Str = %22生产、制造、加工%22
  Case 30: Industry_Str = %22教育、培训、科研院所%22
  Case 31: Industry_Str = %22医疗、保健、卫生服务%22
  Case 32: Industry_Str = %22英才交流、中介%22
  Case 33: Industry_Str = %22协会、社团、政府公用事业、社区服务%22
  Case 34: Industry_Str = %22农、林、牧、副、渔业%22
  Case 35: Industry_Str = %22其他%22  
 End Select
 Cls_Industry = Industry_Str
End Function

'//外语类型输出
Function Cls_Language(Language)
 Dim Language_Str
 Select Case Language
  Case 1: Language_Str = %22英语%22
  Case 2: Language_Str = %22日语%22
  Case 3: Language_Str = %22法语%22
  Case 4: Language_Str = %22德语%22
  Case 5: Language_Str = %22阿拉伯语%22
  Case 6: Language_Str = %22朝鲜语%22
  Case 7: Language_Str = %22西班牙语%22
  Case 8: Language_Str = %22俄语%22
  Case 9: Language_Str = %22意大利语%22
  Case 10: Language_Str = %22其他语言%22
 End Select
 Cls_Language = Language_Str
End Function

'//普通话水平
Function Cls_Mandarin(Mandarin)
 Dim Mandarin_Str
 Select Case Mandarin
  Case 1: Mandarin_Str = %22差%22
  Case 2: Mandarin_Str = %22较差%22
  Case 3: Mandarin_Str = %22一般%22
  Case 4: Mandarin_Str = %22标准%22  
 End Select
 Cls_Mandarin = Mandarin_Str
End Function

'//计算机水平输出
Function Cls_Computer(Computer)
 Dim Computer_Str
 Select Case Computer
  Case 1: Computer_Str = %22初级%22
  Case 2: Computer_Str = %22中级%22
  Case 3: Computer_Str = %22高级%22
  Case 4: Computer_Str = %22高校非计算机专业二级%22
  Case 5: Computer_Str = %22高校非计算机专业三级(偏软)%22
  Case 6: Computer_Str = %22高校非计算机专业三级(偏硬)%22
  Case 7: Computer_Str = %22初级程序员%22
  Case 8: Computer_Str = %22程序员%22
  Case 9: Computer_Str = %22高级程序员%22
  Case 10: Computer_Str = %22系统分析员%22
  Case 11: Computer_Str = %22网络程序员%22
  Case 12: Computer_Str = %22网络设计师%22
  Case 13: Computer_Str = %22全国计算机等级考试一级%22
  Case 14: Computer_Str = %22全国计算机等级考试二级%22
  Case 15: Computer_Str = %22全国计算机等级考试三级%22
  Case 16: Computer_Str = %22全国计算机等级考试四级%22
  Case 17: Computer_Str = %22微软认证产品专家(MCP)%22
  Case 18: Computer_Str = %22微软认证系统工程师(MCSE)%22
  Case 19: Computer_Str = %22微软认证网站建造专家(MCP+Site Builder)%22
  Case 20: Computer_Str = %22微软认证数据库管理员(MCDBA)%22
  Case 21: Computer_Str = %22微软认证开发专家(MCSD)%22
  Case 22: Computer_Str = %22Cisco职业资格认证CCNA%22
  Case 23: Computer_Str = %22Cisco职业资格认证CCDP%22
  Case 24: Computer_Str = %22Cisco职业资格认证CCNP%22
  Case 25: Computer_Str = %22Cisco职业资格认证CCIE%22
  Case 26: Computer_Str = %22Oracle8数据库管理员%22
  Case 27: Computer_Str = %22Lotus资格认证%22
  Case 28: Computer_Str = %22Lotus-CLS资格认证%22
  Case 29: Computer_Str = %22Lotus-CLI资格认证%22
  Case 30: Computer_Str = %22Notes应用开发工程师%22
  Case 31: Computer_Str = %22Notes系统管理工程师%22
  Case 32: Computer_Str = %22Notes高级应用开发工程师%22
  Case 33: Computer_Str = %22Notes高级系统管理工程师%22
  Case 34: Computer_Str = %22IBM-DB2 Database Administrator%22
  Case 35: Computer_Str = %22IBM-DB2 Application Developer%22
  Case 36: Computer_Str = %22IBM-MQSeries Engineer%22
 End Select
 Cls_Computer = Computer_Str
End Function

'//可到岗时间输出
Function Cls_Posts(Posts)
 Dim Posts_Str
 Select Case Posts
  Case 10: Posts_Str = %22三天内%22
  Case 20: Posts_Str = %22一周内%22
  Case 30: Posts_Str = %22两周内%22
  Case 40: Posts_Str = %22三周内%22
  Case 50: Posts_Str = %22一个月内%22
  Case 60: Posts_Str = %22三个月内%22
  Case 70: Posts_Str = %22半年内%22
  Case 80: Posts_Str = %22一年内%22
 End Select
 Cls_Posts = Posts_Str
End Function

'//职位中年龄要求输出
Function Cls_Age(Min,Max)
 Dim Age_Str
 If Min = 0 And Max = 0 Then
    Age_Str = %22不限%22
 Elseif Min = 0 And Max %3C%3E 0 Then
    Age_Str = Max&%22岁以下%22
 Elseif Min %3C%3E 0 And Max = 0 Then
    Age_Str = Min&%22岁以上%22
 Else
    Age_Str = Min&%22岁-%22&Max&%22岁%22
 End if
 Cls_Age = Age_Str
End Function

'//判断企业会员能否发布职位
Function Cls_PublishJob_Flag(Vip,PublishCount)
 Dim Flag
 Select Case Vip
  Case 0
    If PublishCount %3E= Cls_WebJobs Then
     Flag = 0
	Else
     Flag = 1
	End if
  Case 1
    Flag = 1
  Case 2
    Flag = 0
 End Select
 Cls_PublishJob_Flag = Flag
End Function

'//企业职位的状态
Function Cls_JobFlag(JobFlag)
 Dim JobFlag_Str
 Select Case JobFlag
  Case 1:JobFlag_Str = %22中%22
  Case 2:JobFlag_Str = %22%3Cfont color=%23666666%3E已屏蔽%3C/font%3E%22
 End Select
 Cls_JobFlag = JobFlag_Str
End Function

'//个人用户类型
Function Cls_Usertype(Usertype)
 Dim Usertype_Str
 Select Case Usertype
  Case 1:Usertype_Str = %22社会人士%22
  Case 2:Usertype_Str = %22应届毕业生%22
 End Select
 Cls_Usertype = Usertype_Str
End Function

'//资金类型输出
Function Cls_Currency(Currencys)
 Dim Currency_Str
 Select Case Currencys
  Case 1:Currency_Str = %22人民币%22
  Case 2:Currency_Str = %22美元%22
  Case 3:Currency_Str = %22欧元%22
  Case 4:Currency_Str = %22英镑%22
  Case 5:Currency_Str = %22港币%22
  Case 6:Currency_Str = %22台币%22
 End Select
 Cls_Currency = Currency_Str
End Function

'//企业VIP会员的期限
Function Cls_Vip_Level(Level)
 Dim Level_Str
 Select Case Level
  Case 1:Level_Str = %22一个月%22
  Case 2:Level_Str = %22两个月%22
  Case 3:Level_Str = %22三个月%22
  Case 4:Level_Str = %22四个月%22
  Case 5:Level_Str = %22五个月%22
  Case 6:Level_Str = %22六个月%22
  Case 9:Level_Str = %22九个月%22
  Case 12:Level_Str = %22一年%22
  Case 24:Level_Str = %22两年%22
  Case 36:Level_Str = %22三年%22
 End Select
 Cls_Vip_Level = Level_Str
End Function


'//员工人数输出
Function Cls_Workers(Workers)
 Dim Workers_Str
 Select Case Workers
  Case 9:Workers_Str = %2210人以下%22
  Case 49:Workers_Str = %2210～50人%22
  Case 199:Workers_Str = %2250～200人%22  
  Case 499:Workers_Str = %22200～500人%22  
  Case 999:Workers_Str = %22500～1000人%22  
  Case 1000:Workers_Str = %221000人以上%22    
 End Select
 Cls_Workers = Workers_Str
End Function

'//员工人数输出
Function Cls_Workers2(Workers)
 Dim Workers_Str
 Select Case Workers
  Case 1:Workers_Str = %221-20人%22
  Case 20:Workers_Str = %2220～100人%22
  Case 100:Workers_Str = %22100～1000人%22    
  Case 1000:Workers_Str = %221000人以上%22    
 End Select
 Cls_Workers2 = Workers_Str
End Function

'//职位类型输出
Function Cls_JobType(JobType)
 Dim JobType_Str
 Select Case JobType
  Case 1:JobType_Str = %22全职%22
  Case 2:JobType_Str = %22兼职%22
 End Select
 Cls_JobType = JobType_Str
End Function
'//获取院校类型
Function Cls_SchoolType(Sch_Property)
 Dim SchoolType
 Select Case Sch_Property
  Case 10:SchoolType = %22高等院校%22
  Case 20:SchoolType = %22中专学校%22
  Case 30:SchoolType = %22职业技校%22
  Case 40:SchoolType = %22培训机构%22
  Case 50:SchoolType = %22其他%22
 End Select
 Cls_SchoolType = SchoolType
End Function

'//获取培训机构类型
Function Cls_EducateType(Sch_Property)
 Dim SchoolType
 Select Case Sch_Property
  Case 10:SchoolType = %22团队%22
  Case 20:SchoolType = %22民营企业%22
  Case 30:SchoolType = %22外商独资企业%22
  Case 40:SchoolType = %22合资企业%22
  Case 50:SchoolType = %22股份制企业%22
  Case 60:SchoolType = %22集体企业%22
  Case 70:SchoolType = %22事业单位%22
  Case 80:SchoolType = %22社会团体%22
  Case 90:SchoolType = %22行政机关%22
  Case 100:SchoolType = %22其他类别%22
  Case 110:SchoolType = %22高等院校%22
   
 End Select
 Cls_EducateType = SchoolType
End Function

Function Cls_Valid(Valid)
 Dim Valid_str
 Select Case Valid
  Case 0:Valid_str = %22长年招生%22
  Case 7:Valid_str = %22一星期%22
  Case 15:Valid_str = %22半个月%22
  Case 30:Valid_str = %22一个月%22
  Case 60:Valid_str = %22二个月%22
  Case 90:Valid_str = %22三个月%22
  Case 180:Valid_str = %22半年%22
 End Select 
 Cls_Valid = Valid_str
End Function


'//分页函数
Function Cls_Page(FileName,PageNo,PCount,RCount)
 Dim Page_Str
 Page_Str = %22%3Ctable width=%22%22100%25%22%22 border=%22%220%22%22 cellpadding=%22%220%22%22 cellspacing=%22%221%22%22 class=%22%22text01%22%22%3E%22
 Page_Str = Page_Str&%22%3Ctr%3E%3Ctd width=%22%2250%25%22%22%3E共有%22&RCount&%22条记录 | 分%22&PCount&%22页显示%3C/td%3E%22
 Page_Str = Page_Str&%22%3Ctd align=%22%22right%22%22%3E%22
 If PageNo %3E 1 Then
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22?PageNo=1%22%22 class=%22%22a4%22%22%3E首页%3C/a%3E %22
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22?PageNo=%22&PageNo-1&%22%22%22 class=%22%22a4%22%22%3E上页%3C/a%3E %22
 Else
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E首页%3C/font%3E %22
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E上页%3C/font%3E %22
 End if 
 Page_Str = Page_Str&%22%3C%22&PageNo&%22%3E %22  
 If PageNo %3C PCount Then
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22?PageNo=%22&PageNo+1&%22%22%22 class=%22%22a4%22%22%3E下页%3C/a%3E %22
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22?PageNo=%22&PCount&%22%22%22 class=%22%22a4%22%22%3E尾页%3C/a%3E %22
 Else
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E下页%3C/font%3E %22
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E尾页%3C/font%3E %22
 End if 
 Page_Str = Page_Str&%22%3C/td%3E%3C/tr%3E%3C/table%3E%22

 Cls_Page = Page_Str
End Function

Function Cls_Page2(FileName,PageNo,PCount,RCount)
 Dim Page_Str
 Page_Str = %22%3Ctable width=%22%22100%25%22%22 border=%22%220%22%22 cellpadding=%22%220%22%22 cellspacing=%22%221%22%22 class=%22%22text01%22%22%3E%22
 Page_Str = Page_Str&%22%3Ctr%3E%3Ctd width=%22%2250%25%22%22%3E共有%22&RCount&%22条记录 | 分%22&PCount&%22页显示%3C/td%3E%22
 Page_Str = Page_Str&%22%3Ctd align=%22%22right%22%22%3E%22
 If PageNo %3E 1 Then
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22&PageNo=1%22%22 class=%22%22a4%22%22%3E首页%3C/a%3E %22
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22&PageNo=%22&PageNo-1&%22%22%22 class=%22%22a4%22%22%3E上页%3C/a%3E %22
 Else
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E首页%3C/font%3E %22
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E上页%3C/font%3E %22
 End if 
 Page_Str = Page_Str&%22%3C%22&PageNo&%22%3E %22  
 If PageNo %3C PCount Then
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22&PageNo=%22&PageNo+1&%22%22%22 class=%22%22a4%22%22%3E下页%3C/a%3E %22
  Page_Str = Page_Str&%22%3Ca href=%22%22%22&FileName&%22&PageNo=%22&PCount&%22%22%22 class=%22%22a4%22%22%3E尾页%3C/a%3E %22
 Else
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E下页%3C/font%3E %22
  Page_Str = Page_Str&%22%3Cfont color=%23666666%3E尾页%3C/font%3E %22
 End if 
 Page_Str = Page_Str&%22%3C/td%3E%3C/tr%3E%3C/table%3E%22

 Cls_Page2 = Page_Str
End Function

'//生成会员的标记字符串
Dim output,num
Function gen_key(digits)
 Dim char_array(50)
 char_array(0) = %220%22
 char_array(1) = %221%22
 char_array(2) = %222%22
 char_array(3) = %223%22
 char_array(4) = %224%22
 char_array(5) = %225%22
 char_array(6) = %226%22
 char_array(7) = %227%22
 char_array(8) = %228%22
 char_array(9) = %229%22
 char_array(10) = %22a%22
 char_array(11) = %22b%22
 char_array(12) = %22c%22
 char_array(13) = %22d%22
 char_array(14) = %22e%22
 char_array(15) = %22f%22
 char_array(16) = %22g%22
 char_array(17) = %22h%22
 char_array(18) = %22i%22
 char_array(19) = %22j%22
 char_array(20) = %22k%22
 char_array(21) = %22l%22
 char_array(22) = %22m%22
 char_array(23) = %22n%22
 char_array(24) = %22o%22
 char_array(25) = %22p%22
 char_array(26) = %22q%22
 char_array(27) = %22r%22
 char_array(28) = %22s%22
 char_array(29) = %22t%22
 char_array(30) = %22u%22
 char_array(31) = %22v%22
 char_array(32) = %22w%22
 char_array(33) = %22x%22
 char_array(34) = %22y%22
 char_array(35) = %22z%22
 randomize
 do while len(output) %3C digits
  num = char_array(Int((35 - 0 + 1) * Rnd + 0))
  output = output + num
 loop
 gen_key = output
End Function
'//生成新闻文件名
Function Makefilename(Fname)
  Fname = Year(Now()) &  Month(Now()) & Day(Now()) & Hour(Now()) & Minute(Now()) & Second(Now())
  Makefilename = Fname & %22.html%22
End Function

'//新闻的列表
Function Cls_News_List(Typeid,Lists,Length)
 'Typeid    类别ID
 'Lists     显示的新闻数目
 'Length    显示的文字长度
 Dim NewList
 NewList = %22%3Ctable width=%22%22100%25%22%22  border=%22%220%22%22 cellpadding=%22%220%22%22 cellspacing=%22%220%22%22%3E%22
 SQL = %22Select Top %22&Lists&%22 Title,FileName,Path From [pH_New_Info] Where Typeid=%22&Typeid&%22 And Flag=1 Order By DateAndTime Desc%22                
 Set Rs1 = Conn.Execute(SQL)
 If Rs1.Eof Then
  NewList = NewList&%22%3Ctr%3E%3Ctd height=%22%2222%22%22%3E&middot;没有相关信息...%3C/td%3E%3C/tr%3E%22
 Else
  Tmp = Rs1.GetRows()
  Rs1.Close:Set Rs1 = Nothing
  For i = 0 to Ubound(Tmp,2)
   Title = Left(Tmp(0,i),Length)
   NewList = NewList&%22%3Ctr valign=%22%22middle%22%22%3E%3Ctd height=%22%2222%22%22%3E·%3Ca href=%22%22../%22&Tmp(2,i)&%22/%22&Tmp(1,i)&%22%22%22 target=%22%22_blank%22%22%3E%22&Title&%22%3C/a%3E%3C/td%3E%3C/tr%3E%22
  Next
 End if
 NewList = NewList&%22%3Ctr%3E%3Ctd align=right%3E| %3Ca href=%22%22../Public/News.asp?Param=%22&Typeid&%22%22%22%3E更多信息%3C/a%3E%3C/td%3E%3C/tr%3E%22
 NewList = NewList&%22%3C/table%3E%22
 Cls_News_List = NewList
End Function

'//新闻的列表(跟目录文件显示)
Function Cls_News_List_Root(Typeid,Lists,Length)
 'Typeid    类别ID
 'Lists     显示的新闻数目
 'Length    显示的文字长度
 Dim NewList
 NewList = %22%3Ctable width=%22%22100%25%22%22  border=%22%220%22%22 cellpadding=%22%220%22%22 cellspacing=%22%220%22%22%3E%22
 SQL = %22Select Top %22&Lists&%22 Title,FileName,Path From [pH_New_Info] Where Typeid=%22&Typeid&%22 And Flag=1 Order By NewId Desc%22                
 Set Rs1 = Conn.Execute(SQL)
 If Rs1.Eof Then
  NewList = NewList&%22%3Ctr%3E%3Ctd height=%22%2222%22%22%3E&middot;没有相关信息...%3C/td%3E%3C/tr%3E%22
 Else
  Tmp = Rs1.GetRows()
  Rs1.Close:Set Rs1 = Nothing
  For i = 0 to Ubound(Tmp,2)
   Title = Left(Tmp(0,i),Length)
   NewList = NewList&%22%3Ctr valign=%22%22middle%22%22%3E%3Ctd height=%22%2222%22%22%3E·%3Ca href=%22%22%22&Tmp(2,i)&%22/%22&Tmp(1,i)&%22%22%22 target=%22%22_blank%22%22%3E%22&Title&%22%3C/a%3E%3C/td%3E%3C/tr%3E%22
  Next
 End if
 'NewList = NewList&%22%3Ctr%3E%3Ctd align=right%3E| %3Ca href=%22%22Public/News.asp?Param=%22&Typeid&%22%22%22%3E更多信息%3C/a%3E%3C/td%3E%3C/tr%3E%22
 NewList = NewList&%22%3C/table%3E%22
 Cls_News_List_Root = NewList
End Function


'//热门或者推荐新闻的列表
Function Cls_News_Param(Param,Lists,Length)
 'Param     查询参数
 'Lists     显示的新闻数目
 'Length    显示的文字长度
 Dim NewList,Param_Str
 Param_Str = Replace_Text(Param)
 NewList = %22%3Ctable width=%22%22100%25%22%22  border=%22%220%22%22 cellpadding=%22%220%22%22 cellspacing=%22%220%22%22%3E%22
 SQL = %22Select Top %22&Lists&%22 Title,FileName,Path From [pH_New_Info] Where %22&Param_Str&%22 And Flag=1 Order By DateAndTime Desc%22                
 Set Rs1 = Conn.Execute(SQL)
 If Rs1.Eof Then
  NewList = NewList&%22%3Ctr%3E%3Ctd height=%22%2222%22%22%3E&middot;没有相关信息...%3C/td%3E%3C/tr%3E%22
 Else
  Tmp = Rs1.GetRows()
  Rs1.Close:Set Rs1 = Nothing
  For i = 0 to Ubound(Tmp,2)
   Title = Left(Tmp(0,i),Length)
   NewList = NewList&%22%3Ctr valign=%22%22middle%22%22%3E%3Ctd height=%22%2222%22%22%3E·%3Ca href=%22%22../%22&Tmp(2,i)&%22/%22&Tmp(1,i)&%22%22%22 target=%22%22_blank%22%22%3E%22&Title&%22%3C/a%3E%3C/td%3E%3C/tr%3E%22
  Next
 End if
 NewList = NewList&%22%3C/table%3E%22
 Cls_News_Param = NewList
End Function

Function CreateVote(ID,Title,VoteText,Mtype)
	Dim Result,Content,i
	Content=split(VoteText,%22|%22)
	Result=%22%3CTable Width=100%25 %3E%3CForm action=../Public/vote.asp method=post target=_blank%3E%3Ctr%3E%3Ctd%3E%22&Title&%22%3C/td%3E%3C/tr%3E%22
	
	IF Mtype=False Then
		For i=0 To Ubound(Content)
			Result=Result&%22%3Ctr%3E%3Ctd%3E%22
			Result=Result&%22%3Cinput type='radio' name='vote' value=%22&i&%22%3E&nbsp;%22&Content(i)
			Result=Result&%22%3C/td%3E%3C/tr%3E%22
		Next
	End if

	If Mtype=True Then
	For i=0 To Ubound(Content)
			Result=Result&%22%3Ctr%3E%3Ctd%3E%22
			Result=Result&%22%3Cinput type='checkbox' name='vote' value=%22&i&%22%3E&nbsp;&nbsp;&nbsp;%22&Content(i)
			Result=Result&%22%3C/td%3E%3C/tr%3E%22
		Next
	End if
	
	Result=Result&%22%3Ctr%3E%3Ctd align=center%3E%3Cinput name=VoteType type=hidden value=%22&Mtype&%22%3E%3Cinput name=VoteID type=hidden value=%22&ID&%22%3E%3Cinput type=submit name=submit value=投票 class=LoginInput%3E %3Cinput type=button name=view value=查看 class=LoginInput onclick=window.open('../Public/vote.asp?VoteID=%22&ID&%22','_blank','scrollbars=yes,width=645,height=320')%3E%3C/td%3E%3C/tr%3E%22
	Result=Result&%22%3C/Form%3E%3C/Table%3E%22
	CreateVote=Result
End Function


'//--------------------------学历约定--------------------------------
'//Edus
'// 10 小学
'// 20 初中
'// 30 高中
'// 40 中专
'// 50 大专
'// 60 本科
'// 70 硕士
'// 80 博士
'// 90 博士后
'//--------------------------企业所属行业约定--------------------------------
'//  %3Coption value=%221%22%3E互联网、电子商务%3C/option%3E
'//  %3Coption value=%222%22%3E计算机业（软件、数据库、系统集成）%3C/option%3E
'//  %3Coption value=%223%22%3E计算机业（硬件、网络设备）%3C/option%3E
'//  %3Coption value=%224%22%3E电子、微电子技术%3C/option%3E
'//  %3Coption value=%225%22%3E通讯、电信业%3C/option%3E
'//  %3Coption value=%226%22%3E家电业%3C/option%3E
'//  %3Coption value=%227%22%3E批发零售(百货、超市、专卖店)%3C/option%3E
'//  %3Coption value=%228%22%3E贸易、商务、进出口%3C/option%3E
'//  %3Coption value=%229%22%3E电气%3C/option%3E
'//  %3Coption value=%2210%22%3E电力、能源、矿产业%3C/option%3E
'//  %3Coption value=%2211%22%3E石油、化工业%3C/option%3E
'//  %3Coption value=%2212%22%3E生物工程、制药、环保%3C/option%3E
'//  %3Coption value=%2213%22%3E机械制造、机电设备、重工业%3C/option%3E
'//  %3Coption value=%2214%22%3E汽车、摩托车%3C/option%3E
'//  %3Coption value=%2215%22%3E仪器仪表、电工设备%3C/option%3E
'//  %3Coption value=%2216%22%3E广告、公关、设计%3C/option%3E
'//  %3Coption value=%2217%22%3E媒体、影视制作、新闻出版%3C/option%3E
'//  %3Coption value=%2218%22%3E艺术、文化传播%3C/option%3E
'//  %3Coption value=%2219%22%3E快速消费品（食品、饮料、粮油、化妆品、烟酒）%3C/option%3E
'//  %3Coption value=%2220%22%3E纺织品业（服饰、鞋类、家纺用品、皮具）%3C/option%3E
'//  %3Coption value=%2221%22%3E咨询业（顾问、会计师、审计师、法律）%3C/option%3E
'//  %3Coption value=%2222%22%3E金融业（投资、保险、证券、银行、基金）%3C/option%3E
'//  %3Coption value=%2223%22%3E建筑、房地产、物业管理、装潢%3C/option%3E
'//  %3Coption value=%2224%22%3E餐饮、娱乐、酒店%3C/option%3E
'//  %3Coption value=%2225%22%3E运输、物流、快递%3C/option%3E
'//  %3Coption value=%2226%22%3E旅游业%3C/option%3E
'//  %3Coption value=%2227%22%3E办公设备、文化体育休闲用品、家居用品%3C/option%3E
'//  %3Coption value=%2228%22%3E印刷、包装、造纸%3C/option%3E
'//  %3Coption value=%2229%22%3E生产、制造、加工%3C/option%3E
'//  %3Coption value=%2230%22%3E教育、培训、科研院所%3C/option%3E
'//  %3Coption value=%2231%22%3E医疗、保健、卫生服务%3C/option%3E
'//  %3Coption value=%2232%22%3E英才交流、中介%3C/option%3E
'//  %3Coption value=%2233%22%3E协会、社团、政府公用事业、社区服务%3C/option%3E
'//  %3Coption value=%2234%22%3E农、林、牧、副、渔业%3C/option%3E
'//  %3Coption value=%2235%22%3E其他%3C/option%3E

'//--------------------------企业性质约定--------------------------------
'//  %3Coption value=%221%22%3E国有企业%3C/option%3E
'//  %3Coption value=%222%22%3E外资企业%3C/option%3E
'//  %3Coption value=%223%22%3E合资企业%3C/option%3E
'//  %3Coption value=%224%22%3E私营企业%3C/option%3E
'//  %3Coption value=%225%22%3E民营企业%3C/option%3E
'//  %3Coption value=%226%22%3E股份制企业%3C/option%3E
'//  %3Coption value=%227%22%3E集体企业%3C/option%3E
'//  %3Coption value=%228%22%3E集体事业%3C/option%3E
'//  %3Coption value=%229%22%3E乡镇企业%3C/option%3E
'//  %3Coption value=%2210%22%3E行政机关%3C/option%3E
'//  %3Coption value=%2211%22%3E社会团体%3C/option%3E
'//  %3Coption value=%2212%22%3E事业单位%3C/option%3E
'//  %3Coption value=%2213%22%3E跨国企业%3C/option%3E
'//  %3Coption value=%2214%22%3E其他%3C/option%3E

'//--------------------------资金约定--------------------------------
'//  %3Coption value=%221%22%3E人民币%3C/option%3E
'//  %3Coption value=%222%22%3E美元%3C/option%3E
'//  %3Coption value=%223%22%3E欧元%3C/option%3E
'//  %3Coption value=%224%22%3E英镑%3C/option%3E
'//  %3Coption value=%225%22%3E港币%3C/option%3E
'//  %3Coption value=%226%22%3E台币%3C/option%3E

'//--------------------------员工人数约定--------------------------------
'//  %3COPTION value=9%3E10人以下%3C/OPTION%3E
'//  %3COPTION value=49%3E10～50人%3C/OPTION%3E
'//  %3COPTION value=199%3E50～200人%3C/OPTION%3E
'//  %3COPTION value=499%3E200～500人%3C/OPTION%3E
'//  %3COPTION value=999%3E500～1000人%3C/OPTION%3E
'//  %3COPTION value=1000%3E1000人以上%3C/OPTION%3E

'//--------------------------院校类型约定--------------------------------
'//  %3Coption value=%2210%22%3E高等院校%3C/option%3E
'//  %3Coption value=%2220%22%3E中专学校%3C/option%3E
'//  %3Coption value=%2230%22%3E职业技校%3C/option%3E
'//  %3Coption value=%2240%22%3E培训机构%3C/option%3E
'//  %3Coption value=%2250%22%3E其他%3C/option%3E

'//--------------------------工作年限约定--------------------------------
'//  %3Coption value=%220%22%3E一年以内%3C/option%3E
'//  %3Coption value=%221%22%3E一年以上%3C/option%3E
'//  %3Coption value=%222%22%3E二年以上%3C/option%3E
'//  %3Coption value=%223%22%3E三年以上%3C/option%3E
'//  %3Coption value=%224%22%3E四年以上%3C/option%3E
'//  %3Coption value=%225%22%3E五年以上%3C/option%3E
'//  %3Coption value=%2210%22%3E十年以上%3C/option%3E
'//  %3Coption value=%2220%22%3E二十年以上%3C/option%3E
'//  %3Coption value=%2230%22%3E三十年以上%3C/option%3E
'//  %3Coption value=%2250%22%3E退休人员%3C/option%3E

'//--------------------------外语类型约定--------------------------------
'//  %3Coption  value=%221%22%3E英语%3C/option%3E
'//  %3Coption  value=%222%22%3E日语%3C/option%3E
'//  %3Coption  value=%223%22%3E法语%3C/option%3E
'//  %3Coption  value=%224%22%3E德语%3C/option%3E
'//  %3Coption  value=%225%22%3E阿拉伯语%3C/option%3E
'//  %3Coption  value=%226%22%3E朝鲜语%3C/option%3E
'//  %3Coption  value=%227%22%3E西班牙语%3C/option%3E
'//  %3Coption  value=%228%22%3E俄语%3C/option%3E
'//  %3Coption  value=%229%22%3E意大利语%3C/option%3E
'//  %3Coption  value=%2210%22%3E其他语言%3C/option%3E

'//--------------------------普通话水平约定-------------------------------- 
'//  %3Coption value=%224%22%3E标准%3C/option%3E
'//  %3Coption value=%223%22%3E一般%3C/option%3E
'//  %3Coption value=%222%22%3E较差%3C/option%3E
'//  %3Coption value=%221%22%3E差%3C/option%3E

'//--------------------------计算机水平约定-------------------------------- 
'//  %3COPTION value=1%3E初级%3C/OPTION%3E
'//  %3COPTION value=2%3E中级%3C/OPTION%3E
'//  %3COPTION value=3%3E高级%3C/OPTION%3E
'//  %3COPTION value=4%3E高校非计算机专业二级%3C/OPTION%3E
'//  %3COPTION value=5%3E高校非计算机专业三级(偏软)%3C/OPTION%3E
'//  %3COPTION value=6%3E高校非计算机专业三级(偏硬)%3C/OPTION%3E
'//  %3COPTION value=7%3E初级程序员%3C/OPTION%3E
'//  %3COPTION value=8%3E程序员%3C/OPTION%3E
'//  %3COPTION value=9%3E高级程序员%3C/OPTION%3E
'//  %3COPTION value=10%3E系统分析员%3C/OPTION%3E
'//  %3COPTION value=11%3E网络程序员%3C/OPTION%3E
'//  %3COPTION value=12%3E网络设计师%3C/OPTION%3E
'//  %3COPTION value=13%3E全国计算机等级考试一级%3C/OPTION%3E
'//  %3COPTION value=14%3E全国计算机等级考试二级%3C/OPTION%3E
'//  %3COPTION value=15%3E全国计算机等级考试三级%3C/OPTION%3E
'//  %3COPTION value=16%3E全国计算机等级考试四级%3C/OPTION%3E
'//  %3COPTION value=17%3E微软认证产品专家(MCP)%3C/OPTION%3E
'//  %3COPTION value=18%3E微软认证网站建造专家(MCP+Site Builder)%3C/OPTION%3E
'//  %3COPTION value=19%3E微软认证系统工程师(MCSE)%3C/OPTION%3E
'//  %3COPTION value=20%3E微软认证数据库管理员(MCDBA)%3C/OPTION%3E
'//  %3COPTION value=21%3E微软认证开发专家(MCSD)%3C/OPTION%3E
'//  %3COPTION value=22%3ECisco职业资格认证CCNA%3C/OPTION%3E
'//  %3COPTION value=23%3ECisco职业资格认证CCDP%3C/OPTION%3E
'//  %3COPTION value=24%3ECisco职业资格认证CCNP%3C/OPTION%3E
'//  %3COPTION value=25%3ECisco职业资格认证CCIE%3C/OPTION%3E
'//  %3COPTION value=26%3EOracle8数据库管理员%3C/OPTION%3E
'//  %3COPTION value=27%3ELotus资格认证%3C/OPTION%3E
'//  %3COPTION value=28%3ELotus-CLS资格认证%3C/OPTION%3E
'//  %3COPTION value=29%3ELotus-CLI资格认证%3C/OPTION%3E
'//  %3COPTION value=30%3ENotes应用开发工程师%3C/OPTION%3E
'//  %3COPTION value=31%3ENotes系统管理工程师%3C/OPTION%3E
'//  %3COPTION value=32%3ENotes高级应用开发工程师%3C/OPTION%3E
'//  %3COPTION value=33%3ENotes高级系统管理工程师%3C/OPTION%3E
'//  %3COPTION value=34%3EIBM-DB2 Database Administrator%3C/OPTION%3E
'//  %3COPTION value=35%3EIBM-DB2 Application Developer%3C/OPTION%3E
'//  %3COPTION value=36%3EIBM-MQSeries Engineer%3C/OPTION%3E

'//--------------------------到岗位时间约定-------------------------------- 
'//  %3Coption  value=%2210%22%3E三天内%3C/option%3E
'//  %3Coption  value=%2220%22%3E一周内%3C/option%3E
'//  %3Coption  value=%2230%22%3E两周内%3C/option%3E
'//  %3Coption  value=%2240%22%3E三周内%3C/option%3E
'//  %3Coption  value=%2250%22%3E一个月内%3C/option%3E
'//  %3Coption  value=%2260%22%3E三个月内%3C/option%3E
'//  %3Coption  value=%2270%22%3E半年内%3C/option%3E
'//  %3Coption  value=%2280%22%3E一年内%3C/option%3E               
 %25%3E" ><MM_ASPSCRIPT><MM:EndLock>
<MM:EndLock>

<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="DynamicSource" depFiles="" orig="%3C%25 
Dim SQL,Rs
Dim Perid,Param
Dim JobId,Comid,JobName,Work_Area,Work_City,Edus,Deal,LastUpdate_Time
'//获取参数
Perid            = Session(%22Person%22)(2)
UserName         = Session(%22Person%22)(0)
'//获取参数
 Save1           = Replace_Text(Request(%22Save%22))     
 Searcher_Name   = Replace_Text(Request(%22Name%22))
 JobClass        = Replace_Text(Request(%22slt_subcategory%22))
 Work            = Replace_Text(Request(%22slt_workplacecity%22))
 PublishDate     = Replace_Text(Request(%22PublishDate%22))
 Edus            = Replace_Text(Request(%22Edus%22))
 Works           = Replace_Text(Request(%22Works%22))
 Sex             = Replace_Text(Request(%22Sex%22))
 MinAge          = Replace_Text(Request(%22Min_Age%22))
 MaxAge          = Replace_Text(Request(%22Max_Age%22))
 Locus_Area      = Replace_Text(Request(%22x_suozaidi%22))
 Locus_City      = Replace_Text(Request(%22x_suozaidi1%22))
 Work1           = Work
 Work            = Split(Work,%22-%22)
'Response.Write Request(%22slt_workplacecity%22)
'Response.End()
'//判断是否保存到搜索器
If Save1 = %221%22 Then
 If Searcher_Name = %22%22 Then 
   Response.Write %22%3Cscript%3Ealert('请输入搜索器名称...');window.close();%3C/script%3E%22
   Response.End()
 End if
 '//检测该用户的搜索器是否达到3个
 SQL = %22Select Count(Ncid) From [pH_Person_Searcher] Where Perid='%22&Perid&%22'%22
 Set Rs = Conn.Execute(SQL)
 If Rs(0) %3E= 3 Then
   Response.Write %22%3Cscript%3Ealert('对不起！您已经创建了3个搜索器...');window.close();%3C/script%3E%22
   Response.End()
 End if
 Rs.Close
 '保存数据
 SQL = %22Insert Into [pH_Person_Searcher]  (Perid,UserName,Searcher_Name,WorkWillClass,Area,City,PublishDate,Edus,Works,Sex,MinAge,MaxAge,Locus_Area,Locus_City) Values ('%22&Perid&%22','%22&Username&%22','%22&Searcher_Name&%22','%22&JobClass&%22','%22&Work(0)&%22','%22&Work(1)&%22',%22&PublishDate&%22,%22&Edus&%22,%22&Works&%22,%22&Sex&%22,%22&MinAge&%22,%22&MaxAge&%22,'%22&Locus_Area&%22','%22&Locus_City&%22')%22
 Conn.Execute(SQL)
End if

'//组织查询语句
SQL = %22Select JobId,Comid,JobName,Work_Area,Work_City,Edus,Deal,LastUpdate_Time,Require,Number From [pH_Job_Base] Where JobFlag=1 And DateDiff(d,End_Date,GetDate())%3C=0%22
'的工作岗位
If JobClass %3C%3E %220-0%22 Then
 SQL = SQL&%22 And JobClass Like '%25%22&JobClass&%22%25'%22
End if
'的工作省份
If Work(0) %3C%3E %22不限%22 Then
 SQL = SQL&%22 And Work_Area='%22&Work(0)&%22'%22
End if
'的工作城市
If Work(1) %3C%3E %22不限%22 Then
 SQL = SQL&%22 And Work_City='%22&Work(1)&%22'%22
End if
'更新日期
If PublishDate %3C%3E 0 Then
 SQL = SQL&%22 And DateDiff(d,LastUpdate_Time,Getdate())%3C%22&PublishDate
End if
'学历要求
If Edus %3C%3E 0 Then
 SQL = SQL&%22 And Edus%3E=%22&Cstr(Edus)
End if
'工作年限
If Works %3C%3E 0 Then
 SQL = SQL&%22 And Works%3E=%22&Cstr(Works)
End if
'性别
If Sex %3C%3E 2 Then
 SQL = SQL&%22 And Sex=%22&Cstr(Sex)
End if
'年龄
If MinAge %3C%3E 0 And MaxAge %3C%3E 0 Then
 SQL = SQL&%22 And Min_Age%3C=%22&Cstr(MinAge)&%22 And Max_Age%3E=%22&Cstr(MaxAge)
Elseif MinAge %3C%3E 0 And MaxAge = 0 Then
 SQL = SQL&%22 And Min_Age%3C=%22&Cstr(MinAge)
Elseif MinAge = 0 And MaxAge %3C%3E 0 Then
 SQL = SQL&%22 And Max_Age%3E=%22&Cstr(MaxAge)
End if

'现所在省份
If Locus_Area %3C%3E %22不限%22 Then
 SQL = SQL&%22 And Area='%22&Locus_Area&%22'%22
End if
'现所在城市
If Locus_City %3C%3E %22不限%22 Then
 SQL = SQL&%22 And City='%22&Locus_City&%22'%22
End if

SQL = SQL&%22 Order By LastUpdate_Time Desc%22

Set Rs = Server.CreateObject(%22ADODB.Recordset%22)
Rs.open SQL,Conn,1,1
Rs.Pagesize = 20
Psize       = Rs.PageSize
PCount      = Rs.PageCount
RCount      = Rs.RecordCount

PageNo = Cint(Request.QueryString(%22PageNo%22))
If PageNo %3C 1 Then
 PageNo = 1
Elseif PageNo %3E PCount Then
 PageNo = PCount
End if
If Not Rs.Eof Then Rs.AbsolutePage = PageNo

 %25%3E" ><MM_RECORDSET NAME="Rs" DYNAMICSOURCE=1></MM_RECORDSET><MM:EndLock>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../Css/Css.css" type=text/css rel=stylesheet>
<title>详细搜索职位 -- <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_WebName %25%3E" ><MM_ASPSCRIPT><MM:EndLock></title>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>
<SCRIPT language=JavaScript src="../js/funlib.js"></SCRIPT>
<SCRIPT language=JavaScript src="../js/ua.js"></SCRIPT>
<SCRIPT language=JavaScript src="../js/ftiens4.js"></SCRIPT>
<SCRIPT language=JavaScript src="../js/persontreeviewnodes.js"></SCRIPT>
<SCRIPT language=JavaScript src="../js/areacityselector.js"></SCRIPT>
<SCRIPT language=JavaScript src="../js/joball.js"></SCRIPT>
<script language="JavaScript">
function openwin()
  {
    disp=window.open("","rslt","width=500,height=320,resizable=yes");
	disp.focus();
  }
</script>

<body>
<MM:BeginLock translatorClass="MM_SSI" type="ssi_comment" orig="%3C!--#include file=%22../Include/Header_New.asp%22 --%3E" fileRef="../Include/Header_New.asp" depFiles="file:///E|/开发中的项目/东北英才网/wwwroot/Include/Header_New.asp"><table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="105" valign="bottom"><a href="<%= Cls_WebUrl %>" target="_blank"><img src="../Images/Logo.jpg" width="190" height="70" alt="<%= Cls_WebName %>" border="0"></a></td>
    <td valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="24" align="right"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td align="right"><a href="../Index.asp" ><u>首 页</u></a> | <a href="User_Center.asp" ><u>个人服务</u></a> 
                  | <a href="../Company/User_Center.asp" ><u>企业服务</u></a> | <a href="../Video/Index.asp" ><u>视频</u></a> 
                  | <a href="../HeadHunt/Index.asp" ><u>猎头服务</u></a> | <a href="../Part/Index.asp" ><u>兼职信息</u></a> 
                  | <a href="../Public/News.asp?Param=2" ><u>现场</u></a> </td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td align="right"><a href="Index.asp"><u>最新岗位</u></a><br> <a href="../Company/Index.asp"><u>最新求职岗位</u></a> 
                </td>
                <td width="450" align="right"><a href="#" target="_blank"><img src="../Images/banner.gif" width="440" height="60" border="0"></a></td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td height="2"></td>
        </tr>
        <tr> 
          <td height="2"></td>
        </tr>
      </table></td>
  </tr>
</table>
<MM:EndLock>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
 <form action="../Company/Com_Search_Base.asp" method="post" target="_blank" name="theForm">
  <tr>
    <td height="10"></td>
  </tr>
  <tr>
      <td height="25" align="center" bgcolor="f5f5f5"><strong>职位搜索</strong> 
        <select style="width:100px;"  id=select2 
                  name=slt_category>
        </select>
        <select style="width:100px;"  id=select3 
                  name=slt_subcategory>
        </select>
        <select  style="width:100px;" id=slt_workplacearea 
                  name=slt_workplacearea>
        </select>
        <select style="width:100px;" id=select 
                  name=slt_workplacecity>
        </select>
        <select style="width:60px;"  name=publishdate>
          <option value=1>近一天</option>
          <option value=2>近二天</option>
          <option value=3>近三天</option>
          <option value=7>近一周</option>
          <option value=14>近两周</option>
          <option value=30>近一月</option>
          <option value=60>近两月</option>
          <option value=90>近三月</option>
        </select>
        <input name=key style="width:100px;"  id=txt_keyword2 size="16" maxlength=50 >
        <SCRIPT language=JavaScript>
  var objJobCPSelector, objJobCCSelector, objAreaSelector, objCitySelector

  objAreaSelector = new PlaceAssociateList(document.theForm.slt_workplacearea, null, document.theForm.slt_workplacecity, ALOptions);
  objAreaSelector.addedOptions   = new Array("不限-|工作地区不限");
  objAreaSelector.init();
  objCitySelector = new PlaceAssociateList(document.theForm.slt_workplacecity, document.theForm.slt_workplacearea, null, CLOptions);
  objCitySelector.incPValue = true;
  objCitySelector.incPValueFormat = "%PText%－不限"
  objCitySelector.addedOptions   = new Array("不限-不限|不限");
  objCitySelector.init();
  
  objJobCPSelector = new JobCategoryAssociateList(document.theForm.slt_category, null, document.theForm.slt_subcategory, PCLOptions);
  objJobCPSelector.addedOptions   = new Array("0-|职位类别不限");
  objJobCPSelector.init();
  objJobCCSelector = new JobCategoryAssociateList(document.theForm.slt_subcategory, document.theForm.slt_category, null, CCLOptions);
  objJobCCSelector.incPValue = true;
  objJobCCSelector.incPValueFormat = "%PText%－不限"
  objJobCCSelector.addedOptions   = new Array("0-0|不限");
  objJobCCSelector.init();  
                    </SCRIPT>
        <input type="submit" name="Submit3" value=" 搜 索 ">
        <input name="keyclass" type="hidden" id="keyclass" value="1"></td>
  </tr>
 </form>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
 <Form action="" method="post" name="theForm">
<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 
For i = 1 to Psize
 If Rs.Eof Then Exit For
 JobId              = Rs(%22JobId%22)
 Comid              = Rs(%22Comid%22)
 JobName            = Rs(%22JobName%22)
 Work_Area          = Rs(%22Work_Area%22)
 Work_City          = Rs(%22Work_City%22)
 Deal               = Rs(%22Deal%22)
 LastUpdate_Time    = Rs(%22LastUpdate_Time%22)
 Require 			= Left(Rs(%22Require%22),100)&%22...%22
 Number1			= Rs(%22Number%22)	
 '//企业名称
 Vip = 0
 Set Re = Conn.Execute(%22Select CompanyName,Nc_Vip_Flag From [pH_Company_Base] Where Comid='%22&Comid&%22'%22)
 If Not Re.Eof Then
  CompanyName = Re(%22CompanyName%22)
  Vip = Re(%22Nc_Vip_Flag%22)
 End if
 Re.Close
 '//学历要求
 If Edus = 0 Then
  Edus_Str = %22不限%22
 Else
  Edus_Str = Cls_Edus(Rs(%22Edus%22))
 End if
 '//待遇
 If Deal = 0 Then
  Deal_Str = %22面议%22
 Else
  Deal_Str = Deal&%22元%22
 End if
 If Number1 = 0 Then Number1 = %22若干%22
 Vip_Str = %22%22
 If Vip = True Then Vip_Str = %22%3Cimg src=%22%22../Images/Company/Vip.gif%22%22 align=%22%22absmiddle%22%22%3E%22
 %25%3E" ><MM_ASPSCRIPT><MM:EndLock>
  <tr> 
    <td height="30"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td><DIV id=1><img src="../Images/Company.gif" width="20" height="20" align="absmiddle"> 
            <a href="../Company/Info/Com_Job.asp?Comid-<%= Comid %>-Param-<%= Jobid %>.html" target="_blank" class="font-14"><b><font color="#ff3300"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= JobName %25%3E" ><MM_ASPSCRIPT><MM:EndLock></font></b></a></DIV></td>
          <td width="30%" align="right">更新日期：<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= LastUpdate_Time %25%3E" ><MM_ASPSCRIPT><MM:EndLock></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td height="2" bgcolor="#cccccc"></td>
  </tr>
  <tr> 
    <td height="25"><table width="100%" border="0" cellspacing="0" cellpadding="0">
        <tr>
            <td height="25">
<DIV id=1><font color="#0000cc">[企业]</font><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Vip_Str %25%3E" ><MM_ASPSCRIPT><MM:EndLock><a href="../Company/Info/Com_View.asp?Param-<%= Comid %>.html" target="_blank"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= CompanyName %25%3E" ><MM_ASPSCRIPT><MM:EndLock></a> <font color="#0000cc">[人数]</font><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Number1 %25%3E" ><MM_ASPSCRIPT><MM:EndLock>人</DIV></td>
          <td width="30%" align="right">
		  <a href="javascript:" onclick="window.open('Per_SendApplication.asp?ncid=<%= Jobid %>','rslt','width=500,height=320,resizable=yes');"><u>发送求职意向</u></a>
		  <a href="javascript:" onclick="javascript:window.open('Per_Option.asp?param=fav&ncid=<%= Jobid %>','rslt','width=500,height=320,resizable=yes');"><u>收藏该职位</u></a> 
            <a href="javascript:"  onclick="window.open('Per_Friend.asp?ncid=<%= Jobid %>','rslt','width=500,height=320,resizable=yes');" ><u>推荐给好友</u></a></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td height="25"><font color="0000cc">[工作地区]</font><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Work_Area&Work_City %25%3E" ><MM_ASPSCRIPT><MM:EndLock> <font color="0000cc">[学历要求]</font><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Edus_Str %25%3E" ><MM_ASPSCRIPT><MM:EndLock> <font color="0000cc">[薪资待遇]</font><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Deal_Str %25%3E" ><MM_ASPSCRIPT><MM:EndLock></td>
  </tr>
  <tr>
    <td height="25"><DIV id=1><a href="../Company/Info/Com_Job.asp?Comid-<%= Comid %>-Param-<%= Jobid %>.html" target="_blank"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Require %25%3E" ><MM_ASPSCRIPT><MM:EndLock></a></DIV></td>
  </tr>
  <tr> 
    <td height="1" bgcolor="#f5f5f5"></td>
  </tr>
  <tr> 
    <td height="10"></td>
  </tr>
   <input name="ncid" type="hidden" id="ncid" value="<%= JobId %>">
<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25
 Rs.Movenext 
Next
 %25%3E" ><MM_ASPSCRIPT><MM:EndLock> 
 
</Form>
</table>
<table width="99%" border="0" align="center" cellpadding="4" cellspacing="0">
  <tr> 
    <td height="25" align="right">共<Font color="#FF0000"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= RCount %25%3E" ><MM_ASPSCRIPT><MM:EndLock></Font>条 分<Font color="#FF0000"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= PCount %25%3E" ><MM_ASPSCRIPT><MM:EndLock></Font>页 | 当前第<Font color="#FF0000"><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= PageNo %25%3E" ><MM_ASPSCRIPT><MM:EndLock></Font>页 
		  <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 
		  If PageNo %3E 1 Then
		   Response.write %22%3Ca href=%22%22?PageNo=1&slt_subcategory=%22&JobClass&%22&slt_workplacecity=%22&Work1&%22&PublishDate=%22&PublishDate&%22&Edus=%22&Edus&%22&Works=%22&Works&%22&Sex=%22&Sex&%22&Min_Age=%22&MinAge&%22&Max_Age=%22&MaxAge&%22&x_suozaidi=%22&Locus_Area&%22&x_suozaidi1=%22&Locus_City&%22%22%22%3E首页%3C/a%3E&nbsp;%22
		   Response.write %22%3Ca href=%22%22?PageNo=%22&PageNo-1&%22&slt_subcategory=%22&JobClass&%22&slt_workplacecity=%22&Work1&%22&PublishDate=%22&PublishDate&%22&Edus=%22&Edus&%22&Works=%22&Works&%22&Sex=%22&Sex&%22&Min_Age=%22&MinAge&%22&Max_Age=%22&MaxAge&%22&x_suozaidi=%22&Locus_Area&%22&x_suozaidi1=%22&Locus_City&%22%22%22%3E上页%3C/a%3E&nbsp;%22    
		  Else
		   Response.write %22首页&nbsp;%22
		   Response.write %22上页&nbsp;%22 
		  End if
		   %25%3E" ><MM_ASPSCRIPT><MM:EndLock>
           <select name="menu1" onChange="MM_jumpMenu('parent',this,0)" style="width:40px;">
		    <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 For i = 1 to PCount %25%3E" ><MM_ASPSCRIPT><MM:EndLock>
                <option value="?PageNo=<%= i %>&slt_subcategory=<%= JobClass %>&slt_workplacecity=<%= Work1 %>&PublishDate=<%= PublishDate %>&Edus=<%= Edus %>&Works=<%= Works %>&Sex=<%= Sex %>&Min_Age=<%= MinAge %>&Max_Age=<%= MaxAge %>&x_suozaidi=<%= Locus_Area %>&x_suozaidi1=<%= Locus_City %>" <% If i = PageNo Then Response.write "Selected"%>><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25=i%25%3E" ><MM_ASPSCRIPT><MM:EndLock></option>
		    <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 Next %25%3E" ><MM_ASPSCRIPT><MM:EndLock>
           </select>
            <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 
		  If PageNo %3C PCount Then
		   Response.write %22%3Ca href=%22%22?PageNo=%22&PageNo+1&%22&slt_subcategory=%22&JobClass&%22&slt_workplacecity=%22&Work1&%22&PublishDate=%22&PublishDate&%22&Edus=%22&Edus&%22&Works=%22&Works&%22&Sex=%22&Sex&%22&Min_Age=%22&MinAge&%22&Max_Age=%22&MaxAge&%22&x_suozaidi=%22&Locus_Area&%22&x_suozaidi1=%22&Locus_City&%22%22%22%3E下页%3C/a%3E&nbsp;%22
		   Response.write %22%3Ca href=%22%22?PageNo=%22&PCount&%22&slt_subcategory=%22&JobClass&%22&slt_workplacecity=%22&Work1&%22&PublishDate=%22&PublishDate&%22&Edus=%22&Edus&%22&Works=%22&Works&%22&Sex=%22&Sex&%22&Min_Age=%22&MinAge&%22&Max_Age=%22&MaxAge&%22&x_suozaidi=%22&Locus_Area&%22&x_suozaidi1=%22&Locus_City&%22%22%22%3E尾页%3C/a%3E%22   
		  Else
		   Response.write %22下页&nbsp;%22
		   Response.write %22尾页%22 
		  End if
		   %25%3E" ><MM_ASPSCRIPT><MM:EndLock>

    </td>
  </tr>
</table>
<SCRIPT language=javascript>
window.onload	=	function(){HigheLine("<%= Key %>");}
</SCRIPT>
<MM:BeginLock translatorClass="MM_SSI" type="ssi_comment" orig="%3C!--#include file=%22../Include/Footer_New.asp%22 --%3E" fileRef="../Include/Footer_New.asp" depFiles="file:///E|/开发中的项目/东北英才网/wwwroot/Include/Footer_New.asp">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr> 
    <td><hr size="1" color="#cddade"></td>
  </tr>
  <tr> 
    <td align="center">
	<a href="../Public/About.asp" ><u>关于我们</u></a> 
	| <a href="../Public/Flow.asp" ><u>流程</u></a> 
    | <a href="../Public/Expense.asp" target="_blank" ><u>服务价格</u></a> 
	| <a href="../Public/Pay.asp" target="_blank" ><u>付款方式</u></a> 
    | <a href="../Public/Contact.asp" ><u>联系我们</u></a> 
	| <a href="../Public/Agent.asp" ><u>招商代理</u></a> 
    | <a href="../Club/club_list.asp?classid=15" ><u>投诉建议</u></a> 
	| <a href="../Public/Link.asp" ><u>友情连接</u></a> 
      <BR>
      Copyright(C) 2005 - 2010 <MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_Domain %25%3E" ><MM_ASPSCRIPT><MM:EndLock> All Rights Reserved<br> <a href="<%= Cls_WebUrl %>"><font color=#000000><u><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_WebName %25%3E" ><MM_ASPSCRIPT><MM:EndLock></u></font></a> 
      版权所有 <a href="#" target="_blank"><Font color=#000000><MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_Icp %25%3E" ><MM_ASPSCRIPT><MM:EndLock></Font></a><br>
      客服电话：<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_Phone %25%3E" ><MM_ASPSCRIPT><MM:EndLock> 传 真：<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25= Cls_Fax %25%3E" ><MM_ASPSCRIPT><MM:EndLock><br>
      未经徽府英才系统同意，不得转载本网站之所有信息及作品 </td>
  </tr>
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>

<MM:EndLock></td>

</body>
</html>
<MM:BeginLock translatorClass="MM_ASPSCRIPT" type="script" depFiles="" orig="%3C%25 
Rs.Close
Set Rs = Nothing
Call CloseDB
 %25%3E" ><MM_ASPSCRIPT><MM:EndLock>