playtop.asp

俄罗斯方块源码 俄罗斯方块源码 俄罗斯方块源码

<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<%
dim i,bgcolor,maxnum:i=1:maxnum=50
set rs=conn.execute("select top "&maxnum&" * from flash where ispassed=true order by hits desc")


%>
<TABLE width=780 height=85 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TR> 
    <TD width="190" vAlign=top bgcolor="#F7F7F7"><!--#include file="left.asp"--></TD>
    <TD vAlign=top align=right width=1 background=images/bg_vline.gif></TD>
    <TD width="570" vAlign=top bgcolor="#FFFFFF">
<TABLE align=center 
      background="images/line01.gif" 
      border=0 cellPadding=0 cellSpacing=0 height=24 width="100%">
        
          <TR> 
            
          <TD height=21 width="53%">&nbsp;<IMG height=12 src="images/A3.gif" width=12> 
            当前位置：<A href="index.asp" title="联盟首页">闪闪之家</A> -&gt; Flash人气排行榜</TD>
            <TD height=21 width="47%">&nbsp;</TD>
          </TR>
        
      </TABLE> 
      <table width="200%" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td>&nbsp;</td>
        </tr>
      </table>
      <TABLE align=center border=0 borderColor=#000000 cellPadding=0 
      cellSpacing=0 width="99%">
        
          <TR> 
            <TD 
          background="images/T_back.gif" 
          width="18%"><IMG src="images/T_1.gif" width=90 height=24 border="0"></TD>
            
          <TD 
          background="images/T_back.gif" 
          width="77%">　Flash　作 品 观 看 次 数 前 <font color="#FF0000"><%=maxnum%></font> 
            名</TD>
            <TD width="5%"><IMG height=24 src="images/T_2.gif" width=29></TD>
          </TR>
        
      </TABLE>
	  
      <TABLE align=center bgColor=#cccccc border=0 cellPadding=3 cellSpacing=1 width="99%" 1 border-width:>
        <%
        do until rs.eof or i>maxnum
		  if i mod 3=0 then
		    bgcolor="#FFFBFF"
		  else
		    bgcolor="#FFFFFF"
	      end if
        %>
        <TR> 
          <TD bgColor=<%=bgcolor%>>　　<IMG src="images/a8.gif" width=9 height=9 align="absmiddle">　 
            <%
			response.write "<a href='flash_play.asp?id="&rs("id")&"' title='点击欣赏Flash作品...' target=_blank>"&rs("flashname")&"</a>&nbsp;&nbsp;<a href='showuser.asp?username="&rs("username")&"' title='查看作者："&rs("username")&" 的详细信息！' target=_blank>"&rs("username")&"</a>&nbsp;&nbsp;"&formatdatetime(rs("dateandtime"),2)&"&nbsp;|&nbsp;<font color=red>"&rs("hits")&"</font>"
			%>
          </TD>
        </TR>
        <%
         rs.movenext
         i=i+1
         loop
		 rs.close
		 set rs=nothing
        %>
      </TABLE>
      
    </TD>
  </TR>
</TABLE>
<!--#include file="bottom.asp"-->