| |
| ·当前共收录歌手:<%=Singernum()%> 人 |
| ·此类共收录歌曲:<%=musers()%> 首 |
| ·当前共收录歌曲:<%=musersnum()%> 首 |
| ·今日共收录歌曲:<%=AddToday()%> 首 |
| |
<%
set rs=server.createobject("adodb.recordset")
i=0
ii=0
Shangpin=20
sql="SELECT * FROM Mtv order by id desc"
rs.Open sql,conn,1,1
%>
<%
do while not rs.eof
i=i+1
if i < 10 then ii= 0&i else ii=i end if
%>
| <%=ii %>. |
','0713CN','scrollbars=no,resizable=no,width=400,height=350,menubar=no,top=150,left=150')"><%=left(rs("GeQuName"),16)%>(<%=rs("hot")%>) |
<%
if (i mod (Shangpin/10)=0) and i>=(Shangpin/10) then
%>
<%
end if
if i>=Shangpin then exit do
rs.movenext
loop
%>
|
|
| |
<%
set rs=server.createobject("adodb.recordset")
i=0
ii=0
Shangpin=20
sql="SELECT * FROM Mtv where Tueijian=true order by id desc"
rs.Open sql,conn,1,1
%>
<%
do while not rs.eof
i=i+1
if i < 10 then ii= 0&i else ii=i end if
%>
| <%=ii%>. |
','0713CN','scrollbars=no,resizable=no,width=400,height=350,menubar=no,top=150,left=150')"><%=left(rs("GeQuName"),16)%>(<%=rs("hot")%>) |
<%
if (i mod (Shangpin/10)=0) and i>=(Shangpin/10) then
%>
<%
end if
if i>=Shangpin then exit do
rs.movenext
loop
%>
|
|
| |
|
<%
dim page,lujing
page=request.querystring("page")
PageSize = 9
if id="" and nr="" then
rs.open "Select * From Mtv Order by Hot DESC ",conn,3,3
end if
if id<>"" then
rs.open "Select * From Mtv where Class_id="&id&" Order by id DESC ",conn,3,3
end if
if nr<>"" then
rs.open "Select * From Mtv where "&xz&" like'%"&nr&"%' Order by id DESC ",conn,3,3
end if
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
%>
<%count=0
do while not (rs.eof or rs.bof) and count
|
|
|
<%
rs.movenext
count=count+1
loop
%>
|
| 此类共<%=musers()%>首歌曲 首页 上一页 下一页 尾页 页次:<%=page%>/<%=rs.pagecount%>页 |
|
|
|
|
| |
<%
set rs=server.createobject("adodb.recordset")
i=0
ii=0
Shangpin=20
sql="SELECT * FROM Mtv order by hot desc"
rs.Open sql,conn,1,1
%>
<%
do while not rs.eof
i=i+1
if i < 10 then ii= 0&i else ii=i end if
%>
| <%=ii%>. |
','0713CN','scrollbars=no,resizable=no,width=400,height=350,menubar=no,top=150,left=150')"><%=left(rs("GeQuName"),14)%> |
<%=rs("hot")%> |
<%
if (i mod (Shangpin/20)=0) and i>=(Shangpin/20) then
%>
<%
end if
if i>=Shangpin then exit do
rs.movenext
loop
%>
|
|