downloadshow.asp

来自「冠龙科技企业网站管理系统 v8.0」· ASP 代码 · 共 131 行

ASP
131
字号
<!--#include file="Inc/syscode.asp"-->
<!--#include file="inc/Skin_css.asp"-->
<!--#include file="Inc/Top.asp"-->
<%
ShowSmallClassType=ShowSmallClassType_Article
dim ID
ID=trim(request("ID"))
if Id="" then
	response.Redirect("Download.asp")
end if

sql="select * from Download where ID=" & ID & ""
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("Hot")=True
		rs.update
	end if
	BigClassName=rs("BigClassName")
	SmallClassName=rs("SmallClassName")
%>
<%if not(rsBigClass.bof and rsBigClass.eof) and ShowSmallClassType="Menu" then response.write " onmousemove='HideMenu()'"%>
<!-- #include file="Head.asp" -->
  <table width="770" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#FFFFFF" background="images/bg.gif">
    <tr>
      <td align="center">
        <table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td width="192" valign="top" background="images/bg_left.gif">
			<table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="Images/yhdl.jpg" /></td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
              <tr> 
                <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> 
                        <% call ShowUserLogin() %>
                      </td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><img src="Images/xzlb.gif" /></td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
              <tr> 
                <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> 
                        <% call ShowSmallClass_Down_Tree() %>
                      </td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
            </table></td>
            <td width="576" valign="top"><table width="336" height="26"  border="0" background="images/bg_bt.jpg">
              <tr>
                <td width="384">当前位置: <a href="/">首页</a> -&gt;下载中心</td>
              </tr>
            </table>
              <br>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <TR> 
                      <TD width="441"> 
                        <%
response.write "|&nbsp;<a href='Download.asp?BigClassName=" & rs("BigClassName") & "'>" & rs("BigClassName") & "</a>&nbsp;&gt;&gt;&nbsp;"
if rs("SmallClassName") & ""<>"" then
	response.write "<a href='Download.asp?BigClassName=" & rs("BigClassName")&"&SmallClassName=" & rs("SmallClassName") & "'>" & rs("SmallClassName") & "</a>&nbsp;&gt;&gt;&nbsp;"
end if
response.write rs("Title")
%>
                  </TD>
                  <TD width="109"><div align="center"><a href="<%=rs("DownloadUrl")%>"><img src="Img/download.gif" width="85" height="25" border="0"></a></div></TD>
                </TR>
                <TR> 
                      <TD colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" 
              width=10></TD>
                </TR>
                <TR> 
                      <TD colspan="3"> 
                        <table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
                          <tr>
                            <td><%=rs("Content")%></td>
                          </tr>
                        </table>
                        
                      </TD>
                </TR>
                <TR> 
                      <TD colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" 
              width=10></TD>
                </TR>
                <TR> 
                      <TD>
<div align="right">点击数:<%=rs("Hits")%>&nbsp; <%= FormatDateTime(rs("UpdateTime"),2) %>&nbsp;【<a href='javascript:history.back()'>返回</a>】</div></TD>
                      <TD>
<div align="center"><a href="<%=rs("DownloadUrl")%>"><img src="Img/download.gif" width="85" height="25" border="0"></a></div></TD>
                </TR>
                  </table></td>
          </tr>
        </table>
      </td>
    </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>

⌨️ 快捷键说明

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