📄 gq.asp
字号:
<!--#include file="yz.asp"-->
<!--#include file="css.asp"-->
<body>
<div align="center">
<center>
<table border="0" cellpadding="4" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="90%">
<tr>
<td width="100%" background="images/title.gif">
<p align="right"><font color="#3366CC"><b>MTV歌曲管理</b></font></td>
</tr>
<tr>
<td width="100%" bgcolor="#E6ECF9"><!--#include file="yz.asp"-->
<html><head>
<body>
<!--#include file="data.asp"-->
<%
dim page
page=request.querystring("page")
PageSize = 10
rs.open "Select * From 歌曲 Order by 加入时间 DESC ",conn,3,3
rs.PageSize = PageSize
pgnum=rs.Pagecount
if page="" or clng(page)<1 then page=1
if clng(page) > pgnum then page=pgnum
if pgnum>0 then rs.AbsolutePage=page%>
</div>
<div align="center">
<center>
<table border="1" cellspacing="0" cellpadding="4" width="100%" style="border-collapse: collapse" bordercolor="#C0C0C0">
<tr align="center" >
<td width="289" bgcolor="#808080"><font color="#FFFFFF">MTV名称</font></td>
<td width="187" bgcolor="#808080"><font color="#FFFFFF">歌手名</font></td>
<td width="122" bgcolor="#808080"><font color="#FFFFFF">所属分类</font></td>
<td width="113" bgcolor="#808080"><font color="#FFFFFF">点击</font></td>
<td width="120" colspan="2" bgcolor="#808080"><font color="#FFFFFF">操作</font></td>
</tr><%count=0
do while not (rs.eof or rs.bof) and count<rs.PageSize%>
<tr align="center">
<td width="289"><p align="left"> <b><%=count%>.</b><a href="gqxg.asp?song=<%=rs("歌名")%>"><%=rs("歌名")%></a></p></td>
<td width="187"><%=rs("歌手姓名")%> </td><td width="122"><%=rs("所属分类")%> </td>
<td width="113"><%=rs("dd")%> </td><td width="75"><a href="gqxg.asp?song=<%=rs("歌名")%>">[修改]</a></td><td width="75">
<a href="delgq.asp?song=<%=rs("歌名")%>"> [删除]</a></td></tr><%
rs.movenext
count=count+1
loop
%>
</table></center>
</div>
<div align="center">
<center>
<table border="0" cellspacing="0" cellpadding="4" width="100%" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td align=left width="428" >[共<%=rs.pagecount%>页][<%=musers()%></b>条记录]</td>
<td align=right width="435">[<a href="gq.asp?page=<%=page-1%>">上一页</a>][第<%=page%>页][<a href="gq.asp?page=<%=page+1%>">下一页</a>]</td>
</tr></table>
</center>
</div>
<form name="form1" method="post" action="gqxg.asp">
<div align="right">MTV名称：
<input name="song" type="text" size="15" style="font-size: 9pt; border-style: solid; border-width: 1">
<input type="submit" name="Submit" value="搜 索" style="font-size: 9pt; border-style: solid; border-width: 1">
</div>
</form>
</body></html>
<%function musers()
dim tmprs
tmprs=conn.execute("Select count(*) As 歌名 from 歌曲 ")
musers=tmprs("歌名")
set tmprs=nothing
if isnull(musers) then musers=0
end function%></td>
</tr>
</table>
</center>
</div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -