<% 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"" else rs("Hits")=rs("Hits")+1 rs.update %> <% title=rs("title")&" 下载" SiteContent=rs("Content") %>
 
<% call ShowSmallClass_Down_Tree() %>
 
 
下载>> <% response.write " " & rs("BigClassName") & " >> " if rs("SmallClassName") & ""<>"" then response.write "" & rs("SmallClassName") & " >> " end if response.write rs("Title") %>

 <%=rs("Title")%>
 软件语言:<%=rs("Language")%>
 文件大小:<%=rs("FileSize")%>
 授权方式:<%=rs("Softclass")%>
 运行环境:<%=rs("System")%>
 整理日期:<%=FormatDateTime(rs("AddDate"),2)%>
 下载次数:<%=rs("Hits")%>
 
 ::下载地址::  
 ┊" target=_blank>点击下载
 ::下载说明 ::  
<%=rs("Content")%>
返回
<% end if rs.close set rs=nothing call CloseConn() %>