📄 index.asp
字号:
%>
</table>
<table bgcolor="#EEEEEE" border="0" cellpadding="0" cellspacing="0" width="468%" align="center" height="15">
<tr>
<td height="15" width="100%"> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</TD></TR>
<tr>
<TD>
<hr size="0">
</TD>
</tr>
<TR>
<TD valign="middle" align="center">
<table border="0" cellpadding="0" cellspacing="0" width="395">
<tr bgcolor="#999999">
<td colspan="5" valign="top" align="middle">
<table border="0" cellpadding="0" cellspacing="0" width="468" align="center">
<tr>
<td bgcolor="#ffffff" height="67" width="395" valign="top">
<table border="0" cellpadding="0" width="100%" height="20">
<tr>
<%
sql="select top 10 "
sql=sql&"download.id,download.showname,download.dateandtime,download.hits,download.hots,download.classid,download.Nclassid,Nclass.Nclass "
sql=sql&" from download,Nclass where download.hots=1 and download.Nclassid=Nclass.Nclassid "
sql=sql&" order by download.id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<td>没有推荐软件 <%else%>
<%do while not rs.eof%>
<td width="4%" height="22">
<p align="center"><img border="0" height="7" src="images/dot1.gif" width="6"></p>
</td>
<td width="96%" height="22">[<a href="Default.asp?classid=<%=rs("classid")%>&Nclassid=<%=rs("Nclassid")%>"><%=rs("Nclass")%>
</a>] <a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%>
</a> ( <%if rs("dateandtime")=date() then%>
<font color="red"><%=month(rs("dateandtime"))%>
月<%=day(rs("dateandtime"))%>
日</font> <%else%>
<font color="#999999"><%=month(rs("dateandtime"))%>
月<%=day(rs("dateandtime"))%>
日</font> <%end if%>
,<font color="green"><%=rs("hits")%>
</font>)</td>
</tr>
<%
rs.movenext
loop
end if
rs.close
%>
</table>
<table bgcolor="#EEEEEE" border="0" cellpadding="0" cellspacing="0" width="468%" align="center">
<tr>
<td height="20" width="100%"> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</TD></TR></TBODY></TABLE>
</center>
</div>
</TD>
<TD bgColor=#6699FF height=64 width=10> </TD>
<TD bgColor=#e4e4e4 rowSpan=5 vAlign=top width=133>
<div align="center">
<center>
<TABLE border=0 borderColorDark=#ffffff
borderColorLight=#000000 cellPadding=3 cellSpacing=0 width="100%">
<TBODY>
<TR bgColor=#ffff66>
<TD bgColor=#6699FF valign="middle" align="center">
<font color="#FFFFFF"><span style="filter: DropShadow(color=black, offX=1, offY=1); position: relative; width: 100%">www.fzinfo.net</span></font></TD></TR>
<tr>
<TD style="background-image: url('images/qhss1.gif')" valign="middle" align="center"><font color="#FFFFFF"><span style="filter: DropShadow(color=black, offX=1, offY=1); position: relative; width: 100%">今日下载前10排行</span></font></TD>
</tr>
</TBODY></TABLE>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="100">
<tr align="middle">
<td bgcolor="#999999" valign="top" align="center">
<div align="center">
<center>
<table border="0" cellpadding="4" cellspacing="0" height="100" width="131">
<tr>
<td background="images/a-27.gif" bgcolor="#FFFFFF" valign="top"><font style="line-height:150%"><%
dim tdate
tdate=year(Now()) & "-" & month(Now()) & "-" & day(Now())
sql="select top 10 id,showname from download where "
sql=sql&" lasthits=date() and stop=0 and dayhits>0 "
sql=sql&" order by dayhits desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
本日没有下载 <%else%>
<br>
<%do while not rs.eof%>
<a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%><br>
</a><%
rs.movenext
loop
end if
rs.close
%>
</font></td>
</tr>
</table>
</center>
</div>
</td>
</tr>
</table>
</center>
</div>
<TABLE align=center border=0 borderColorDark=#ffffff
borderColorLight=#000000 cellPadding=3 cellSpacing=0 width="100%">
<TBODY>
<tr>
<TD bgcolor=#FFFFFF valign="middle" align="center" style="background-image: url('images/qhss1.gif')"><font color="#FFFFFF"><span style="filter: DropShadow(color=black, offX=1, offY=1); position: relative; width: 100%">本周下载前10排行</span></font></TD>
</tr>
</TBODY></TABLE>
<table border="0" cellpadding="4" cellspacing="0" height="100" align="center" width="131">
<tr>
<td background="images/a-27.gif" bgcolor="#FFFFFF" valign="top"><font style="line-height:150%"><%
OldWeek = WeekDay(Date())-1
If OldWeek = 0 Then OldWeek = 7
OldWeek = Date()-OldWeek
NewWeek = Date()+(9-WeekDay(Date()))
sql="select top 10 id,showname from download where "
sql=sql&" (lasthits < #" & NewWeek & "#) And (lasthits > #" & OldWeek & "#) and stop=0 and weekhits>0 "
sql=sql&" order by weekhits desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
本周没有下载 <%else%>
<br>
<%do while not rs.eof%>
<a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%><br>
</a><%
rs.movenext
loop
end if
rs.close
%>
</font>
</td>
</tr>
</table>
<TABLE align=center border=0 borderColorDark=#ffffff
borderColorLight=#000000 cellPadding=3 cellSpacing=0 width="100%">
<TBODY>
<tr>
<TD bgcolor=#FFFFFF valign="middle" align="center" style="background-image: url('images/qhss1.gif')"><font color="#FFFFFF"><span style="filter: DropShadow(color=black, offX=1, offY=1); position: relative; width: 100%">累积下载前10排行</span></font></TD>
</tr>
</TBODY></TABLE>
<table border="0" cellpadding="4" cellspacing="0" width="131" height="100" align="center">
<tr>
<td background="images/a-27.gif" bgcolor="#ffffff" valign="top"><font style="line-height:150%"><%
sql="select top 10 id,showname from download "
sql=sql&" order by hits desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
没有下载 <%else%>
<br>
<%do while not rs.eof%>
<a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%><br>
</a><%
rs.movenext
loop
end if
rs.close
%>
</font>
</td>
</tr>
</table>
</TD></TR>
<TR>
<TD width=10 bgcolor="#6699FF"> </TD>
<TD width=10 bgcolor="#6699FF"> </TD></TR>
<TR>
<TD height=74 width=10 bgcolor="#6699FF"> </TD>
<TD height=74 width=10 bgcolor="#6699FF"> </TD></TR>
<TR>
<TD height=4 width=10 bgcolor="#6699FF"> </TD>
<TD height=4 width=10 bgcolor="#6699FF"> </TD></TR>
<TR>
<TD bgColor=#6699FF width=10> </TD>
<TD bgColor=#6699FF width=10> </TD></TR></TBODY></TABLE>
<!--#include file="CopyRight.asp"-->
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -