首页 <% set rsm=server.createobject("adodb.recordset") exec="select * from menu order by id desc" rsm.open exec,conn,1,1 do while not rsm.eof %> - "><%=rsm("title")%> <% Rsm.movenext Loop rsm.close set rsm=nothing %> - 评选排行 - 官方网站

<% page=clng(request("page")) sql="select * from Info" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 rs.PageSize=15 if page=0 then page=1 pages=rs.pagecount if page > pages then page=pages rs.AbsolutePage=page for j=1 to rs.PageSize %> <% if (j mod 5)=0 Then response.write "" end if rs.movenext if rs.eof then exit for next %>

<%=Description%>

" target="_blank"> width="150" height="150" border=0 alt="<%=rs("title")%>"> " onClick="choosepro(this)"/> <%=left(rs("title"),10)%> 票数：<%=rs("ps")%> 人气：<%=rs("rq")%> ">投票支持 " target="_blank">详细信息

验证码：

<%if Page<2 then response.write "首页 上一页 " else response.write " 首页 " response.write " 上一页 " end if if rs.pagecount-page<1 then response.write " 下一页 尾页 " else response.write " " response.write "下一页 尾页 " end if response.write " 页次："&Page&"/"&rs.pagecount&"页 " response.write " 共"&rs.recordcount&"条记录 "&rs.pagesize&"条/页" response.write " 转到：" response.write " " %>

<% rs.close set rs=nothing conn.close set conn=nothing %>

重庆新东方 <%=Copyright%>