www.gusucode.com > 黑鹰自助链管理系统 1.1 商业版码程序 > newstop.asp
<!--#include file="mdb.asp"--> <link rel="stylesheet" href="css/style.css"> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <% set rsDe=server.createobject("adodb.recordset") sql= "select * from detail where verity=1 order by yl_dayin desc" 'response.write sql rsDe.open sql,conn,1,1 %> <style type="text/css"> <!-- body { margin-left: 0px; margin-top: 0px; margin-right: 0px; margin-bottom: 0px; } --> </style><table width=100% height=4 border=0 cellpadding=3 cellspacing=1 bgcolor="#F4FEEF"> <tr><% n=1 While Not rsDe.Eof and n<19 %> <td bgcolor="#FFFFFF" width="50%"><a href='showurl.asp?id=<%=rsDe("id")%>' target='_blank' style="font-size:12px" title="<%=rsDe("title")%>"><%=left(rsDe("title"),5)%></a>(<%=rsDe("yl_dayin")%>0)<% if n mod 2 =0 then Response.Write("</td></Tr>") end if rsDe.MoveNext n=n+1 Wend rsDe.close set rsDe=nothing %> </table>