<% Set jyrcw = New Site_Class Jyrcw.SiteConfig() Jyrcw.GotoErrPage() Dim CurrentPage,FileName Dim TodayDate,strDate,strIsLockId,tdcss Dim strSelComId,newsssa,qiyess,keyword %> <% If Request.Form <> "" Then Response.Redirect("news.asp?newsssa="& Request.Form("newsssa") & "&qiyess=" & Request.Form("qiyess") & "&keyword=" & Request.Form("keyword")) End if newsssa = Jyrcw.chgStr(Trim(Request.QueryString("newsssa"))) if newsssa="" then newsssa=1 end if qiyess = Jyrcw.chgStr(Trim(Request.QueryString("qiyess"))) keyword = Jyrcw.chgStr(Trim(Request.QueryString("keyword"))) if keyword="请输入关键字" then keyword="" end if FileName="news.asp?newsssa="&newsssa& "&qiyess=" &qiyess & "&keyword="&keyword&"&" %> <%=jyrcwfzmc%>_新闻中心 <%if jyrcwfenzhanmbxz=2 then%><%else%><%if jyrcwfenzhanmbxz=1 then%><%else%><%if jyrcwwzbj=0 then%><%else%><%end if%><%end if%> <%end if%> <%if jyrcwfenzhanmbxz=1 then%><%end if%> <%if jyrcwfenzhanmbxz=2 then%><%end if%> <%if jyrcwfenzhanmbxz=0 then%>
<%=jyrcwzygjc%> -为求职者每天提供<%=jyrcwfzdq%>最新招聘信息。<%=jyrcwfzmc%>招聘热线:<%=jyrcwfenzhanlxdh%>
<%end if%> <%if jyrcwfenzhanmbxz=1 then%> <%end if%> <%if jyrcwfenzhanmbxz=2 then%> <%end if%>
    您的位置:<%=jyrcwfzmc%> >> 资讯中心 >>
    <% set rs=server.createobject("adodb.recordset") if qiyess="" then sql="select * FROM NewsTbl where NewsTitle<>'' "&jyrcwzxdq&" order by AddDate desc" else if qiyess=1 then sql="select * FROM NewsTbl where NewsTitle<>'' "&jyrcwzxdq&" and NewsTypeId like '%"& newsssa &"%' and NewsTitle like '%"& keyword &"%' order by AddDate desc" end if if qiyess=0 then sql="select * FROM NewsTbl where NewsTitle<>'' "&jyrcwzxdq&" and NewsTypeId like '%"& newsssa &"%' and NewsContent like '%"& keyword &"%' order by AddDate desc" end if end if Rs.Open Sql , Conn , 1 , 1 If Rs.Eof Then %> <% Else Rs.PageSize = 20 CurrentPage = Clng(Request("page")) If CurrentPage < 1 Then CurrentPage = 1 If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount Rs.AbsolutePage = CurrentPage i = 0 Do While Not Rs.Eof %>
  • <%=jyrcwwzhz%>" target="_blank" style="text-decoration:none; color:#333333;">·<%=rs("NewsTitle")%>  <%=Jyrcw.FormatDatee(Rs("AddDate"),2)%>
  • <% i = i + 1 Rs.MoveNext If i >= Rs.PageSize Then Exit Do Loop %>
  • <% Jyrcw.Page_Cnnn CurrentPage , Rs.PageCount , Rs.RecordCount , FileName %>  转到
  • <% End If Rs.Close %>
   新闻分类