<%
set rs=server.createobject("adodb.recordset")
’response.write(xinwen)
if id="" then
sql="select * from news where id<>0 order by idate desc"
elseif id<>"" then
sql="select * from news where id=’"&id&"’ order by id asc"
end if
rs.Open sql,conn,1,1
if rs.eof then
response.write ""
else
rs.movefirst
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=9
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
rs.AbsolutePage=pagecount
%>
