z-z-zuixin.asp

来自「全站生成htm静态页面」· ASP 代码 · 共 38 行

ASP
38
字号
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css"></head>
<body bottommargin="0" topmargin="0" leftmargin="0" rightmargin="0">
<table width='275' align="center" cellpadding="2" cellspacing="0" bordercolordark='#FFFFFF' bgcolor="#ffffff">
  <tr> 
    <%
m=0
set rs=conn.execute("SELECT top 100 mtvlistid,name,NClass,Times,NClassID,hits FROM Mtvlist order by mtvlistid desc") 
if not Rs.eof then
do while not rs.eof
m=m+1
if len(rs("name"))>9 then
name=left(rs("name"),9)
else
name=rs("name")
end if
%>
    <td width="8" height="11"><font color="#009933"><%=m%></font></td>
    <td width="45%"><A href="/html/<%=rs("mtvlistid")%>.htm" target=_blank><%=name%></a></td>
    <td width="26%"><img src="/images/albumzx.gif" width="11" height="11"><A href="../mtv/<%=rs("NClassID")%>_1.htm" target=_blank><%=left(rs("Nclass"),4)%></a></td>
    <td width="24%"><font color="red">(<%=rs("Times")%>)</font></td>
	<%if (m mod 1)=0 and m>=1 then%></tr>
<%end if%>
<%
if m>=10 then exit do
rs.movenext 
loop
else
response.write "尚无收录"
end if
rs.close
%>
</table>
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?