📄 downloadshow.asp
字号:
<!--#include file="Inc/SysDown.asp" -->
<!--#include file="inc/Skin_css.asp"-->
<script language="JavaScript">
<!--
var flag=false;
function DrawImage(ImgD){
var image=new Image();
image.src=ImgD.src;
if(image.width>0 && image.height>0){
flag=true;
if(image.width/image.height>= 150/150){
if(image.width>150){
ImgD.width=150;
ImgD.height=(image.height*150)/image.width;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
else{
if(image.height>150){
ImgD.height=150;
ImgD.width=(image.width*150)/image.height;
}else{
ImgD.width=image.width;
ImgD.height=image.height;
}
ImgD.alt="点击查看详细信息...";
}
}
}
function zoom_img(e, o)
{
var zoom = parseInt(o.style.zoom, 10) || 100;
zoom += event.wheelDelta / 12;
if (zoom > 0) o.style.zoom = zoom + '%';
return false;
}
//-->
</script>
<%
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
%>
<!-- #include file="Head.asp" -->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="5" valign="top" bgcolor="#FFFFFF"></td>
</tr>
<tr>
<td height="72" valign="top" bgcolor="#FFFFFF"><table width="746" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="tdbg_left" width="190" height="179" valign="top" > <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 用户登陆
</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 height="34" class="title_left"> <img src="Images/smallbook.jpg" width="10" height="10"> 下载列表</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="6"></td>
<td valign="top"><table Class=border width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="206" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> 下
载 中 心</td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<TR>
<TD width="490" height="30">
<%
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")
%>
</TD>
<TD width="60"><div align="center"></div></TD>
</TR>
<TR bgcolor="#666666">
<TD height="1" colspan="3" bgcolor="#CCCCCC"></TD>
</TR>
<TR>
<TD colspan="3"> <br> <table width="100%" border="0" align="center" cellpadding=0 cellSpacing=1 bgcolor="#CCCCCC" >
<TR class='MC_DoShow_T1Tr1'>
<td height="30" colspan=2 bgcolor="#FFFFFF"> <%=rs("Title")%></TD>
</TR>
<TR bgcolor="#FFFFFF" >
<td width="312" height="30" > 软件语言：<%=rs("Language")%></TD>
<td width="240" rowspan=5> <div align="center"> <img src="<%if rs("PhotoUrl")="" then%>Img/nopic.gif<%else%><%=rs("PhotoUrl")%><%end if%>" alt="<%=rs("title")%>" width="150" height="150" border="0" onload="javascript:DrawImage(this);">
</div></TD>
</TR>
<TR>
<td height="30" bgcolor="#FFFFFF" > 文件大小：<%=rs("FileSize")%></TD>
</TR>
<TR>
<td height="30" bgcolor="#FFFFFF"> 运行环境：<%=rs("System")%></TD>
</TR>
<TR>
<td height="30" bgcolor="#FFFFFF" > 整理日期：<%=FormatDateTime(rs("AddDate"),2)%></TD>
</TR>
<TR>
<td height="30" bgcolor="#FFFFFF" > 下载次数：<%=rs("Hits")%></TD>
</TR>
</TABLE>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="title_right" height="32"> ::下载地址::</td>
</tr>
<tr>
<td height="35"> ┊<a href="<%=rs("DownloadUrl")%>" target=_blank><font color="#FF0000">下载地址</font></a>┊</td>
</tr>
<tr>
<td class="title_right" height="32"> <img src="Images/smallbook.jpg" width="10" height="10"> 下载说明</td>
</tr>
</table>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="10"></td>
</tr>
<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 height="19" colspan="2"> <div align="right">【<a href='javascript:history.back()'>返回</a>】</div>
<div align="center"></div></TD>
</TR>
</table> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -