<%
sql1="select top 10 articleid,title,dateandtime,hits from learning order by hits DESC"
Set rstop= Server.CreateObject("ADODB.Recordset")
rstop.open sql1,conn,1,1
do until rstop.eof
for i=1 to 10
%>
<tr>
<td height="19"><img height=16
src="images/make/arrow.gif" width=16 border=0><a href="javascript:popwin2(<%=rstop("articleid")%>)"><%=i%><%=rstop("title")%><%=formatdatetime(rstop("dateandtime"),2)%></a></td>
<%