当前位置: 首页 -> 新闻中心 -> 媒体聚焦
 
  新闻标题 日  期
  <%%> <% Set rs = Server.CreateObject("ADODB.Recordset") sql="select Title,ID,AddDate,Hits from News where SmallClassName='媒体聚焦' order by AddDate desc" rs.open sql,conn,1,1 rs.PageSize =10 Page = CLng(Request("Page")) '分页显示 If not Page >1 Then Page = 1 If Page > rs.PageCount Then Page = rs.PageCount j=page+(page-1)*9 rs.AbsolutePage = Page For i=1 To rs.PageSize if rs.eof then exit for %> <%rs.movenext next %>
" target="_blank" class="cl1"><%=left(rs("Title"),25)%> <%=rs("AddDate")%>
<%%>
  <%%>
<%=Page%>/<%=rs.PageCount%>  [首页 尾页] [上一页 下一页]  转到第
<%%>
 
<% rs.close set rs=nothing call CloseConn() %>