⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 list_more_zyzn.asp

📁 十分好的音乐网站源码 十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码
💻 ASP
字号:
<!--#include file=conn/adodb.asp-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><!--#include file=title.asp--></title>
<style type="text/css">
<!--
.fontt {
	font-size: 9pt;
	text-decoration: none;
}
-->
</style>
<style type="text/css">
<!--
a:hover {
	font-weight: bold;
	color: #FF6600;
}
-->
</style>
<style type="text/css">
<!--
.hhh {
	line-height: 5pt;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) {  //reloads the window if Nav4 resized
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>

<body bgcolor="#999999" topmargin="0">
<table width="80%" border="0" align="center" cellspacing="0">
  <tr> 
    <td width="48%" valign="top"> <div align="center"> 
        <!--#include file=top.asp-->
      </div></td>
  </tr>
  <tr>
    <td valign="top" bgcolor="#FFFFFF">
<table width="99%" border="0" cellspacing="0">
        <tr> 
          <td>&nbsp; </td>
        </tr>
        <tr> 
          <td><div align="center"> 
              <%
			  dim id,ty
			  lx=trim(request("lx"))
		
dim sql,rs

set rs=server.createobject("adodb.recordset")

sql="select * from zyzn where lx='"&lx&"'order by timm desc "
rs.open sql,db,1,1

if rs.eof and rs.bof then
 response.write "没有任何数据!"
 response.end 
 else
if not isempty(request.querystring("page")) then   
pagecount=cint(request.querystring("page"))   
else   
pagecount=1
end if
rs.pagesize=16
rs.AbsolutePage=pagecount
dim num
num=pagecount
		 do while not rs.eof
		 %>
              <TABLE cellSpacing=0 cellPadding=0 width=709 
                                border=0>
                <TBODY>
                  <TR> 
                    <TD width="19" height=24 align=center noWrap> <a  class="fontt" target="_blank" href="list_zyzn.asp?id=<%=rs("id")%>"> 
                      </a><img src="image/icon01.gif" width="20" height="20"> 
                    </TD>
                    <TD width="359" align=left noWrap><a  class="fontt" target="_blank" href="list_zyzn.asp?id=<%=rs("id")%>"><%=rs("title")%></a></TD>
                    <TD width=10><IMG height=24 
                                src="image/index_diaoyong1.gif" 
                                width=6></TD>
                    <TD width="321" noWrap><%=rs("timm")%></TD>
                  </TR>
                </TBODY>
              </TABLE>
              <%
i=i+1                                                                     
if i>=rs.pagesize then exit do                              
loop
end if
%>
            </div></TD>
        </TR>
        <TR> 
          <TD width=709 bgColor=#cccccc height=3></TD>
          <TD width=71 bgColor=#ff9900></TD>
        </TR>
        <tr> 
          <td height="51" colspan=6> 
            <form name="form1" >
              <div align="center"> 
                <p class="fontt"><br>
                  共有<%=rs.recordcount%>个信息,当前页<%=pagecount%>/<%=rs.pagecount%>总页数 
                  <% if pagecount>1 then %>
                  <a href="list_more_zyzn.asp?page=<%=cstr(pagecount-1)%>&lx=<%=lx%>" > 
                  <span class="fontt"><font color="#000000">上一页</font></span></a> 
                  <%end if%>
                  <%if rs.pagecount<>pagecount and rs.pagecount>0 then%>
                  <a href="list_more_zyzn.asp?page=<%=cstr(pagecount+1)%>&lx=<%=lx%>" > 
                  <span class="fontt"><font color="#000000">下一页</font></span></a> 
                  <% end if %>
                </p>
              </div>
            </form></TABLE>
    </td>
  </tr>
  <tr> 
    <td> 
      <!--#include file=bottom.asp-->
    </td>
  </tr>
</table>
    </body>
</html>

⌨️ 快捷键说明

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