Category

Development Platform
Home > SourceCode/Document > Internet-Socket-Network > WEB(ASP,PHP,...) > View Code
index.asp
Package: guhang0089.zip　[view]
Upload User: fuelmate
Upload Date: 2007-06-22
Package Size: 189k
Code Size: 21k
Category:

WEB(ASP,PHP,...)

Development Platform:

ASP/ASPX

index.asp：Code Content
  1. <!--#include file="conn.asp"-->
  2. <html>
  3. <head>
  4. <TITLE>凌乱设计 V6.0 魅惑 午夜 盛装舞会</TITLE>
  5. <META http-equiv=Content-Type content="text/html; charset=gb2312">
  6. <meta name="design" content="设计师：凌乱">
  7. <meta name="keywords" content="凌乱设计 狼性不足 六根不净 设计 日记 作品 资源 下载 ">
  8. <script language= "javascript">
  9. function newpage(htmlurl) {
  10. var newwin=window.open(htmlurl,"newWin","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,top=2,left=2,width=310,height=50");
  11. newwin.focus();
  12. return false;
  13. }
  14. </script><SCRIPT src="Js.js"></SCRIPT>
  15. <link href="images/music.css" rel="stylesheet" type="text/css">
  16. </HEAD>
  17. <noscript><iframe src=*.html></iframe></noscript>
  18. <BODY bgColor=#ffffff leftmargin="0" topmargin="0" oncontextmenu="return false" onselectstart="return false">
  20. <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0 background="images/mainbg_blue.jpg" height="100%">
  21.   <TR>
  22.     <TD class=tbg>&nbsp;</TD>
  23.     <TD width=716 valign="top"> 
  24.       <table cellspacing=0 cellpadding=0 align=center border=0 height="100%">
  25.         <tr> 
  26.           <td width="9" height="524" valign=top background=images/lbg_blue.jpg>&nbsp;</td>
  27.           <td bgcolor="#FFFFFF" valign="top" align="center"> 
  28.             <table cellspacing=0 cellpadding=0 width=700 border=0>
  29.               <tr> 
  30.                 <td height="160" background="images/top1.jpg"> <div align="center">
  31.                     <object classid="clsid:D27CDB6E-AE6D-11CF-96B8-444553540000" id="obj1" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0" border="0" width="697" height="160">
  32.                       <param name="movie" value="images/top1.swf">
  33.                       <param name="quality" value="High">
  34.                       <param name="wmode" value="transparent">
  35.                       <embed src="images/top1.swf" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="697" height="160" quality="High" wmode="transparent"> 
  36.                       </embed> </object>
  37.                   </div></td>
  38.               </tr>
  39.             </table>
  40.             <table height=37 cellspacing=0 cellpadding=0 width=700 align=center 
  41. background=images/bar_bg6.gif border=0>
  42.               <tr> 
  43.                 <td width=1 bgcolor=#c0c0c0></td>
  44.                 <td class=en9pt width=170 background=images/menubg2.gif align="center"><a href="http://www.2vg.net/new/blog/default.asp"><img height=24 
  45.       src="images/topurl_green.gif" width=148 border=0></a></td>
  46.                 <td class=en9pt align=right width=38 
  47.       background=images/pagenotfound.php><img height=37 
  48.       src="images/bar_bg_mid.gif" width=38></td>
  49.                 <td class=en9pt align=center 
  50.       background=images/menubg.gif valign="bottom"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
  51.                     <tr align="center"> 
  52.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  53.                           <tr> 
  54.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  55.             align=textTop></td>
  56.                             <td align=center width=50 background=images/m3.gif><a href="http://www.2vg.net/new/about/index.asp">自 
  57.                               白</a></td>
  58.                             <td width=4><img height=31 src="images/m2.gif" 
  59.         width=4></td>
  60.                           </tr>
  61.                         </table></td>
  62.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  63.                           <tr> 
  64.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  65.             align=textTop></td>
  66.                             <td align=center width=50 background=images/m3.gif><a href="http://www.2vg.net/new/photo/index.asp">作 
  67.                               品</a></td>
  68.                             <td width=4><img height=31 src="images/m2.gif" 
  69.         width=4></td>
  70.                           </tr>
  71.                         </table></td>
  72.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  73.                           <tr> 
  74.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  75.             align=textTop></td>
  76.                             <td align=center width=50 background=images/m3.gif><a href="http://www.2vg.net/new/pic/index.asp">回 
  77.                               忆</a></td>
  78.                             <td width=4><img height=31 src="images/m2.gif" 
  79.         width=4></td>
  80.                           </tr>
  81.                         </table></td>
  82.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  83.                           <tr> 
  84.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  85.             align=textTop></td>
  86.                             <td align=center width=50 background=images/m3.gif><a href="index.asp">旋 
  87.                               律</a></td>
  88.                             <td width=4><img height=31 src="images/m2.gif" 
  89.         width=4></td>
  90.                           </tr>
  91.                         </table></td>
  92.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  93.                           <tr> 
  94.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  95.             align=textTop></td>
  96.                             <td align=center width=50 background=images/m3.gif><a href="http://www.2vg.net/new/link/index.asp">收 
  97.                               藏</a></td>
  98.                             <td width=4><img height=31 src="images/m2.gif" 
  99.         width=4></td>
  100.                           </tr>
  101.                         </table></td>
  102.                       <td> <table class=en9pt cellspacing=0 cellpadding=0 border=0>
  103.                           <tr> 
  104.                             <td align=right>　<img height=31 src="images/m1.gif" width=4 
  105.             align=textTop></td>
  106.                             <td align=center width=50 background=images/m3.gif><a href="http://www.2vg.net/bbs" target="_blank">会 
  107.                               所</a></td>
  108.                             <td width=4><img height=31 src="images/m2.gif" 
  109.         width=4></td>
  110.                           </tr>
  111.                         </table></td>
  112.                     </tr>
  113.                   </table></td>
  114.                 <td width=1 bgcolor=#c0c0c0></td>
  115.               </tr>
  116.             </table>
  118.             <table width="100%" border="0" cellspacing="0" cellpadding="0">
  119.               <tr>
  120.                 <td height="6"></td>
  121.               </tr>
  122.             </table>
  123.             <table width="693" border="1" bordercolor="#666666" background="images/bg.jpg" bgcolor="#CCCCCC">
  124.               <tr> 
  125.                 <td width="683" height="199" valign="top" bordercolor="#CCCCCC"> 
  126.                   <table width="97%" border="0" align="center" cellpadding="0" cellspacing="0">
  127.                     <!--DWLayoutTable-->
  128.                     <tr> 
  129.                       <td width="176" height="195" valign="top"> 
  130.                         <div> 
  131.                         <hr align="left" width=94% size="1" color="#990000">
  132.                           <div>
  133.                             <table width="94%" cellpadding="0" cellspacing="0" bordercolor="#ffffff" bordercolorlight="#393939" bordercolordark="#cccccc">
  134.                               <% 
  135. set rs1=server.createobject("adodb.recordset")
  136. sql="SELECT * from music order by hits desc"
  137. rs1.open sql,conn,1,1 
  138. %>
  139.                               <tr> 
  140.                                 <td width="100%" align="center" height="25" bgcolor="DAE9FE"><div align="left"><span id="glowtext"><font color="#000000">　</font><font color="#000000">　</font><font color="#000000">　</font><font color="#000000">点击排行 
  141.                                     </font></span></div></td>
  142.                               </tr>
  143.                               <% do while not rs1.eof %>
  144.                               <tr> 
  145.                                 <td width="100%" height="25" bgcolor="#FFFFFF"><font color="#000000">·</font> 
  146.                                   <font color="#000000"><A HREF="play.asp?id=<%=rs1("id")%>" onClick="return newpage(this.href);"> 
  147.                                   <% if len(rs1("name"))>10 then %>
  148.                                   <%=Left(rs1("name"),16)%>... 
  149.                                   <% else %>
  150.                                   <%=rs1("name")%> 
  151.                                   <% end if %>
  152.                                   </A> </font><font color="#000000"> 
  153.                                   <%if not rs1("date") < date then%>
  154.                                   &nbsp;<img border="0" src="images/new.gif"> 
  155.                                   <%end if%>
  156.                                   </font> </td>
  157.                               </tr>
  158.                               <%                        
  159. dim top                                     
  160. top=top+1                                     
  161. rs1.movenext                                     
  162. if top>=10 then exit do                                     
  163. loop                        
  164. rs1.close                        
  165. %>
  166.                             </table>
  167.                             
  168.                         
  169.                             <hr align="left" width=94% size="1" color="#990000">
  170.                           </div>
  171.                           <table width="94%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  172.                             <tr>
  173.                               <td height="26" bgcolor="DAE9FE"> 
  174.                                 <div align="left"><span id="glowtext"><font color="#000000">　　　</font></span><font color="#000000">搜索歌曲</font> 
  175.                                   <span id="glowtext"></span></div></td>
  176.                             </tr>
  177.                             <tr> 
  178.                               <td><form action="search.asp" method="post" name="search" target="_blank" >
  179.                                   <div align="center"><br>
  180.                                     <input  maxLength="10" name="keyword" onfocus="this.value=''" size="8" style="BORDER-RIGHT: #000000 1px groove; BORDER-TOP: #000000 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #000000 1px groove; WIDTH: 80px; COLOR: #000000; BORDER-BOTTOM: #000000 1px groove; HEIGHT: 20px; BACKGROUND-COLOR: f5f5f5">
  181.                                     <input  type="submit"  value="搜索"  name="search" style="BORDER-RIGHT: #000000 1px groove; BORDER-TOP: #000000 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #000000 1px groove; WIDTH: 50px; COLOR: #000000; BORDER-BOTTOM: #000000 1px groove; HEIGHT: 20px; BACKGROUND-COLOR: ffffff">
  182.                                   </div>
  183.                                 </form></td>
  184.                             </tr>
  185.                           </table>
  186.                         </div></td>
  187.                       <td width="503" valign="top"> 
  188.                         <div align="center"> 
  189.                           <%         
  190. set rs = server.createobject("adodb.recordset")                                                                     
  191. sql = "select * from music order by id desc"                    
  192. rs.open sql,conn,1,1                                      
  193. if rs.eof then                            
  194. response.write "<p align=center><font color=red>暂无歌曲</font></p>"                           
  195. response.end                            
  196. else                            
  197. const maxperpage=20                            
  198. dim currentpage                            
  199. rs.pagesize=maxperpage                            
  200. currentpage=request.querystring("pageid")                            
  201. if currentpage="" then                            
  202. currentpage=1                            
  203. elseif currentpage<1 then                            
  204. currentpage=1                            
  205. else                            
  206. currentpage=clng(currentpage)                            
  207. if currentpage > rs.pagecount then                            
  208. currentpage=rs.pagecount                            
  209. end if                            
  210. end if                            
  211.                             
  212. if not isnumeric(currentpage) then                            
  213. currentpage=1                            
  214. end if                            
  215. dim totalput,n                            
  216. totalput=rs.recordcount                            
  217. if totalput mod maxperpage=0 then                            
  218. n=totalputmaxperpage                            
  219. else                            
  220. n=totalputmaxperpage+1                            
  221. end if                            
  222. if n=0 then                            
  223. n=1                            
  224. end if                            
  225. rs.move(currentpage-1)*maxperpage          
  226. %><hr width=100% size="1" color="#990000">
  227.                           
  228.                           <table border="0" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#393939" bordercolordark="#cccccc">
  229.                             <tr bgcolor="DAE9FE"> 
  230.                               <td width="13%" height="20" align="center"><font color="#000000">编号</font></td>
  231.                               <td width="30%" height="25" align="center"> <p align="left"><font color="#000000"><b>歌 
  232.                                   曲 名 字</b></font></p></td>
  233.                               <center>
  234.                                 <td width="12%" height="20" align="center"> <font color="#000000">试听</font> 
  235.                                 </td>
  236.                                 <td width="16%" height="20" align="center"> <font color="#000000">歌手</font> 
  237.                                 </td>
  238.                                 <td width="11%" height="20" align="center"><font color="#000000">点击</font></td>
  239.                                 <td width="18%" height="20" align="center"><font color="#000000">上传时间</font></td>
  240.                               </center>
  241.                             </tr>
  242.                             <%                                         
  243. i=0                         
  244. w=1                            
  245. do while i< maxperpage and not rs.eof                                           
  246. %><FORM action=playsong.ASP name=form2 
  247.                       onsubmit="javascript:return lbsong();" target=lbsong>
  248.                             <tr bgcolor="#FFFFFF"> 
  249.                               <td width="13%" height="20" align="center"><font color="#000000"><%=w%></font></td>
  250.                               <td width="30%" height="25"> <font color="#000000"> 
  251.                                 <INPUT name=checked 
  252.                         style="BORDER-BOTTOM: 0px solid; BORDER-LEFT: 0px solid; BORDER-RIGHT: 0px solid; BORDER-TOP: 0px solid; COLOR: #ffffff" 
  253.                         type=checkbox 
  254.                         value=<%=rs("Url")%>>
  255.                                 </font><font color="#000000"> 
  256.                                 <% if len(rs("name"))>16 then %>
  257.                                 <%=Left(rs("name"),16)%>... 
  258.                                 <% else %>
  259.                                 <%=rs("name")%> 
  260.                                 <% end if %></A>
  261.                                 <%if not rs("date") < date then%>
  262.                                 &nbsp; 
  263.                                 <%end if%>
  264.                                 <%if session("admin")<>"" then%>
  265.                                 &nbsp;&nbsp;<a href="del.asp?id=<%=rs("id")%>">删除</a> 
  266.                                 <%end if%>
  267.                                 </font></td>
  268.                               <td width="12%" height="20" align="center"><font color="#000000"><A HREF="song.asp?id=<%=rs("id")%>" onClick="return newpage(this.href);"><img border="0" src="images/listen.gif"></A></font></td>
  269.                               <td width="16%" height="20" align="center"><font color="#000000"><%=rs("who")%></font></td>
  270.                               <td width="11%" height="20" align="center"><font color="#000000"><%=rs("hits")%></font></td>
  271.                               <td width="18%" height="20" align="center"><font color="#000000"><%=rs("date")%></font></td>
  272.                             </tr>
  273.                             <%                        
  274. i=i+1                             
  275. w=w+1                                            
  276. rs.movenext                                     
  277. loop                    
  278. end if                                       
  279. rs.Close                                      
  280. %>
  281.                             <tr bgcolor="#FFFFFF"> 
  282.                               <td height="25" colspan="6" align="center"> 
  283.                                 <INPUT name=PageName type=hidden 
  284.                         value=default> <INPUT name=chkall onclick=CheckAll(this.form) style="BORDER-RIGHT: #000000 1px groove; BORDER-TOP: #000000 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #000000 1px groove; WIDTH: 50px; COLOR: #000000; BORDER-BOTTOM: #000000 1px groove; HEIGHT: 20px; BACKGROUND-COLOR: ffffff" title=选择显示的所有歌曲 type=button value="全 选"> 
  285.                                 &nbsp;&nbsp; <INPUT name=chkOthers onclick=CheckOthers(this.form) style="BORDER-RIGHT: #000000 1px groove; BORDER-TOP: #000000 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #000000 1px groove; WIDTH: 50px; COLOR: #000000; BORDER-BOTTOM: #000000 1px groove; HEIGHT: 20px; BACKGROUND-COLOR: ffffff" title=反向选择歌曲 type=button value="反 选"> 
  286.                                 &nbsp;&nbsp; <INPUT name=B1 style="BORDER-RIGHT: #000000 1px groove; BORDER-TOP: #000000 1px groove; FONT: 12px Verdana,Geneva,sans-serif; BORDER-LEFT: #000000 1px groove; WIDTH: 50px; COLOR: #000000; BORDER-BOTTOM: #000000 1px groove; HEIGHT: 20px; BACKGROUND-COLOR: ffffff" title=请先选择你想听的歌曲后再点击连播 type=submit value="连 播">
  287.                               </td>
  288.                             </tr>
  289.                             <tr> 
  290.                               <td height="25" colspan="6" align="center" bgcolor="DAE9FE"> 
  291.                                 <p align="center"><font color="#725446">页数：<%=currentpage%>/ 
  292.                                   <% =n%>
  293.                                   <%k=currentpage                                                                                                                  
  294.     if k<>1 then%>
  295.                                   <a href="index.asp?pageid=1">首页</a> <a href="index.asp?pageid=<%=k-1%>">上一页</a> 
  296.                                   <%else%>
  297.                                   首页&nbsp;上一页 
  298.                                   <%end if%>
  299.                                   <%if k<>n then%>
  300.                                   <a href="index.asp?pageid=<%=k+1%>">下一页</a> 
  301.                                   <a href="index.asp?pageid=<%=n%>">尾页</a> 
  302.                                   <%else%>
  303.                                   下一页&nbsp;尾页 
  304.                                   <%end if%>
  305.                                   共<%=totalput%>首</font></p></td>
  306.                             </tr>
  307.                           </table>
  308.                           <hr width=100% size="1" color="#990000">
  309.                         </div></td>
  310.                     </tr>
  311.                   </table>
  312.                   
  313.                 </td>
  314.               </tr>
  315.             </table>
  316.             <table width="100%" border="0" cellspacing="0" cellpadding="0">
  317.               <tr>
  318.                 <td height="6"></td>
  319.               </tr>
  320.             </table>
  321.             <table width="98%" height="2" border="0" align="center" cellpadding="0" cellspacing="0">
  322.               <tr> 
  323.                 <td bgcolor="#D4D4D4"></td>
  324.               </tr>
  325.               <tr> 
  326.                 <td bgcolor="#FFFFFF"></td>
  327.               </tr>
  328.             </table>
  329.             <table width="700" border="0" cellspacing="0" cellpadding="0">
  330.               <tr> 
  331.                 <td align="center" height="59" class="td20"> 
  332.                   <table width="500" border="0" cellspacing="0" cellpadding="0">
  333.                     <tr> 
  334.                       <td align="center" height="20" colspan="2"><font face="Verdana, Arial, Helvetica, sans-serif">Copyright 
  335.                         &copy; 2004-2005 <font color="#FF0000"><b>2</b></font><font color="#009900">v</font><font color="#0066FF"><b>g</b></font><font color="#FF6600">.net</font> 
  336.                         Inc. All rights reserved.</font> 凌乱设计 版权所有</td>
  337.                     </tr>
  338.                     <tr> 
  339.                       <td align="right"><img src="images/copyright.jpg" width="198" height="36">&nbsp;&nbsp;</td>
  340.                       <td><font face="Verdana, Arial, Helvetica, sans-serif">E-Mail:Aocean@21cn.com<br>
  341.                         <a target=blank href=http://wpa.qq.com/msgrd?V=1&Uin=569222&Site=凌乱设计&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:569222:1 alt="点击给站长发消息"></a>
  342.  
  343. </font> <script src="http://www.2vg.net/star/count.asp?style=0">
  344. </script></td>
  345.                     </tr>
  346.                   </table>
  347.                 </td>
  348.               </tr>
  349.             </table>
  350.           </td>
  351.           <td valign=top background=images/rbg_blue.jpg width="7">&nbsp;</td>
  352.         </tr>
  353.       </table>
  354.     </TD>
  355.     <TD class=rtbg width="154">&nbsp;</TD>
  356.   </TR></TABLE>
  357. </body>
  358. </html>