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

📄 index.asp

📁 应用于手机下载的一款较实用的软件。该软件能帮你让手机下载多种资源
💻 ASP
字号:
<!--#include file="db/user.asp" -->
<%
search=request.form("search")
tpe=request("type")
searchtype=request("searchtype")
if search<>"" then
	if searchtype="0" then
		response.write "请选择搜索范围"
		response.end
	end if
end if
If request.querystring("page")="" Then
	absPageNum = 1
else
	absPageNum=cint(request.querystring("page"))
end if
RecordPerPage = 18
Set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType = adOpenStatic
rs.CacheSize = RecordPerPage
if tpe<>"" and search="" then
	sql="SELECT * FROM download where sortcount="&tpe&" order by time desc"
elseif search<>"" and searchtype<>"0" then
	sql="select * from download where "&searchtype&" like '%"&search&"%' order by time desc"
else
	sql="SELECT * FROM download order by time desc"
end if
rs.OPEN sql, Conn,1,1
rs.PageSize = RecordPerPage
Tol = rs.PageCount
		If Not(rs.EOF) Then
			rs.AbsolutePage = absPageNum
		End If
%>
<!--#include file="head.asp"-->
<!--#include file="first.asp" -->
<table width="737" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr> 
    <td width="239" height="359" valign="top"> 
      <%if tpe<>"" then%>
      <table width="243" border="0" align="center" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="25" background="img/665.gif"> 
            <div align="center"><font color="#FFFFFF"><b>本类下载排行 TOP15</b></font></div>
          </td>
        </tr>
      </table>
      <table width="243" border="0" align="center" cellspacing="1" cellpadding="4" bgcolor="#000000">
        <tr> 
          <td bgcolor="#FFFFFF">
            <script language="JavaScript" src="zoom.asp?name=down&st=<%=request("type")%>&wz=1"></script>
          </td>
        </tr>
      </table>
      <%end if%>
      <%if tpe="" then%>
      <table width="243" border="0" align="center" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="25" background="img/665.gif"> 
            <div align="center"><font color="#FFFFFF"><b>最近更新软件 TOP15</b></font></div>
          </td>
        </tr>
      </table>
      <table width="243" border="0" align="center" cellspacing="1" cellpadding="4" bgcolor="#000000">
        <tr> 
          <td bgcolor="#FFFFFF" valign="top">
            <script language="JavaScript" src="zoom.asp?name=allhot&wz=1"></script>
          </td>
        </tr>
      </table>
      <%end if%>
      <table width="243" border="0" align="center" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="25" background="img/665.gif"> 
            <div align="center"><font color="#FFFFFF"><b> 
            总下载排行 TOP15</b></font></div>
          </td>
        </tr>
      </table>
      <table width="243" border="0" align="center" cellspacing="1" cellpadding="4" bgcolor="#000000">
        <tr> 
          <td bgcolor="#FFFFFF" valign="top"> 
            <script language="JavaScript" src="zoom.asp?name=alldown&wz=1"></script>
          </td>
        </tr>
      </table>
      
      
      <table width="243" border="0" align="center" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="25" background="img/665.gif"> 
            <div align="center"><font color="#FFFFFF"><b> 本 站 声 明</b></font></div>
          </td>
        </tr>
      </table>
      <table width="243" border="0" align="center" cellspacing="1" cellpadding="4" bgcolor="#000000">
        <tr> 
          <td bgcolor="#FFFFFF" valign="top" height="138"> 欢迎你来到十年网(10nn.cn 10yu.cn 10nokia.cn 10md.cn),本站帮你免费收集软件给你们下载,本站软件都已经通过杀毒你们可以放心的下,本站只是为方便网友下载而收集,我们以NOKIAS60版本为主,网友可以收集软件上传到本网站。本网站收管理多名,如谁有意的可以加QQ290999288联系,或<a href="mailto:jianwei8575@126.com"><font color="#0000FF">来信</font></a>告诉我们,让我们一起做个最好的手机软件下载站!<br>
            <font color="#FF0000">S60机型:</font><a href="http://www.10nn.cn/S60.htm"><font color="#FF0000">点击察看S60所有机型
            </a><font color="#0000FF">诺基亚3650 诺基亚7650 诺基亚6600 诺基亚3660 诺基亚6260 诺基亚6670 诺基亚N-Gage 诺基亚6681 诺基亚N-GageQD 诺基亚N91 诺基亚6630 诺基亚N90 诺基亚N93 诺基亚N80 诺基亚5500 诺基亚E50 诺基亚N71 诺基亚6290 诺基亚6300 诺基亚N72 诺基亚N73 诺基亚N93i 诺基亚N76 诺基亚7610 诺基亚3230 诺基亚3250 诺基亚E65 诺基亚N75 诺基亚6110Navigator 诺基亚N70基亚N77 诺基亚E61i 诺基亚E90 诺基亚6120 诺基亚8600 诺基亚N80 诺基亚6500c LGKS10三星 SGH-i400 三星SGH-i520 联想P930 三星SGH-D728 松下X700 松下X800 西门子SX1 摩托罗拉V1000</td>
        </tr>
      </table>
    </td>
    <td width="500" valign="top"> 
      <table border=1 cellpadding=3 cellspacing=0 style='border-collapse:collapse' bgcolor=white bordercolor=#E4E4E4 width=100%>
        <tr> 
          <td width=100% align=right class=shadow2> 
            <%
for ppages=1 to rs.pagecount
if ppages=cint(absPageNum) then
%>
            <b><font color=red>[<%=ppages%>]</font></b> 
            <%
else
	if tpe="" then
%>
            <a href='index.asp?page=<%=ppages%>'>[<%=ppages%>]</a> 
            <%	elseif tpe<>"" then%>
            <a href='index.asp?type=<%=tpe%>&page=<%=ppages%>'>[<%=ppages%>]</a> 
            <%
	end if
end if
next
abcd=absPageNum+1
if abcd>=rs.pagecount then
	abcd=rs.pagecount
end if
%>
            <%if tpe="" then%>
            <a title='下一页' href='index.asp?page=<%=abcd%>'>[>]</a> 
            <%elseif tpe<>"" then%>
            <a title='下一页' href='index.asp?type=<%=tpe%>&page=<%=abcd%>'>[>]</a> 
            <%
end if
%>
          </td>
        </tr>
      </table>
      <%
if rs.eof and rs.bof then
	response.write "<p align='center'>无内容</p>"
else
For absRecordNum = 1 to rs.PageSize%>
      <table border=1 cellpadding=3 cellspacing=0 style='border-collapse:collapse' bordercolor=#E4E4E4 width=100% bgcolor=#E4E4E4>
        <tr> 
          <td bgcolor="#F5F5F5" colspan=2><b> <a href='./show.asp?id=<%=rs("id")%>' target=_blank><%=rs("name")%></a> 
            </b></td>
          <td bgcolor="#F5F5F5" colspan=2 align=right class=p1><%=rs("big")%>┃<%=rs("sort")%> 
            &nbsp;&nbsp; </td>
        </tr>
        <tr> 
          <td width=25% bgcolor=#efefef align=center>更新日期</td>
          <td width=25% bgcolor=white><%=rs("time")%></td>
          <td width=16% bgcolor=#efefef align=center>推荐程度</td>
          <td width=34% bgcolor=white> <img src='./images/<%=rs("commend")%>' width=55 height=12> 
            <%=rs("downcount")%>/<%=rs("count")%> </td>
        </tr>
        <tr> 
          <td colspan=4 bgcolor=white style='table-layout: fixed; word-break: break-all; text-indent: 40; line-height: 130%'> 
            <%
kao=rs("show")
if len(kao)>20 then
	kao=left(kao,20) & "..."
	response.write kao
else
	response.write kao
end if
%>
          </td>
        </tr>
      </table>
      <%
rs.movenext
    If rs.EOF Then
		Exit For
	End If
Next
end if
%>
      <table border=1 cellpadding=3 cellspacing=0 style='border-collapse:collapse' bordercolor=#E4E4E4 width=100%>
        <tr> 
          <td width=100% align=right class=shadow2> 
            <%
for ppages=1 to rs.pagecount
if ppages=cint(absPageNum) then
%>
            <b><font color=red>[<%=ppages%>]</font></b> 
            <%
else
	if tpe="" then
%>
            <a href='index.asp?page=<%=ppages%>'>[<%=ppages%>]</a> 
            <%	elseif tpe<>"" then%>
            <a href='index.asp?type=<%=tpe%>&page=<%=ppages%>'>[<%=ppages%>]</a> 
            <%
	end if
end if
next
%>
            <%if tpe="" then%>
            <a title='下一页' href='index.asp?page=<%=abcd%>'>[>]</a> 
            <%elseif tpe<>"" then%>
            <a title='下一页' href='index.asp?type=<%=tpe%>&page=<%=abcd%>'>[>]</a> 
            <%
end if
%>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<br>

</div>
<hr width=735> 
<center> 
<!--#include file="myads.asp" -->
</center> 
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body> 
</html>
<iframe marginheight =0 marginwidth =0  scrolling='no' fixuptype='bottom' style='left:5px' fixupwidth='5' frameborder='0'  width='120' height='500' src='http://go.lele.com/?a=132986&b=0&c=65&d=989&e=0&f=lele&w=120&h=500&src=aHR0cDovL3B1Yi5sZWxlLmNvbS9saWIvNzAzLmh0bWw='></iframe><script type='text/javascript' src='http://pub.lele.com/js/fixup.js'></script>
<iframe marginheight =0 marginwidth =0  scrolling='no' fixuptype='bottom' style='right:5px' fixupwidth='5' frameborder='0' width='120' height='500' src='http://go.lele.com/?a=132986&b=0&c=41&d=1441&e=0&f=lele&w=120&h=500&src=aHR0cDovL3B1Yi5sZWxlLmNvbS9saWIvOTUyLmh0bWw='></iframe><script type='text/javascript' src='http://pub.lele.com/js/fixup.js'></script>

⌨️ 快捷键说明

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