www.gusucode.com > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外 > ASP+ACCESS音乐网站建设设计(源代码+论文+开题报告+答辩PPT+外文翻译)\音乐网站设计\kqst.asp
<!--#include file="inc/dbconn.inc"-->
<HTML><HEAD><TITLE>: 我爱音乐 :</TITLE>
<STYLE type=text/css>BODY {
}
</STYLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<META content=_top http-equiv=Window-target>
<STYLE type=text/css>A {
TEXT-DECORATION: none
}
A:link {
COLOR: #666666; FONT-FAMILY: 宋体; TEXT-DECORATION: none
}
A:visited {
COLOR: #666666; FONT-FAMILY: 宋体; TEXT-DECORATION: none
}
A:active {
FONT-FAMILY: 宋体; TEXT-DECORATION: none
}
A:hover {
BORDER-BOTTOM: 1px dotted; BORDER-LEFT-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px; BORDER-TOP-WIDTH: 1px; COLOR: #ff6600; TEXT-DECORATION: none
}
BODY {
BACKGROUND-COLOR: #ffffff; BACKGROUND-IMAGE: url(IMAGES/newyear2005.gif); COLOR: #666666; FONT-FAMILY: 宋体; FONT-SIZE: 12px; SCROLLBAR-FACE-COLOR: #e8e7e7; SCROLLBAR-HIGHLIGHT-COLOR: #ffffff; SCROLLBAR-SHADOW-COLOR: #ffffff; SCROLLBAR-3DLIGHT-COLOR: #cccccc; SCROLLBAR-ARROW-COLOR: #ff6600; SCROLLBAR-TRACK-COLOR: #EFEFEF; SCROLLBAR-DARKSHADOW-COLOR: #b2b2b2; SCROLLBAR-BASE-COLOR: #000000
}
TABLE {
BORDER-COLLAPSE: collapse; FONT-FAMILY: 宋体; FONT-SIZE: 9pt
}
.button {
BACKGROUND: url(img/ButtonBg.gif) #f6f6f9; BORDER-BOTTOM: #5589aa 1px solid; BORDER-LEFT: #5589aa 1px solid; BORDER-RIGHT: #5589aa 1px solid; BORDER-TOP: #5589aa 1px solid; COLOR: #000000; FONT-SIZE: 9pt; HEIGHT: 18px; WIDTH: 50px
}
.lanyu {
BORDER-BOTTOM: #5589aa 1px solid; BORDER-LEFT: #5589aa 1px solid; BORDER-RIGHT: #5589aa 1px solid; BORDER-TOP: #5589aa 1px solid; COLOR: #000000; FONT-SIZE: 12px
}
.font {
FILTER: DropShadow(Color=#cccccc, OffX=2, OffY=1, Positive=2); FONT-SIZE: 9pt; TEXT-DECORATION: none
}
</STYLE>
<script language="JavaScript">
function windowOpen(loadpos)
{controlWindow=window.open(loadpos,"surveywin","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=300,height=80,status=no,resizable=yes");
}
</script>
<META content="MSHTML 5.00.2614.3500" name=GENERATOR></HEAD>
<BODY leftMargin=0 topMargin=0 MARGINWIDTH="0" MARGINHEIGHT="0">
<TABLE align=center background=images/log.jpg border=1
borderColor=#000000 cellPadding=0 cellSpacing=0 frame=vsides rules=none
width=760>
<TBODY>
<TR>
<TD height=150 vAlign=top width=750><SPAN style="POSITION: relative">
</SPAN>
</TD></TR></TBODY></TABLE>
<TABLE align=center background=images/menu_bg.gif border=1
borderColor=#666666 cellPadding=0 cellSpacing=0 frame=vsides height=29
rules=none width=760>
<TBODY>
<TR>
<TD
vAlign=middle height="28"> <a href="">Home</a> <a href="allnews.asp" target="_blank">News</a> <a href="kqst.asp" target="_blank">Album</a>
<a href="tjmx.htm" target="_blank">推荐明星</a> <a href="wsgw.asp" target="_blank">购物</a> <a target="_blank" href="BBS/INDEX.ASP"> Gusetbook</a></TD>
</TR></TBODY></TABLE>
<TABLE align=center bgColor=#ffffff border=1 borderColor=#666666 cellPadding=0
cellSpacing=0 frame=vsides rules=none width=760>
<TBODY>
<TD background=images/menu_bg2.gif height=4
width=760></TD></TR></TBODY></TABLE>
<TABLE align=center border=1 borderColor=#666666 cellPadding=0 cellSpacing=0
frame=vsides rules=none width=760>
<TBODY>
<TR>
<TD align=left background=images/left_bg.gif vAlign=top width=204>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD width=204><IMG border=0 src="images/left_top.gif"
useMap=#Map><MAP name=Map><AREA coords="41, 11, 67, 24"
href="BBS/INDEX.ASP" shape=RECT
title=留言本><AREA coords="114, 11, 140, 24"
href="BBS/INDEX.ASP" shape=RECT
target=_blank title=我爱音乐网论坛></MAP></TD></TR></TBODY></TABLE>
<TABLE align=left border=0 cellPadding=0 cellSpacing=0 width=196>
<TBODY>
<TR>
<TD align=middle background=images/title.jpg height=24><STRONG>总
量 排 行</STRONG></TD></TR>
<TR>
<TD> <!--#include file="home_sort.asp"--> </TD></TR>
<TR></TR></TBODY></TABLE></TD>
<TD background=images/xu.gif height=190 width=1></TD>
<TD align=left bgColor=#ffffff vAlign=top width=553>
<TABLE border=0>
<TBODY>
<TR>
<TD height=5></TD></TR></TBODY></TABLE>
<%set rs=server.createobject("adodb.recordset")
dim page
page=request("page")
if not isempty(page) then
pagecount=cint(page)
else
pagecount=1
end if
sql="select * from kq order by id desc"
rs.open sql,conn,1,1
totalrecs=rs.recordcount
rs.pagesize=20
if pagecount>rs.pagecount or pagecount<=0 then
pagecount=1
end if
totalpages=cint(rs.pagecount)
rs.AbsolutePage=pagecount
%>
<TABLE align=center background=images/mainbg.gif border=0
cellPadding=2 cellSpacing=0 height=25 width=530>
<TBODY>
<TR>
<TD> <IMG align=absMiddle
src="images/biao.gif">
共有<SPAN><%=totalrecs%></SPAN>首歌曲</TD></TR></TBODY></TABLE>
<TABLE align=center bgColor=#ffffff border=1 borderColor=#c0c0c0
cellPadding=3 cellSpacing=0 style="BORDER-COLLAPSE: collapse" width=530>
<TBODY>
<TR>
<TD align=middle bgColor=#ececec height=22 width="63%">歌曲列表</TD>
<TD align=middle bgColor=#ececec width="10%">点击</TD>
<TD align=middle bgColor=#ececec width="27%">更新时间</TD></TR>
<% do while not rs.eof %>
<TR>
<TD> <IMG border=0 src="images/none.gif"><IMG border=0
src="images/i2.gif"> <A
href=# onClick=windowOpen('mfplayrm.asp?id=<%=rs("id")%>') title=评价:★★★★★><%=rs("kqmc")%></A></TD>
<TD align=middle><%=rs("click")%></TD>
<TD align=middle><%=rs("time")%></TD></TR>
<% i=i+1
rs.movenext
if i>=rs.PageSize then exit do
loop
%>
<FORM action=dj.asp?djcat_id= method=post name=form1>
<TR>
<TD align=right bgColor=#ececec colSpan=3>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0
width="100%">
<TBODY>
<TR>
<TD align=middle height=25 width="35%"><IMG align=absMiddle
height=14 src="images/cha.gif" width=14> 共[<FONT
color=#ff6666><%=totalrecs%></FONT>]个专辑 分[<FONT
color=#ff6666><%=totalpages%></FONT>]页</TD>
<TD align=middle bgColor=#e6e6e6 width="40%"><IMG
align=absMiddle height=11 src="images/lt.gif" width=11>
<% if pagecount=1 then %>
<FONT color=#999966>首页 上一页</FONT>
<% else %>
<FONT color=#999966><a href=kqst.asp?page=1>首页</a> <a href=kqst.asp?page=<%=pagecount-1%>>上一页</a></FONT>
<% end if %>
<%if rs.PageCount-pagecount<1 then %>
<FONT color=#999966>下一页 尾页</FONT>
<% else %>
<FONT color=#999966><a href=kqst.asp?page=<%=pagecount+1%>>下一页</a> <a href=kqst.asp?page=<%=rs.pagecount%>>尾页</a></FONT>
<% end if %>
<IMG align=absMiddle height=11 src="images/gt.gif"
width=11></TD>
<TD align=middle width="25%">
</TD></TR></TBODY></TABLE></TD></TR></FORM></TBODY></TABLE>
<TABLE border=0>
<TBODY>
<TR>
<TD height=5></TD></TR></TBODY></TABLE>
<TABLE border=0>
<TBODY>
<TR>
<TD height=5></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE align=center bgColor=#ffffff border=1 borderColor=#666666 cellPadding=0
cellSpacing=0 frame=vsides rules=none width=760>
<TBODY>
<TR>
<TD background=images/xu2.gif height=1></TD></TR>
<TR>
<TD align=middle background=images/anbg.gif
height=30><FONT color=#000000>
本站是本人的毕业设计，由于时间和水平有限，错误和疏忽请老师批评指正！
</FONT></TD></TR>
<TR>
<TD background=images/xu2.gif height=1></TD></TR></TBODY></TABLE>
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId>
<TABLE align=center background=images/sangpump_01.gif bgColor=#ffffff
border=0 borderColor=#666666 cellPadding=0 cellSpacing=0 frame=vsides height=68
rules=none width=760>
<TR>
<TD align=middle height=68 vAlign=top>
<TABLE align=center border=0 height=47
style="BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid"
width=760>
<TR>
<TD align=right height=43 width=269>
<P><IMG src="images/copyright.gif"></P></TD>
<TD class=font height=43 vAlign=center width=466>
<P><FONT color=#000000>2007.04-2007.05 © 我爱音乐 版权所有
<BR>
<FONT color=#000000>
</FONT></FONT></P></TD>
<P></P></table></TD>
<TD height=43
width=5></TD></TR></TABLE></BODY></HTML>
<% rs.close
set rs=nothing
conn.close
set conn=nothing
%>