<!--#include file="Include/Const.Asp" -->
<!--#include file="Include/NoSQL.Asp" -->
<!--#include file="Include/ConnSiteData.Asp" -->
<%
Call SiteInfo()
If ISHTML = 1 Then
    Response.expires = 0
    Response.expiresabsolute = Now() - 1
    Response.addHeader "pragma", "no-cache"
    Response.addHeader "cache-control", "private"
    Response.CacheControl = "no-cache"
End If
If request.QueryString("ID") = "" Then
    SeoTitle = "关于我们"
ElseIf Not IsNumeric(request.QueryString("ID")) Then
    SeoTitle = "参数错误"
ElseIf conn.Execute("select * from Shenbi_Jobs Where ViewFlag and  ID="&request.QueryString("ID")).EOF Then
    SeoTitle = "参数错误"
Else
    Set rs = server.CreateObject("adodb.recordset")
    sql = "select * from Shenbi_Jobs where ViewFlag and ID="&request.QueryString("ID")
    rs.Open sql, conn, 1, 1
    SeoTitle = rs("JobName")
    rs.Close
    Set rs = Nothing
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=utf-8" />
<title>招聘信息：<% =SeoTitle %> - <% =SiteTitle %></title>
<meta name="keywords" content="<% =Keywords %>" />
<meta name="description" content="<% =Descriptions %>" />
</head>
<!--#include file="Top.Asp" -->
<table width="998" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td align="left" valign="top"><table width="228" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:10px;">
        <tr>
          <td height="29" align="left" valign="middle" background="/template/shenbi_bz/images/cpfltop.jpg" style="padding:0 11px 0 39px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td align="left" valign="middle" class="titlewhite">当前分类</td>
               
              </tr>
          </table></td>
        </tr>
        <tr>
          <td align="left" valign="top" bgcolor="#FFFFFF" class="border-l-r" style="padding:12px 12px 6px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<%=WebMenu()%> 
          </table></td>
        </tr>
        <tr>
          <td align="left" valign="top"><img src="/template/shenbi_bz/images/cpflxia.jpg" width="228" height="6" /></td>
        </tr>
      </table>
<!--#include file="new_left.Asp" -->
</td>
    <td align="right" valign="top"><table width="755" border="0" cellspacing="0" cellpadding="0" style="margin-bottom:10px;">
      <tr>
        <td height="30" align="left" valign="middle" background="/template/shenbi_bz/images/jpcptop.jpg" style="padding-left:42px; padding-right:15px;"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td align="left" valign="middle" class="titlewhite">招聘信息</td>
              <td align="right" valign="middle" class="pink"><%=WebLocation()%></td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td align="left" valign="top" bgcolor="#FFFFFF" class="border-l-r" style="padding:20px 15px 15px;"><div class="deepgray"><%=WebContent("Shenbi_Jobs",request.QueryString("ID"))%></div></td>
      </tr>
      <tr>
        <td align="left" valign="top"><img src="/template/shenbi_bz/images/jpcpxia.jpg" width="755" height="10" /></td>
      </tr>
    </table>
    </td>
  </tr>
</table>

</div>

<!--#include file="End.Asp"-->
<%
Function WebMenu()
            response.Write "<tr>"
            response.Write "<td height=""31"" align=""left"" valign=""middle""><a href=""JobClass.html"" class=""cpfenlei"">招聘信息</a></td>"
            response.Write "</tr>"
			response.Write "<tr>"
            response.Write "<td height=""31"" align=""left"" valign=""middle""><a href=""MemberTalent.Asp"" class=""cpfenlei"">我的应聘</a></td>"
            response.Write "</tr>"
End Function

Function WebLocation()
    WebLocation = "&nbsp;当前位置：<a href=""index.html"" class=""pink"">首页</a> - <a href=""JobClass.html"" class=""pink"">招聘信息</a>"&vbCrLf
End Function

Function WebContent(DataFrom, ID)
    If ID = "" Or Not IsNumeric(ID) Then
        response.Write "<div class=""Bodyer_right_page_content"">信息ID读取错误</div>"
    ElseIf conn.Execute("select * from "&DataFrom&" Where ViewFlag and  ID="&ID).EOF Then
        response.Write "<div class=""Bodyer_right_page_content"">信息ID读取错误</div>"
    Else
        Dim rs, sql
        Set rs = server.CreateObject("adodb.recordset")
        sql = "select * from "&DataFrom&" where ViewFlag and ID="&ID
        rs.Open sql, conn, 1, 3
        Response.Write "<table width=""95%"" border=""1"" align=""center"" cellpadding=""7"" cellspacing=""0"" bordercolor=""#D5D3D4"" style=""border-collapse:collapse"">"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td height=""22"" colspan=""4""  style=""color: #FFFFFF; background-color:#2585a6"" align=""center""><span style=""font-weight: bold; font-size: 14px"">"&rs("JobName")&"</span> 职位的详细信息</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">工作地点：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&rs("JobAddress")&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">招聘人数：</td>"&vbCrLf
        Response.Write "    <td width=""35%"">"&rs("JobNumber")&"人</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr bgcolor=""#F7F7F7"">"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">薪酬待遇：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&rs("Emolument")&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">有效时间：</td>"&vbCrLf
        Response.Write "    <td width=""35%"">"&FormatDate(rs("StartDate"), 13)&" 至 "&FormatDate(rs("EndDate"), 13)&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">招聘单位：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&rs("eEmployer")&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">联 系 人：</td>"&vbCrLf
        Response.Write "    <td width=""35%"">"&rs("eContact")&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr bgcolor=""#F7F7F7"">"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">联系电话：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&rs("eTel")&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">详细地址：</td>"&vbCrLf
        Response.Write "    <td width=""35%"">"&rs("eAddress")&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">邮政编码：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&rs("ePostCode")&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">电子邮箱：</td>"&vbCrLf
        Response.Write "    <td width=""35%"">"&rs("eEmail")&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr bgcolor=""#F7F7F7"">"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">更新时间：</td>"&vbCrLf
        Response.Write "    <td width=""35%"" align=""left"">"&FormatDate(rs("UpdateTime"), 13)&"</td>"&vbCrLf
        Response.Write "    <td width=""15%"" align=""right"">浏览次数：</td>"&vbCrLf
        Response.Write "    <td width=""35%""><script language=""javascript"" src=""HitCount.Asp?id="&rs("ID")&"&LX=Shenbi_Jobs""></script><script language=""javascript"" src=""HitCount.Asp?action=count&LX=Shenbi_Jobs&id="&rs("ID")&"""></script></td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td align=""right"">工作职责：</td>"&vbCrLf
        Response.Write "    <td colspan=""3"" align=""left"">"&HtmlStrReplace(rs("Responsibility"))&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr bgcolor=""#F7F7F7"">"&vbCrLf
        Response.Write "    <td align=""right"" valign=""top"">职位要求：</td>"&vbCrLf
        Response.Write "    <td colspan=""3"" align=""left"">"&HtmlStrReplace(rs("Requirement"))&"</td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "  <tr>"&vbCrLf
        Response.Write "    <td colspan=""4"" align=""center""><a href=""TalentWrite.Asp?JobID="&ID&"&JobName="&server.urlencode(rs("JobName"))&""" title=""提交简历"" ><img src=""Images/Page_resume.gif"" border=""0"" /></a></td>"&vbCrLf
        Response.Write "  </tr>"&vbCrLf
        Response.Write "</table>"&vbCrLf
        rs.update
        rs.Close
        Set rs = Nothing
    End If
End Function
%>