📄 index.asp
字号:
<td width="100%" bgcolor="#FFFFFF" valign="top">
<table border="0" width="100%" cellpadding="0" cellspacing="1">
<%
sql="select top 15 "
sql=sql&"download.id,download.showname,bb,download.dateandtime,download.hits,download.classid,download.Nclassid,Nclass.Nclass "
sql=sql&" from download,Nclass where download.Nclassid=Nclass.Nclassid "
sql=sql&" order by download.dateandtime desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<tr>
<td>没有任何软件</td>
</tr>
<%else%>
<%do while not rs.eof%>
<tr>
<td width="100%" onMouseOver="this.bgColor='#F8F8F8';" onMouseOut="this.bgColor='#ffffff';" height="23">
<img src="images/RedArrow.gif" width="4" height="7"> <a href='sort.asp?classid=<%=rs("classid")%>&Nclassid=<%=rs("Nclassid")%>'><%=rs("Nclass")%></a> - <a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%> <%=rs("bb")%></a><font color='#999999'>(
<%if (month(rs("dateandtime"))&day(rs("dateandtime")))=(month(date())&day(date())) then%>
<font color=red>
<%else%>
<font color='#999999'>
<%end if%>
<%=month(rs("dateandtime"))%>月<%=day(rs("dateandtime"))%>日</font>,<font color=green><%=rs("hits")*3%></font>)</font></font></td>
<%
rs.movenext
loop
end if
rs.close
%>
</tr>
</table>
<table border="0" width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="20"> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="5" colspan="2"></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center" height="77" >
<tr>
<td background="images/bj4.gif" height="1"> <img src="images/spacer.gif" width="1" height="1"></td>
</tr>
<tr>
<td >
<div align="center"><img src="images/logo4.gif" width="468" height="60" border="0"></div>
</td>
</tr>
<tr>
<td background="images/bj4.gif" height="1"> <img src="images/spacer.gif" width="1" height="1"></td>
</tr>
</table>
<table width="98%" border="0" align="center" height="234">
<tr>
<td width="50%" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#ECECDB">
<tr>
<td height="20" width="140" valign="top">
<p>
</td>
<td height="20" width="202"><font
color=#ff0000>推荐软件</font> </td>
</tr>
<tr>
<td colspan="2"></td>
</tr>
<tr>
<td bgcolor="#999999" colspan="2">
<table border="0" width="100%" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" bgcolor="#FFFFFF" valign="top">
<table border="0" width="100%" cellpadding="0" cellspacing="1" height="250">
<%
sql="select top 8 "
sql=sql&"download.id,download.showname,bb,download.dateandtime,download.hits,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.dateandtime desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<tr>
<td>没有任何软件</td>
</tr>
<%else%>
<%do while not rs.eof%>
<tr>
<td width="100%" onMouseOver="this.bgColor='#F8F8F8';" onMouseOut="this.bgColor='#ffffff';" height="23">
<img src="images/RedArrow.gif" width="4" height="7"> <a href='sort.asp?classid=<%=rs("classid")%>&Nclassid=<%=rs("Nclassid")%>'><%=rs("Nclass")%></a> - <a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%> <%=rs("bb")%></a><font color='#999999'></font></td>
<%
rs.movenext
loop
end if
rs.close
%>
</tr>
</table>
<table border="0" width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="20"> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="5" colspan="2"></td>
</tr>
</table>
</td>
<td width="50%" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0" bgcolor="#ECECDB">
<tr>
<td height="20" width="140" valign="top">
<p>
</td>
<td height="20" width="202"><font
color=#ff0000>会员软件</font> </td>
</tr>
<tr>
<td colspan="2"></td>
</tr>
<tr>
<td bgcolor="#999999" colspan="2">
<table border="0" width="100%" cellspacing="1" cellpadding="0">
<tr>
<td width="100%" bgcolor="#FFFFFF" valign="top">
<table border="0" width="100%" cellpadding="0" cellspacing="1" height="250">
<%
sql="select top 8 "
sql=sql&"download.id,download.showname,bb,download.dateandtime,download.hits,download.classid,download.Nclassid,Nclass.Nclass "
sql=sql&" from download,Nclass where download.club=yes and download.stop=0 and download.Nclassid=Nclass.Nclassid "
sql=sql&" order by download.dateandtime desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
<tr>
<td>没有任何软件</td>
</tr>
<%else%>
<%do while not rs.eof%>
<tr>
<td width="100%" onMouseOver="this.bgColor='#F8F8F8';" onMouseOut="this.bgColor='#ffffff';" height="23">
<img src="images/star.gif" width="11" height="14"> <a href='sort.asp?classid=<%=rs("classid")%>&Nclassid=<%=rs("Nclassid")%>'><%=rs("Nclass")%></a> - <a href="list.asp?id=<%=rs("id")%>"><%=rs("showname")%> <%=rs("bb")%></a><font color='#999999'></font></td>
<%
rs.movenext
loop
end if
rs.close
%>
</tr>
</table>
<table border="0" width="100%" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="20"> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="5" colspan="2"></td>
</tr>
</table>
</td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="images/bj4.gif" height="1"><img src="images/spacer.gif" width="1" height="1"></td>
</tr>
</table>
<br>
<table border="0" width="98%" cellspacing="3" cellpadding="0" align="center">
<tr>
<%
sql="select top 12 " '友情连接数
sql=sql&"logo.id,logo.logoname,logo.logoimg,logo.logourl "
sql=sql&" from logo "
sql=sql&" order by logo.id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
没有任何连接
<%else%>
<%do while not rs.eof%>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
<td width="93.75" align="center">
<%if not Rs.eof then%>
<a href="<%=rs("logourl")%>" target="_blank"><img src="<%=rs("logoimg")%>" width="88" height="31" border="0" alt="<%=rs("logoname")%>"></a>
</td>
<%rs.movenext
end if %>
</tr>
<%loop
Rs.Close
set Rs=nothing
%>
<%
end if
%>
<tr>
<td colspan="8" align="center"> </td>
</tr>
<tr>
<td width="744" align="center" colspan="8">
<p align="center">交换连接请<a href="mailto:layty@163.com"><font color="#FF0000">与我联系</font></a>。
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td valign="top" bgcolor="#AA7523" > </td>
</tr>
</table>
<!--#include file="CopyRight.asp"-->
<!--#include file="link.asp"-->
<%
set rs=nothing
conn.close
set conn=nothing%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -