<%
set rs_news=server.CreateObject("adodb.recordset")
sql_news="select * from ["&Table_Small&"] where title_id=1 order by Order_id desc"
'response.Write(sql_news)
rs_news.open sql_news,conn,1,3
if rs_news.eof then
All_rs_news_num=0
else
All_pic_num=rs_news.recordcount
rs_news.pagesize=6
curpage=Request.QueryString("curpage")
if curpage="" or curpage=0 then
curpage=1
end if
rs_news.absolutepage=curpage
for i= 1 to rs_news.pagesize
if rs_news.eof then
exit for
end if
%>
