index_soft.asp

一个很COOL的按钮FLASH,满不错的!

<%sub index_soft()
opendown
sql="select top "&indexsoft&" soft_id,soft_name,soft_joindate,soft_dcount,soft_rcount from soft order by soft_joindate DESC"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<table width="554" border="1" align="center" cellpadding="0" cellspacing="0" bordercolorlight="#dddddd" bordercolordark="#FFFFFF">
<tr><td  height=30 background=images/anbg2.gif style="border:1px solid #CCCCCC; ">&nbsp;&nbsp;：：：资 源 下 载 ：：：</td></tr>
<tr><td>
<table width="100%" border="0"  cellspacing="0" cellpadding="4" align="center">
<%do while not rs.eof%>
<tr>
<td class="chinese" width="6%" align="center" height="25"><img src="images/biao.gif"></td>
<td height="27" class="chinese"><a href="showsoft.asp?soft_id=<%=rs("soft_id")%>"  title="软件名称：<%=rs("soft_name")%>&#10;下载情况：已经被下载<%=rs("soft_dcount")%>次"><%=rs("soft_name")%></a>&nbsp;[<font color="#ff6600"><%=rs("soft_dcount")%></font>/<font color="#ff6600"><%=rs("soft_rcount")%></font>] (<%=rs("soft_joindate")%>)</td>
</tr>
<tr>
<td height="1" colspan="2" background="images/dotlineh.gif"></td>
</tr>
<%rs.movenext
loop
if rs.eof and rs.bof then%>
<tr>
<td align="center" colspan="2">正在更新之中........</td>
</tr>
<%end if%>
<%if not rs.eof or not rs.bof then%>
<tr>
<td colspan="2" align="right" class="chinese"><font color=#dddddd>西部设计出品&nbsp;必是精品…</font>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="download.asp"><img src="images/bottom.gif" border="0" alt="更多下载"></a>
</td>
</tr>
<%end if%>
</table>
</td></tr></table>
<br>
<%
rs.close
set rs=nothing
end sub
%>