%
Const NClassID=1
Const ClassID=1
call DataConn()
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from article where nclassid="&NClassID&" and classid="&ClassID&" order by id desc",conn,1
dim orderpagecount,ordercount,curpage,pagesize2,linkfile
pagesize2=6
rs.pagesize=pagesize2
ordercount=rs.recordcount
curpage=Request.QueryString("page")
if curpage="" then curpage=1
orderpagecount=rs.pagecount
%>