<%=wznames%>

<% keys=165 ids="" call lids(keys) ids=keys&ids rs.open "select * from "&tables&" where lid in("&ids&") order by id desc",conn,1,1 if rs.recordcount=0 then Response.Write "

暂时无信息

" else rs.pagesize=46 page=clng(request.QueryString("page")) if page<1 then page=1 if page>rs.pagecount then page=rs.pagecount rs.absolutepage=page j=1 for i = 1 to rs.pagesize %>

" target="_blank"><%=left(rs("title"),46)%>

<%=rs("shijian")%>

<% rs.movenext if rs.eof then exit for next %>

<% if page=1 then response.Write("首页") else response.Write("首页") end if if page=1 then response.Write(" 上一页") else response.Write(" 上一页") end if if page=rs.pagecount then response.Write(" 下一页") else response.Write(" 下一页") end if if page=rs.pagecount then response.Write(" 末页") else response.Write(" 末页") end if %> <%=page%>/<%=rs.pagecount%>页共<%=rs.recordcount%>条记录！第页

<%if n=1 then%><%end if%>

<% end if %>