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

📄 so.asp

📁 手机网址导航网站手机网址导航网站手机网址导航网站
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="head.asp"--><!--
body		{background:url(images/top_7kbackground.gif); background-position:top; background-repeat:repeat-x;}
td {font-size: 12px;font-family: "宋体","Arial";COLOR: #2B2B2B}
.border {BORDER-BOTTOM: #ffffff 1px solid;BORDER-LEFT: #ffffff 1px solid;BORDER-RIGHT: #ffffff 1px solid;BORDER-TOP: #ffffff 1px solid}
.p1 {FONT-FAMILY: "宋体","Arial";FONT-SIZE: 9pt;LETTER-SPACING: 1px;LINE-HEIGHT: 135%;MARGIN-BOTTOM: 0px;MARGIN-TOP: 0px;ADDING-BOTTOM: 0px;PADDING-TOP: 4px;WORD-SPACING: 1px}
.p2 {FONT-FAMILY: "宋体","Arial";FONT-SIZE: 9pt;LINE-HEIGHT: 180%}
A {COLOR: #005EF9; TEXT-DECORATION: none}
.copy { font-family: Arial; font-size:12px; color: #040404; }
A:hover {COLOR: #FF0000; TEXT-DECORATION: underline}
.no {font-family: "Arial", "Helvetica", "sans-serif"; font-size: xx-small; line-height: 100%}
.cn {font-family: "宋体","Arial", "simsun"; font-size: 14.6px}
.border2 {BORDER-BOTTOM: #C0C0C0 1px solid;BORDER-LEFT: #C0C0C0 1px solid;BORDER-RIGHT: #C0C0C0 1px solid;BORDER-TOP: #C0C0C0 1px solid}
A.link3:link {color:#2B2B2B; TEXT-DECORATION: none}
A.link3:visited {color:#2B2B2B; TEXT-DECORATION: none}
A.link3:active {color:#ff0000; TEXT-DECORATION: underline}
A.link3:hover {color:#ff0000; TEXT-DECORATION: underline}
A.link4:link {color:#005EF9; TEXT-DECORATION: none}
A.link4:visited {color:#005EF9; TEXT-DECORATION: none}
A.link4:active {color:#ff0000; TEXT-DECORATION: underline}
A.link4:hover {color:#ff0000; TEXT-DECORATION: underline}
A.red_txt:link {color:#ff0000;}
A.red_txt:visited {color:#ff0000;}
A.red_txt:active {color:#ff0000;}
A.red_txt:hover {color:#ff0000;}
.login {font-size:15px}
.cn1 {	FONT-SIZE: 14px; FONT-FAMILY: "宋体","Arial", "simsun"
}
.p11 {	MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p111 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p112 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p113 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p114 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p1131 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.p1141 {MARGIN-TOP: 0px; FONT-SIZE: 9pt; MARGIN-BOTTOM: 0px; WORD-SPACING: 1px; LINE-HEIGHT: 135%; PADDING-TOP: 4px; FONT-FAMILY: "宋体","Arial"; LETTER-SPACING: 1px; ADDING-BOTTOM: 0px
}
.style2 {color: #FF0000}
.style3 {color: #FF6600}
-->
</style>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0>
  <td width="507"><TBODY>
  
  <TR>
    <TD colspan="3" vAlign=top><TABLE height=65 cellSpacing=0 cellPadding=0 width="100%" 
              border=0>
      <SCRIPT language=Javascript>
<!--
function urlencode(str) {
	var ns = (navigator.appName=="Netscape") ? 1 : 0;
	if (ns) { return escape(str); }
	var ms = "%25#23 20+2B?3F<3C>3E{7B}7D[5B]5D|7C^5E~7E`60";
	var msi = 0;
	var i,c,rs,ts ;
	while (msi < ms.length) {
		c = ms.charAt(msi);
		rs = ms.substring(++msi, msi +2);
		msi += 2;
		i = 0;
		while (true)	{ 
			i = str.indexOf(c, i);
			if (i == -1) break;
			ts = str.substring(0, i);
			str = ts + "%" + rs + str.substring(++i, str.length);
		}
	}
	return str;
}
//-->
        </SCRIPT>
      <form action="search.asp" method="post" name="search" target="_blank" onSubmit="return check(this.form)">
        <TBODY>
          <TR>
            <TD width=219 rowSpan=2><IMG height=70 
                  src="too.files/ss7k_zuo.gif" width=8 border=0></TD>
            <TD align=middle width=244 height=40><P align=right>
                <INPUT name=keyword class=login id="keyword" size="30" maxLength=70>
            </P></TD>
            <TD width=133 height=40> 
              <select name="select">
                <option>一星搜索</option>
                <option>二星搜索</option>
                <option>三星搜索</option>
                <option>四星搜索</option>
                <option>五星搜索</option>
                                          </select></TD>
            <TD width=151 height=40><A 
                  href="index.asp">
              <input name="Submit2" type="submit" id="Submit2" value="星级搜索">
            </A></TD>
            <TD align=right width=13 rowSpan=2><IMG height=70 
                  src="too.files/ss7k_you.gif" width=8 border=0></TD>
          </TR>
          </FORM>
      <TR>
        <TD align=middle colSpan=3 height=30>&nbsp;</TD>
      </TR>
  </TBODY>
  
    </TABLE></TD>
  </TR>
  </TBODY>
</TABLE>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td height="13"> 
      <table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td>&nbsp;</td>
        </tr>
      </table>
      <table width="760" border="0" cellpadding="0" cellspacing="0" align="center">
        <tr class="font"> 
          <td width="800" valign="top" bgcolor="#FFFFFF"> 
            <table border=0 cellpadding=0 cellspacing=0 width=760 height="74">
              <tbody> 
              <tr> 
                <td valign=top width=698> 
                  <div align=center> 
                    
                    <table width="760" border="1" style="border-collapse: collapse"  cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" height="35" align="center" bordercolor="#8cdf18">
                      <%
Set rs=Server.CreateObject("ADODB.RecordSet")
'判断classid开始
classid=request("classid")
If classid <> "" then
classid = cint(classid)
if err.number <> 0 then 
err.clear
classid = 1
end if
if classid < 1 then 
classid = 1
end if 
else
classid = 1
End if
'判断classid结束
if Request("classid")<>"" then
sql="Select * from music where class=" & classid & "and isview=1 order by id Desc"
else
sql="Select * from music where isview=1 order by id Desc"
end if


rs.open sql,conn,1,1
rs.pagesize=80  '每页显示数目
num=rs.recordcount
pagenum=rs.pagecount
page=request("page")

if rs.eof and rs.bof then
response.Write("此分类没有Flash")
else

'判断页码开始
If page <> "" then
page = cint(page)
if err.number <> 0 then 
err.clear
page = 1
end if
if page < 1 then 
page = 1
end if 

else
page = 1
End if
if page*rs.pagesize > num and not((page-1)*rs.pagesize < num)then 
page=1
end if
'判断页码结束

rs.absolutepage = page 'absolutepage:设置指针指向某页开头
if page<>pagenum then
for i=1 to rs.pagesize
%>
                        <td   height="30" width="286"><a alt="网站简介:<%=rs("body")%>" href="<%=rs("address")%>" target="_blank"> &nbsp;<%=Left(rs("name"),10)%>                           </a>
						  <%if not rs("time") < date then%>
						  <font color="#FF0000">新</font> 
                          <%end if%>
                          <%if rs("d")>80 then%>
                          <font color="#FF0000">热</font> 
                          <%end if%>
						 <%if rs("isgood")=true then%>
        <font color="#FF0000"><img src="images/promote.gif" width="24" height="13"> 
        <%end if%>
        </font>                          </td>
                      <%
if (i mod 4)=0 then response.write "</tr><tr>"
rs.movenext
next
else
for i=1 to num-(page-1)*rs.pagesize
%>
                        <td height="30" bgcolor="#FFFFFF" width="283"><a alt="网站简介:<%=rs("body")%>" href="<%=rs("address")%>" target="_blank">&nbsp;<%=Left(rs("name"),10)%>                          </a>
                          <%if not rs("time") < date then%>
                          <font color="#FF0000">新</font> 
                          <%end if%>
                          <%if rs("d")>80 then%>
                          <font color="#FF0000">热</font>
                          <%end if%>
                         
                        <%if rs("isgood")=true then%>
        <font color="#FF0000"><img src="images/promote.gif" width="24" height="13">
        <%end if%>
        </font>                        </td>
                      <%
							if (i mod 4)=0 then response.write "</tr><tr>"
rs.movenext
next
end if
end if
rs.close
Set rs=nothing
%>
                    </table>
                    <table width="100%" border="0">
                      <tr>
                        <td>&nbsp;</td>
                      </tr>
                    </table>
                    <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" height="13">
                      <tr> 
                        <td> 
                          <div align="center" class="font"><font color="#333333">共有99<%=num%> 个网站 | <a href="index.asp?page=1&classid=<%=request("classid")%>"><img src="images/PAGE_TOP.GIF" width="50" height="17" border="0"></a> 
                            | 
                            <%if page>1 then%>
                             
                            <%end if%>
                            <a href="index.asp?page=<%=page-1%>&classid=<%=request("classid")%>"><img src="images/PAGE_PV.GIF" width="50" height="17" border="0"></a> | 
                            <%if page<pagenum then%>
                             
                            <%end if%>
                            <a href="index.asp?page=<%=page+1%>&classid=<%=request("classid")%>"><img src="images/page_next.gif" width="50" height="17" border="0"></a>|  
                            <a href="index.asp?page=<%if pagenum=0 then%>1<%else%><%=pagenum%><%end if%>&classid=<%=request("classid")%>"><img src="images/PAGE_END.GIF" width="50" height="17" border="0"></a>| 页次:<%=page%>/<%=pagenum%>页 | 共<%=pagenum%>页</font></div>                        </td>
                      </tr>
                    </table>
                  </div>                </td>
              </tr>
            </table>          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<!--#include file="foot.asp"-->

⌨️ 快捷键说明

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