<!--#include file= "conn.asp"-->
<! DOCTYPE HTML PUBLIC "-//W3C//DTD XHTML 1.0 transitional//en" "Http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd ">
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 "/>
<title></title>
<meta name= "keywords" content= ""/>
<meta name= "description" content= ""/>
<link href= "" rel= "stylesheet" type= "Text/css"/>
<style type= "Text/css" >
<!--
#web {margin-left:auto; margin-right:auto; width:600px; height:auto; text-align:left; margin:0 Auto}
. A {float:left; width:100%; height:auto; border:1px solid #CCC; background: #F8F8F8;}
. A ul {float:left; list-style-type:none;}
. A li {margin-top:8px; margin-bottom:8px;}
. B {float:left; width:100%; height:100px;}
-->
</style>
<body>
<div id= "Web" >
<div class= "A" >
<ul>
<%
I=0
Set Rs=server.createobject ("Adodb.recordset")
sql = "SELECT * from Table order by date Desc"
Rs.Open sql,conn,1,1
If Rs.eof Then
%>
No articles
<%
Else
Do as not rs.eof
%>
<li><a href= "<%=rs (" path ")%>" target= "_blank" ><%=rs ("title")%></a></li>
<%
I=i+1
If I>=8 then Exit Do ' show bar number
Rs.movenext
Loop
End If
Rs.close
%>
</ul>
</div>
<!--advertising-->
<div class= "B" ><br/> advertising position </div>
<div class= "A" >
<ul>
<%
I=0
Set Rs=server.createobject ("Adodb.recordset")
sql = "SELECT * FROM table where auto-Arrange field" (select Top 10 auto-arrange fields from table order by date Desc) Order by date Desc "
Rs.Open sql,conn,1,1
If Rs.eof Then
%>
No articles
<%
Else
Do as not rs.eof
%>
<li><a href= "<%=rs (" path ")%>" target= "_blank" ><%=rs ("title")%></a></li>
<%
I=i+1
If I>=8 then Exit Do ' show bar number
Rs.movenext
Loop
End If
Rs.close
%>
</ul>
</div>
</div>
</body>