Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
Gu_down.asp
Package: pinke2010.rar [view]
Upload User: pengwei803
Upload Date: 2021-02-10
Package Size: 3311k
Code Size: 4k
Category:
WEB(ASP,PHP,...)
Development Platform:
HTML/CSS
- <!--#include file="ku_top.asp"-->
- <% kuid=request.querystring("guxing")
- if kuid<>"" then
- set rsdown=server.CreateObject("adodb.recordset")
- sqldown="select * from Ku_downkind where id="&kuid
- rsdown.open sqldown,conn,1,1
- if (rsdown.eof and rsdown.bof) then
- Response.Write "<script>alert(""请停止你的黑客行为!"");location.href=""javascript:history.back()"";</script>"
- end if
- end if
- %>
- <%
- function title()
- title="拼客下载"
- end function
- %>
- <div align="center">
- <table cellpadding="0" cellspacing="0" width="100">
- <tr>
- <td height="5"></td>
- </tr>
- </table>
- </div>
- <div align="center">
- <table border="0" width="980" height="454" cellpadding="0" cellspacing="0">
- <tr>
- <td height="454" width="740" valign="top">
- <div align="center">
- <table cellpadding="0" cellspacing="0" width="740" height="452">
- <tr>
- <td height="36" background="Ku_img/News/news_001.JPG"><div id="dazi">
- <p align="left">
- <b><font color="#0066FF">
- </font>下载列表</b></div> </td>
- </tr>
- <tr>
- <td height="396" background="Ku_img/News/news_002.JPG" valign="top">
- <div align=center>
- <table width="735" border="0" align="center" cellpadding="0" cellspacing="0">
- <tr>
- <td colspan="2">
- <table width="100%" border="0" align="center" cellpadding="3" cellspacing="1" >
- <%
- if kuid="" then
- set rs=server.createobject("adodb.recordset")
- sql="select * from ku_down where 1=1 "
- else
- set rs=server.createobject("adodb.recordset")
- sql="select * from ku_down where class="&kuid
- end if
- sql=sql&" order by addtime desc"
- rs.open sql,conn,1,1
- dim a
- Set a=New PageList
- listLimit=9
- '模拟分页一页显示分页数
- pageLists=5
- '设置分页参数
- If rs.BOF or rs.EOF Then
- %>
- <tr bgcolor="#C6E3F4">
- <td height="24" colspan="5" align="center" bgcolor="#FFFFFF">此类暂无软件可下载!</td>
- </tr>
- <%
- else
- '分页循环开始
- totalList=rs.recordcount
- a.InitPara=array(totalList,listLimit,pageLists)
- a.PageList()
- rs.pagesize=listLimit
- page = request("page")
- If page="" Then
- page=1
- End If
- rs.absolutepage = page
- for i=1 to rs.pagesize
- %>
- <tr><td colspan="4">
- <img border="0" src="Ku_img/down_index.gif" width="11" height="13"> <b>
- <a href="Gu_showsoft.asp?guxing=<%=rs("id")%>" title="<%=rs("name")%>" >
- <%=Trim(rs("name"))%></a>
- </b></td></tr>
- <tr><td colspan="4" onMouseOver='this.style.backgroundColor="#F6f6f6"'
- onMouseOut='this.style.backgroundColor="#FAFAFA"'> <%=left(rs("content"),200)%>...
- </td></tr>
- <tr bgcolor="#FAFAFA">
- <td height="24" width="25%">
- 大小:
- <%=rs("big")%> KB
- </td>
- <td height="24" width="25%">
- 下载需要:<%=rs("jifen")%> 积分
- </td>
- <td width="25%">加入日期:<%=DateTimeFormat(rs("addtime"),4)%></td>
- <%
- kuuid=rs("class")
- set kurs=server.createobject("adodb.recordset")
- csql="select * from ku_downkind where id="&kuuid
- kurs.open csql,conn,1,3
- %>
- <td align="center">所属分类:【<a href="Ku_down.asp?ku_id=<%=kurs("id")%>"><font color="#FF0000"><%=kurs("name")%></font></a>】</td>
- </tr>
- <%
- rs.movenext
- if rs.eof then exit for
- next
- end if
- %>
- </table></td>
- </tr>
- </table>
- </div>
- <%
- rs.close
- set rs=nohing
- %>
- </td>
- </tr>
- <tr>
- <td height="16" background="Ku_img/News/news_002.JPG" align=center> <%=a.PageInfo%></td>
- </tr>
- <tr>
- <td height="4">
- <img border="0" src="Ku_img/News/news_003.JPG" width="740" height="4"></td>
- </tr>
- </table>
- </div>
- </td>
- <td height="454" width="8"> </td>
- <td height="454" width="232" valign="top">
- <!--#include file="Ku_type/Index_login.asp"-->
- <!--#include file="Ku_type/down_kind.asp"-->
- </td>
- </tr>
- </table>
- </div>
- <!--#include file="Ku_foot.asp"-->