<% mmm=request("mmm") if mmm="" then mmm=0 ttt=request("ttt") set rs=server.createobject("adodb.recordset") sql="select * from article where shenghe=1 and typeid="+cstr(ttt)+" order by dateandtime desc" rs.open sql,conn,1,1%>


<% i=i+1 rs.movenext if i=35 then exit do loop %>

标 题

加入日期

<% if mmm<>0 then for iisf=1 to mmm *35 if rs.eof then exit for rs.movenext next end if do while not rs.eof %>
 /<%=rs("N_Fname")%>" target=\"_blank\" >·<%=rs("title")%> <%=rs("dateandtime")%>

<%if mmm<>0 then%> <%="上页"%> <%end if%> <%if not rs.eof then%> <%="下页"%> <%end if%>

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