📄 index.asp
字号:
<!--#include file="conn.asp"-->
<%stats="本站网址：http://www.971yy.com 音乐试听，江湖聊天，娱乐论坛"%>
<!--#include file="home.asp"-->
<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<body BODYonunload="out()"
onMouseOver="if (style.behavior==''){style.behavior='url(#default#homepage)';setHomePage('http://www.971yy.com')}"
>
</SCRIPT>
<table width="779" height="570" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="1" height="570" background="images/sunny01.gif"><img src="images/b.gif" width="1" height="1"></td>
<td width="186" valign="top"><table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25" valign="top"><img src="images/amusic_0a11.gif" width="188" height="25"></td>
</tr>
</table>
<!--#include file="inc/login.inc" -->
<table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="32"><img src="images/amusic_0a13.gif" width="188" height="25"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/0394_top0.gif" width="188" height="29"></td>
</tr>
</table>
<!--#include file="inc/links.inc" -->
<table width="100%" height="23" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="23"><img src="images/0394_top1.gif" width="188" height="29"></td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="0">
<!--#include file="inc/list_music_hot.inc"-->
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/0394_top2.gif" width="188" height="29"></td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="2" cellspacing="0">
<!--#include file="inc/list_special_hot.inc"-->
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/0394_top3.gif" width="188" height="29"></td>
</tr>
</table>
<table width="95%" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td height="45"> <div align="center"><img src="images/WMP9series_Free.gif" width="120" height="32"></div></td>
</tr>
</table>
<table width="95%" border="0" align="center" cellpadding="2" cellspacing="0">
<tr>
<td height="45"> <div align="center"><img src="images/real.gif" width="121" height="34"></div></td>
</tr>
</table></td>
<td width="1" background="images/sunny01.gif"><img src="images/b.gif" width="1" height="1"></td>
<td width="590" valign="top"><table width="589" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="314" height="18">
<div align="center">
<!--#include file="inc/top_count.inc" -->
</div></td>
<td width="24"><img src="images/fink.gif" width="25" height="23"></td>
<td width="251">
<!-- 导航歌曲搜索 开始 -->
<table width="250" border="0" cellspacing="0" cellpadding="4" align="center" height="17">
<form action="search.asp" method="get">
<tr align="center">
<td width="71" height="2"> <input name="key_keyword" class=input onFocus="this.value=''" value="关键字" size="10" maxlength="30" ></td>
<td width="79"> <select size="1" name="key_type" class=input >
<option selected value="music">歌曲名称</option>
<option value="singer">歌手名称</option>
<option value="special">专辑名称</option>
</select></td>
<td width="42"> <input type="submit" value="搜索" class=input name="submit"></td>
<td width="42"> <input type="reset" value="清除" class=input name="submit2"></td>
</tr>
</form>
</table>
<!-- 导航歌曲搜索 结束 -->
</td>
</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td height="20" bgcolor="#FFFFFF"><img src="images/music_01.gif" width="589" height="29"></td>
</tr>
<tr>
<td height="55" bgcolor="#FFFFFF">
<table width="579" height="132" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<td width="1" bgcolor="#CCCCCC"><img src="images/b.gif" width="1" height="1"></td>
<td width="550">
<%
Dim Best_Special_rs
Set Best_Special_rs = Server.CreateObject("ADODB.Recordset")
sql = "select SpecialID,name,Yuyan,NClass,intro,pic,NClassID from [Special] where isGood=true ORDER BY SpecialID desc"
Best_Special_rs.open sql, conn, 1, 1
For i=1 To 4
If Best_Special_rs.eof Then Exit For
If i mod 2 <> 0 Then
%>
<table width="96%" height="122" border="0" align="center" cellpadding="2" cellspacing="2">
<tr>
<td width="19%" valign="top" background="images/0394_bai_01.gif"><table width="81%" height="101" border="0" cellpadding="0" cellspacing="0">
<tr><%
pic=Best_Special_rs(5)
if instr(pic,"/pic/")>0 then
pic="http://www.9520.cn/"&pic
end if
%>
<td valign="top"><a href="show.asp?specialid=<%Response.Write(Best_Special_rs(0))%>"><img src="<%=pic%>" width="90" height="96" style="border: 1 solid #000000"></a></td>
</tr>
</table></td>
<td width="31%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="19"><font color="#FF6600">专辑：<a href="show.asp?specialid=<%Response.Write(Best_Special_rs(0))%>"><font color="#000000">《<%Response.Write(Best_Special_rs(1))%>》</font></a></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">歌手：<A href="special.asp?id=<%Response.Write(Best_Special_rs(6))%>"><font color="#000000">
<%Response.Write(Best_Special_rs(3))%>
</font></a></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">语言：<font color="#000000">
<%Response.Write(Best_Special_rs(2))%>
</font></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">介绍：</font><font color="#999999">
<%Response.Write(left(Best_Special_rs(4),38))%>
... </font> </td>
</tr>
</table></td>
<%Else%>
<td width="19%" valign="top" background="images/0394_bai_01.gif">
<table width="81%" height="101" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="100"><a href="show.asp?specialid=<%Response.Write(Best_Special_rs(0))%>"><img src="<%=pic%>" width="90" height="96" style="border: 1 solid #000000"></a></td>
</tr>
</table></td>
<td width="31%" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="19"><font color="#FF6600">专辑：<a href="show.asp?specialid=<%Response.Write(Best_Special_rs(0))%>"><font color="#000000">《
<%Response.Write(Best_Special_rs(1))%>
》</font></a></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">歌手：<A href="special.asp?id=<%Response.Write(Best_Special_rs(6))%>"><font color="#000000">
<%Response.Write(Best_Special_rs(3))%>
</font></a></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">语言：<font color="#000000">
<%Response.Write(Best_Special_rs(2))%>
</font></font></td>
</tr>
<tr>
<td height="19"><font color="#FF6600">介绍：</font><font color="#999999">
<%Response.Write(left(Best_Special_rs(4),38))%>
... </font> </td>
</tr>
</table></td>
</tr>
</table>
<%
End If
Best_Special_rs.movenext
Next
Best_Special_rs.close
Set Best_Special_rs=NOTHING
%>
</td>
<td width="1" bgcolor="#CCCCCC"><img src="images/b.gif" width="1" height="1"></td>
</tr>
</table>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="images/music_02.gif" width="589" height="30"></td>
</tr>
</table>
<table width="100%" height="136" border="0" cellpadding="0" cellspacing="0">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -