代码如下:<% page=trim(request(“page”)) maxperpage=40 first=true last=true dim rs set rs=server.CreateObject(“adodb.recordset”) sql=”select id,title,add1,cartype,isred,enterdate,hits from newnews where classtype=0 and pass=1 order by id desc” rs.open sql,c
