📄 downloadshow.asp
字号:
<%@ LANGUAGE=VBScript CodePage=936%>
<%option explicit%>
<%Response.Buffer=True%>
<!--#include file="Include/System.asp"-->
<!--#include file="../Inc/ubbcode.asp"-->
<!--#include file="Include/SysDown.asp"-->
<!--#include file="Include/StrLeft.asp"-->
<%
ShowSmallClassType=ShowSmallClassType_Article
dim DownID,Content
DownID=trim(request("DownID"))
if DownID="" then
response.Redirect("Download.asp")
end if
sql="select * from Download where DownID=" & DownID & ""
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
response.write"<SCRIPT language=JavaScript>alert('找不到此软件!');"
response.write"javascript:history.go(-1)</SCRIPT>"
else
rs("Hits")=rs("Hits")+1
rs.update
if rs("Hits")>=HitsOfHot then
rs("Hits")=True
rs.update
end if
BigClassName=rs("BigClassName")
SmallClassName=rs("SmallClassName")
Content=ubbcode(rs("Content"))
%>
<!--#include file="Include/Head.asp" -->
<TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
<TR>
<%if strSkins <= 200 and strSkins >= 1 then%>
<%
elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
%>
<TD vAlign=top class='M_Left_Td'>
<table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
<tr>
<td valign="top">
<% Call Left_Download() %>
</td>
</tr>
</table>
</TD>
<%end if%>
<%if strSkins <= 200 and strSkins >= 1 then%>
<TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
<%
elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
%>
<%end if%>
<TD vAlign=top >
<TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>
<% Call Style_Adcolumn() '广告栏 %>
<!-- 下载查看 -->
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 align="center" class='MC_Pt_Title'>
<TR>
<TD class='MC_Pt_TD1'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
<TD class='MC_Pt_TD2'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
<TD class='MC_Pt_TD3'><SPAN class=Glow>
<%
Response.Write "<a href='Download.asp'>下载中心</a>"
Response.Write " >> <a href='Download.asp?BigClassName=" & rs("BigClassName") & "'>" & rs("BigClassName") & "</a>"
if rs("SmallClassName") & ""<>"" then
Response.Write " >> <a href='Download.asp?BigClassName=" & rs("BigClassName")&"&SmallClassName=" & rs("SmallClassName") & "'>" & rs("SmallClassName") & "</a>"
end if
'response.write " >> "& rs("Title")
%>
</SPAN></TD>
<TD class='MC_Pt_TD4'><div align="right">
</div></TD>
<TD class='MC_Pt_TD5'><IMG src='../img/1x1_pix.gif' width=3 height=1></TD>
</TR>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<table cellSpacing=1 cellpadding=0 align="center" class='MC_DoShow_Title1'>
<TR class='MC_DoShow_T1Tr1'>
<td colspan=2> <%=rs("Title")%></TD>
</TR>
<TR class='MC_DoShow_T1Tr2'>
<td class='MC_DoShow_T1r2Td1'> 软件语言:<%=rs("Language")%></TD>
<td rowspan=6><DIV align=center><IMG src='<%=rs("PhotoUrl")%>'height=150 width=150></DIV></TD>
</TR>
<TR><td class='MC_DoShow_T1rnTd1'> 授权类型:<%=rs("LicenceType")%></TD></TR>
<TR><td class='MC_DoShow_T1rnTd1'> 文件大小:<%=rs("FileSize")%></TD></TR>
<TR><td class='MC_DoShow_T1rnTd1'> 运行环境:<%=rs("System")%></TD></TR>
<TR><td class='MC_DoShow_T1rnTd1'> 整理日期:<%=FormatDateTime(rs("UpDateTime"),2)%></TD></TR>
<TR><td class='MC_DoShow_T1rnTd1'> 下载次数:<%=rs("Hits")%></TD></TR>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<table cellSpacing=0 cellpadding=0 align="center" class='MC_DoShow_Title2'>
<TR class='MC_DoShow_t2Tr1'><td>::下载地址::</TD></TR>
<TR>
<td class='MC_DoShow_t2r2Td1'>
┊<a href="<%=rs("DownloadUrl")%>" target=_blank>下载地址1</a>┊
<%
if rs("DownloadUrl2")<>"" then
response.Write "<a href='" & rs("DownloadUrl2") & "'target=_blank>下载地址2</a>┊"
else
response.Write ""
end if
%>
</TD>
</TR>
<TR class='MC_DoShow_t2Tr3'><td>::软件简介::</TD></TR>
<TR>
<td class='MC_DoShow_t2r4Td1'>
<DIV> <%=Content%></DIV>
</TD>
</TR>
<TR class='MC_DoShow_t2Tr5'><td>::下载说明::</TD></TR>
<TR>
<td class='MC_DoShow_t2r6Td1'><DIV>
* 为了达到最快的下载速度,推荐使用<a href="http://www.amazesoft.com/" target=_blank><FONT COLOR="#0000FF">网际快车</FONT></a>下载本站软件。<BR>
* 如果您发现该软件不能下载,请通知<a href="mailto:<%=BsEmail%>"><FONT COLOR="#0000FF">管理员</FONT></a>,谢谢!<BR>
* 未经本站明确许可,任何网站不得非法盗链及抄袭本站资源;如引用页面,请注明来自本站,谢谢您的支持!</DIV>
</TD>
</TR>
</TABLE>
</TD>
</TR>
<%
end if
rs.close
set rs=nothing
%>
<!-- 下载查看 END -->
<TR>
<TD>
<TABLE cellSpacing=0 cellPadding=0 align="center" class='MC_bottom_title'>
<tr>
<td><div align="right">
【<a href='javascript:history.back()'>返回</a
>】【<A href="javascript:window.scroll(0,-360)">顶部</A>】
</div></TD>
</tr>
<tr><td class='MC_bottom_Td2'></td></tr>
</table>
</TD>
</TR>
<TR><TD height=10><IMG src='../img/1x1_pix.gif' width=3 height=1></TD></TR>
</TABLE>
</TD>
<%if strSkins <= 200 and strSkins >= 1 then%>
<TD vAlign=top class='M_Left_Td'>
<table cellpadding="0" cellspacing="0" align="center" class='M_Left_Title'>
<tr>
<td valign="top">
<%
Call Style_Download() '
Call Style_Fellow() '友情连接
%>
</td>
</tr>
</table>
</TD>
</TR>
</TABLE>
<!--#include file="Include/Foot.asp" -->
<%
elseif strSkins <= 250 and strSkins >= 201 then '新风格==============================================================
%>
<TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
<TD vAlign=top background="../Skin/201/line-mid-glay.gif" width="6"><img border="0" src="../Skin/201/line-shadow-glay-mid.gif" width="6" height="146"></TD><TD vAlign=top class='Mr_TitlePt'>
<% Call Right_Download() %>
</TD>
</TR>
</TABLE>
<!--#include file="Include/Foot4.asp" -->
<%end if%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -