<!--#include file="include/Infile_Config.asp"-->
<%
Call Meta_Top(18,3)
%><div id="wrapper">
  <%Call PageTop()%>
  <div id="page_main" class="clearfix">
    <div class="page-right">
      <div class="site-nav"><%=PageNav(MenuID)%></div>
      <div class="page-news">
      <table border="0" align="center">
      <tr><th class="news-time"><%=Text_News_Time%></th><th class="news-title"><%=Text_News_Title%></th></tr>
<%
Set Page = new Cls_Page
Set Page.Conn = conn
With Page
	.PageSize = 10
	.PageParm = "page"
	.Database = "ac"
	.Pkey="ID"
	.Field="ID,Title,Time_Add"
	.Table=Menu_MDB
	if isNul(SearchKeyWord) then
	.Condition="Menu_ID in ("&ListAll_ID&")"
	else
	.Condition="Menu_ID in ("&ListAll_ID&") and Title like '%"&SearchKeyWord&"%'"
	end if
	.OrderBy="Recommend desc,Hand_ID desc,ID desc"
	.RecordCount = 0
	.NumericJump = 5
	.Template = "<div class=""page_list""><div class=""list_info"">{$FirstPage}{$PreviousPage}{$NumericPage}{$NextPage}{$LastPage}</div></div>"
	.FirstPage = "&nbsp;&lt;&lt;&nbsp;"
	.PreviousPage = "&nbsp;&lt;&nbsp;"
	.NextPage = "&nbsp;&gt;&nbsp;"
	.LastPage = "&nbsp;&gt;&gt;&nbsp;"
	.NumericPage = "{$PageNum}"
End With
rs = Page.ResultSet()
nav = Page.Nav()
If IsNull(rs) Then
%>      <tr><td colspan="2" align="center"><%=Text_InfoNone%></td></tr>
<%
Else
	For i=0 To Ubound(rs,2)
%>      <tr><td class="time-list"><span><%=Format_Time(rs(2,i),2)%></span></td><td><a href="<%=PageLink_Detail%>?ID=<%=rs(0,i)%>" title="<%=rs(1,i)%>" target="_blank"><%=Cut_ShortTitle(rs(1,i),78)%></a></td></tr>
<%
	Next
End If
%>      </table>
      <%Response.Write nav%>
      </div>
    </div>
    <%Call PageLeft()%>
  </div>
  <div id="copyright">
    <%Call PageFoot()%>
  </div>
</div>
</body>
</html>