bs_downloadshow.asp

详细说明在文件 程序说明： ☆ 中英文双语版 ☆ 后台在同一页内同时管理添加修改资料内的中英文内容 ☆ 网站的左边栏使用了模块,可以自由的增加&删除 ☆ 可以不用修改代码,

<%@ LANGUAGE=VBScript CodePage=936%>
<%option explicit%>
<%Response.Buffer=True%>
<!--#include file="Include/Bs_System.asp"-->
<!--#include file="../Inc/ubbcode.asp"-->
<!--#include file="Include/Bs_SysDown.asp"-->
<!--#include file="Include/Bs_StrLeft.asp"-->
<%
'=========================================================
'
' 产品名称：良精集团软件科技 公司(企业)网站管理系统（简称：liangjing.net）
' 版权所有：liangjing.net
' 程序制作：liangjing开发团队
' Copyright 2004-2005 liangjing.net - All Rights Reserved. 
'
'========================================================
%>
<%
ShowSmallClassType=ShowSmallClassType_Article
dim Bs_DownID,Bs_Content
Bs_DownID=trim(request("Bs_DownID"))
if Bs_DownID="" then
	response.Redirect("Bs_Download.asp")
end if

sql="select * from Bs_Download where Bs_DownID=" & Bs_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("Bs_Hits")=rs("Bs_Hits")+1
	rs.update
	if rs("Bs_Hits")>=HitsOfHot then
		rs("Bs_Hits")=True
		rs.update
	end if
	Bs_BigClassName=rs("Bs_BigClassName")
	Bs_SmallClassName=rs("Bs_SmallClassName")
	Bs_Content=ubbcode(rs("Bs_Content"))
%>
<!--#include file="Include/Bs_Head.asp" -->
<TABLE cellPadding=0 cellSpacing=0 class='Middle_Title'>
<TR> 
<TD vAlign=top> 
	<TABLE cellPadding=0 cellSpacing=0 align='center' class='M_Center_Title'>
<% Call Style_Adcolumn() '广告栏 %>

<!-- 下载查看 -->
		<TR>
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 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='Bs_Download.asp'>下载中心</a>"
Response.Write "&nbsp;&gt;&gt;&nbsp;<a href='Bs_Download.asp?Bs_BigClassName=" & rs("Bs_BigClassName") & "'>" & rs("Bs_BigClassName") & "</a>"
if rs("Bs_SmallClassName") & ""<>"" then
Response.Write "&nbsp;&gt;&gt;&nbsp;<a href='Bs_Download.asp?Bs_BigClassName=" & rs("Bs_BigClassName")&"&Bs_SmallClassName=" & rs("Bs_SmallClassName") & "'>" & rs("Bs_SmallClassName") & "</a>"
end if
'response.write "&nbsp;&gt;&gt;&nbsp;"& rs("Bs_Title")
%>
&nbsp;</SPAN></TD>
						<TD class='MC_Pt_TD4'><div align="right">
&nbsp;</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 class='MC_DoShow_Title1'>
					<TR class='MC_DoShow_T1Tr1'>
						<td colspan=2>&nbsp;<%=rs("Bs_Title")%></TD>
					</TR>
					<TR class='MC_DoShow_T1Tr2'>
						<td class='MC_DoShow_T1r2Td1'>&nbsp;软件语言：<%=rs("Bs_Language")%></TD>
						<td rowspan=6><DIV align=center><IMG src='<%=rs("Bs_PhotoUrl")%>' height=150 width=150></DIV></TD>
					</TR>
					<TR><td class='MC_DoShow_T1rnTd1'>&nbsp;授权类型：<%=rs("Bs_LicenceType")%></TD></TR>
					<TR><td class='MC_DoShow_T1rnTd1'>&nbsp;文件大小：<%=rs("Bs_FileSize")%></TD></TR>
					<TR><td class='MC_DoShow_T1rnTd1'>&nbsp;运行环境：<%=rs("Bs_System")%></TD></TR>
					<TR><td class='MC_DoShow_T1rnTd1'>&nbsp;整理日期：<%=FormatDateTime(rs("Bs_UpDateTime"),2)%></TD></TR>
					<TR><td class='MC_DoShow_T1rnTd1'>&nbsp;下载次数：<%=rs("Bs_Hits")%></TD></TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD>
				<table cellSpacing=0 cellpadding=0 class='MC_DoShow_Title2'>
					<TR class='MC_DoShow_t2Tr1'><td>::下载地址::</TD></TR>
					<TR>
						<td class='MC_DoShow_t2r2Td1'>
┊<a href="<%=rs("Bs_DownloadUrl")%>" target=_blank>下载地址1</a>┊
<%
if rs("Bs_DownloadUrl2")<>"" then
	response.Write "<a href='" & rs("Bs_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>&nbsp;&nbsp;<%=Bs_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 class='MC_bottom_title'>
					<tr> 
						<td><div align="right">
【<a href='javascript:history.back()'>返回</a
>】【<A href="javascript:window.scroll(0,-360)">顶部</A>】
&nbsp;</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>

<TD class='M_Jgx_TD'><IMG src='../img/1x1_pix.gif' width=1 height=2></TD>
<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/Bs_Foot.asp" -->