default.asp

ASP源程序采用天空软件小偷中心核件制成

      <tr>
        <td width="23" valign="top" height="1">　</td>
        <td width="180" valign="bottom">
        <img border="0" src="images/lm32.gif"></td>
        <td width="311" valign="bottom" height="1">
        　</td> 
        <td width="203" valign="bottom" height="1"></td>
        <td width="217" valign="bottom" height="1"></td>
      </tr>
      </table>
    </td>
  </tr>
</table>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="964" align="center">
  <tr>
    <td width="962">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="963" bgcolor="#FFFFFF">
      <tr>
        <td width="22" valign="top">　</td>
        <td width="170" valign="top">
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="170">
          <tr>
            <td width="100%">
            <img border="0" src="images2/k4.gif" width="170" height="8"></td>
          </tr><%
	sql="select top 20 "
	sql=sql&"download.id,download.showname,download.dateandtime,download.hits,download.hots,download.classid,download.Nclassid,ANclass.Nclass "
	sql=sql&" from download,ANclass where download.hots=1 and download.Nclassid=ANclass.Nclassid "
	sql=sql&" order by download.id desc"
	rs.open sql,conn,1,1
	if rs.eof and rs.bof then
       %>没有推荐作品<%else%>
                  <%do while not rs.eof%>
          <tr>
            <td class="p1" width="100%" background="images2/k5.gif">&nbsp;·<a href="javascript://" onClick="window.open('view.asp?id=<%=rs("id")%>');"  ><%=rs("showname")%></a> (<%=rs("hits")%>)</td>                                  
          </tr><%
	rs.movenext
	loop
	end if
	rs.close
      %>
         <tr>
            <td width="100%">
            <img border="0" src="images2/k6.gif" width="170" height="9"></td>
          </tr>
        </table>
        </td>
        <td width="12" valign="top">　</td>
        <td width="498" valign="top"><% 
	if request("Nclassid")="" then
		sql="select id,filename,filename1,filename2,showname,note,images,dayhits,weekhits,lasthits,hits,dateandtime,hot,system,size,orders from download where "&classid&" stop=0 "
		sql=sql&" order by "&order_name&" "&updown
	else
		sql="select id,filename,filename1,filename2,showname,images,note,dayhits,weekhits,lasthits,hits,dateandtime,hot,system,size,orders from download where "&classid&" "&Nclassid&" stop=0 "
		sql=sql&" order by "&order_name&" "&updown
	end if
	rs.open sql,conn,1,1 
%><table border="0" cellspacing="1" cellpadding="3" width="100%" style="border-collapse: collapse">
                          <tr> 
          <td background=images/line-2.gif height="1" colspan="7" width="100%"></td>
        </tr><tr bgcolor="#D8D5B4" align=center> 
                            <td width="38%">名 称</td>
                            <td width="18%">作 者</td>
                            <td width="8%">人 气</td>
                            <td width="12%">歌 手</td>
                            <td width="8%">送友</td>
                            <td width="8%">评论</td>
                            <td width="8%">铃声</td>
        </tr><%do while not rs.eof%>
                          <tr bgcolor="#F2F1E6" align=center> 
                            <td width="38%" bgcolor="#F2F1E6"><p align="left"><img border="0" src="images2/j3.gif" width="9" height="16"><a href="javascript://" onClick="window.open('view.asp?id=<%=rs("id")%>');" ><FONT color=#00749f><%=rs("showname")%></FONT></a>
                            (<%=rs("size")%>) <%if rs("hot")>3 then%>                                  
                              <font color=red>荐</font>                                   
                              <%end if%></td>                                  
                            <td width="18%"><a href="mailto:<%=rs("filename2")%>"><FONT color=#00749f><%=rs("filename1")%></font></a></td>
                            <td width="8%"><%=rs("hits")%></td>
                            <td width="12%"><%if rs("note")="(无)" then%>( 无 )<%else%><a href="http://www.7k7k.com/query.asp?keyword=<%=rs("note")%>"><%=rs("note")%></a><%end if%></td>                                  
                            <td width="8%"><a href="javascript:tofriend('<%=rs("id")%>')">
                            <img border="0" src="images2/s3.gif" alt="送给好友" width="16" height="16"></a></td>
                            <td width="8%"><a href="javascript:Showvote('<%=rs("id")%>')"><img border="0" src="images2/s2.gif" alt="评论打分" width="16" height="16"></a></td>
                            <td width="8%"><a href="http://mysms.tom.com/smslist/smsearch.php?inc=3&keyword=<%=rs("showname")%>&user_id=59856" target="_blank"><img border="0" src="images2/s1.gif" alt="下载铃声" width="16" height="16"></a></td>
        </tr><%
	 i=i+1
	 if i>=14 then exit do
	 	rs.movenext
%>
<tr align=center>
                            <td width="38%"><p align="left"><img border="0" src="images2/j3.gif" width="9" height="16"><a href="javascript://" onClick="window.open('view.asp?id=<%=rs("id")%>');" ><FONT color=#00749f><%=rs("showname")%></FONT></a>
                            (<%=rs("size")%>) <%if rs("hot")>3 then%>                                  
                              <font color=red>荐</font>                                   
                              <%end if%></td>                                  
                            <td width="18%"><a href="mailto:<%=rs("filename2")%>"><FONT color=#00749f><%=rs("filename1")%></font></a></td>
                            <td width="8%"><%=rs("hits")%></td>
                            <td width="12%"><%if rs("note")="(无)" then%>( 无 )<%else%><a href="http://www.7k7k.com/query.asp?keyword=<%=rs("note")%>"><%=rs("note")%></a><%end if%></td>                                  
                            <td width="8%"><a href="javascript:tofriend('<%=rs("id")%>')">
                            <img border="0" src="images2/s3.gif" alt="送给好友" width="16" height="16"></a></td>
                            <td width="8%"><a href="javascript:Showvote('<%=rs("id")%>')">
                            <img border="0" src="images2/s2.gif" alt="评论打分" width="16" height="16"></a></td>
                            <td width="8%"><a href="http://mysms.tom.com/smslist/smsearch.php?inc=3&keyword=<%=rs("showname")%>&user_id=59856" target="_blank">
                            <img border="0" src="images2/s1.gif" alt="下载铃声" width="16" height="16"></a></td>
        </tr><%
	 i=i+1
	 if i>=14 then exit do
	 	rs.movenext
	 loop
%>
        <tr> 
          <td height="3" colspan="7" width="100%" bgcolor="#D8D5B4"></td>
        </tr>
        <tr> 
          <td background=images/line-2.gif height="1" colspan="7" width="100%"></td>
        </tr>
      </table><%     
   	rs.close
%></td>
        <td width="15" valign="top">　</td>
        <td width="219" valign="top">
        <table border="0" cellpadding="0" cellspacing="0" width="200" height="391">
          <tr>
        <td width="210" height="106"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="210">
          <tr>
            <td width="210" colspan="3"><img border="0" src="images/zj1.gif" width="210" height="13"></td>
          </tr>
          <tr>
            <td width="103"><img border="0" src="images/zj2.gif" width="103" height="75"></td>
            <td width="100">
        <a href="http://www.7k7k.com/allflash.asp?classid=&Nclassid=&order=size&updown=desc"><img border="0" src="images2/all4.gif" width="73" height="56"></a></td>
            <td width="7"><img border="0" src="yy4.gif" width="7" height="75"></td>
          </tr>
          <tr>
            <td width="210" colspan="3"><img border="0" src="images/zj3.gif" width="210" height="8"></td>
          </tr>
        </table></td>
        <td width="142" height="106"></td>
          </tr>
          <tr>
            <td height="285" valign="top">
              <table border="0" cellpadding="0" cellspacing="0" width="200">
                <tr>
        <td width="210">
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="210">
          <tr>
            <td width="210" colspan="3"><img border="0" src="images/yy1.gif" width="210" height="13"></td>
          </tr>
          <tr>
            <td width="103"><img border="0" src="images/yy2.gif" width="103" height="75"></td>
            <td width="100"><a href="http://www.7k7k.com/allflash.asp?classid=&Nclassid=&order=dataandtime&updown=desc"><img border="0" src="images2/all1.gif" width="73" height="56"></a></td>
            <td width="7"><img border="0" src="yy4.gif" width="7" height="75"></td>
          </tr>
          <tr>
            <td width="210" colspan="3"><img border="0" src="images/yy3.gif" width="210" height="8"></td>
          </tr>
        </table>
        </td>
                </tr>
              </table>
              <table border="0" cellpadding="0" cellspacing="0" width="200">
                <tr>
        <td width="210"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="210"> <tr><td width="210" colspan="3"><img border="0" src="images/dp1.gif" width="210" height="13"></td>
 </tr><tr> <td width="103"><img border="0" src="images/dp2.gif" width="103" height="75"></td><td width="100"><a href="http://www.7k7k.com/allflash.asp?classid=&Nclassid=&order=hits&updown=desc"><img border="0" src="images2/all2.gif" width="73" height="56"></a></td> <td width="7"><img border="0" src="yy4.gif" width="7" height="75"></td>
          </tr><tr><td width="210" colspan="3"><img border="0" src="images/dp3.gif" width="210" height="8"></td>
          </tr>
        </table></td>
                </tr>
              </table>
              <table border="0" cellpadding="0" cellspacing="0" width="200">
                <tr>
            <td width="210" colspan="3"><img border="0" src="images/yx1.gif" width="210" height="13"></td>
                </tr>
                <tr>
            <td width="103"><img border="0" src="images/yx2.gif" width="103" height="75"></td>
            <td width="100"><a href="http://www.7k7k.com/allflash.asp?classid=&Nclassid=&order=hot&updown=desc"><img border="0" src="images2/all3.gif" width="73" height="56"></a></td>
            <td width="7"><img border="0" src="yy4.gif" width="7" height="75"></td>
                </tr>
                <tr>
            <td width="210" colspan="3"><img border="0" src="images/yx3.gif" width="210" height="8"></td>
                </tr>
              </table>
            </td>
          </tr>
        </table>
        </td>
      </tr>
      </table>
    </td>
  </tr>
</table>

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="965" align="center" height="6">
  <tr>
    <td width="984" height="6">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="964" height="50" bgcolor="#FFFFFF">
      <tr>
       
        <td width="21">　</td>
        <td width="167" valign="bottom"><a href="http://"><img border="0" src="images/hot1.gif"></a></td>
        <td width="11"></td>
        <form method="post" name="myform" action="query.asp" target="_blank">
          <td width="503" valign="middle"><table border="1" cellspacing="0" style="border-collapse: collapse" width="100%" cellpadding="0" bordercolor="#C0C0C0" height="6">
          <tr>
            <td width="100%" bgcolor="#D6F3F7" height="6">
            <p align="center"><%
dim count
set rs=server.createobject("adodb.recordset")
sql = "select * from ANclass order by Nclassid asc"
rs.open sql,conn,1,1
%>
                          <script language = "JavaScript">
var onecount;
onecount=0;
subcat = new Array();
        <%
        count = 0
        do while not rs.eof 
        %>
subcat[<%=count%>] = new Array("<%= trim(rs("Nclass"))%>","<%= trim(rs("classid"))%>","<%= trim(rs("Nclassid"))%>");
        <%
        count = count + 1
        rs.movenext
        loop
        rs.close
        %>
onecount=<%=count%>;

function changelocation(locationid)
    {
    document.myform.Nclassid.length = 0;