<!--#include file="Conn.asp" -->
<!--#include file="Comm/Site_Class.asp" -->

<%
Set Qsite = New Site_Class
Qsite.SiteConfig()
Qsite.GotoErrPage()
Dim Rs,rss,i
%>

<TITLE>职场资讯 - <%=Qsite.SiteName%></TITLE>
<meta name="keywords" content="职场资讯，职场礼仪，职场法则，职场故事" />
<meta name="description" content="中易招聘为您提供职场资讯，职场礼仪，职场法则，职场故事，求职技巧等方面的资讯信息！" />
<div align="center">
  <div style=" width:960px; height:auto; background-color:#FFF;"> 
    <!--#include file="header.asp" -->
    <link href="css/News.css" rel="stylesheet" type="text/css" />
    <div class="center_zczx">
      <div class="zczx_left">
        <%
'1级栏目
set rs = server.CreateObject("adodb.recordset")
rs.open "select NewsTypeId,NewsTypeName from NewsTypeTbl",conn,1,1
if rs.eof then
response.Write("暂无任何分类")
else
do while not rs.eof
%>
<div class=" News_Left">
        <div class="News_fenlei ">
         <div class="fl_title "><div class="fl_biaoti"><a href="news_more.asp?id=<%=rs("NewsTypeId")%>"><%=rs("NewsTypeName")%></a></div><div class="fl_kz yanse2"><a href="news_more.asp?id=<%=rs("NewsTypeId")%>">+更多</a></div></div>
          <div class="news_info yanse">
            <ul>
              <%
		'1级栏目内容
		set rss = server.CreateObject("adodb.recordset")
		rss.open "select top 8 Newsid,newsTitle,adddate from newsTbl where newsTypeId = "&rs("NewsTypeId")&" order by adddate desc",conn,1,1
		do while not rss.eof 
	%>
              <li><span style="float:right; color:#999;"><%=formatDateTime(rss("addDate"),2)%></span>·<a href="news.asp?id=<%=rss("newsId")%>" title="<%=rss("newsTitle")%>"><%=left(rss("newsTitle"),12)%></a></li>
              <%
		rss.movenext
		loop
		rss.close
		set rss = nothing
	%>
            </ul>
            <div style="clear:both"></div>
          </div>
        </div>
        <div style="clear:both"></div>
        </div>
        <%
	rs.movenext
	loop
	end if
	rs.close
	set rs = nothing
	%>
        <div style="clear:both"></div>
      </div>
      
      <div class="zczx_right">
        <div class="zczx_right_box">
        <div id ="zczx_right_title">点击排行</div>
        <ul class="zxcx_right_list yanse">
          <%
	Set rs = server.CreateObject("adodb.recordset")
   rs.Open "select NewsId,newsTitle,clicknum from NewsTbl order by clicknum desc", conn, 1, 1
	i = 1
    Do While Not rs.EOF
	i=i+1
%>      
     <li> <span style=" color:#999;"><%=rs("clicknum")%></span> <a href="News.asp?Id=<%=Rs("NewsId")%>" target="_blank"><%=left(Rs("NewsTitle"),13)%></a> </li>
          
            <%
    rs.movenext
	if i >8 then exit do
    Loop
    rs.Close
    Set rs = Nothing
%>
</ul>
     <div style="clear:both"></div>
   </div>
        <div class="zczx_right_box">
         <div id ="zczx_right_title">最新资讯</div>
         <ul class="zxcx_right_list yanse">
          <%
Set rs = server.CreateObject("adodb.recordset")
 
    rs.Open "select top 8 * from NewsTbl order by AddDate desc", conn, 1, 1
    Do While Not rs.EOF
%>
          
            <li> <span style="float:right;color=#999"><%=FormatDateTime(Rs("AddDate") , 2)%></span> <a href="News.asp?Id=<%=Rs("NewsId")%>" target="_blank"><%=left(rs("NewsTitle"),13)%></a> </li>
          
          <%
    rs.movenext
    Loop
    rs.Close
    Set rs = Nothing
%>
</ul>
          <div style="clear:both"></div>
        </div>
        <div style="clear:both"></div>
      </div>
      <div style="clear:both"></div>
    </div>
    
    <!--#include file="foot.asp" -->
    <div style="clear:both"></div>
  </div>
</div>
