down.asp

台讯企业全站管理系统V2006 供下载时经过了严格的测试

<%@ LANGUAGE=VBScript CodePage=936%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/System.asp"-->
<!--#include file="Head.asp"-->
<%
'***********************************************************************************
' 产品名称：台讯企业全站管理系统（V2006简体中文版）
' 程序开发：HECHENn（QQ：34103037　Emial：[e-mail]）
' Copyright 2006 txcodes.com - All Rights Reserved. 
'***********************************************************************************

ii=0
Class_Name="<A HREF=Doclass.asp>软件列表</A> > "
    Set Rs_p=server.Createobject("Adodb.Recordset")
    Sql="Select * from Tx_Down where Down_Flag=1 and Down_Id=" & Id
    Rs_p.open Sql,Conn,1,3
	IF Rs_p.RecordCount=0 THEN Call Page_check(1,0)
	    Rs_p("Down_Count")=Rs_p("Down_Count")+1
	Rs_p.UpDate
		CretId=Id
        Id=Rs_p("Down_ClassId")
        sId=Id
        Table_List="Tx_DoClass"
        FileName="Doclass"
        Page_Name="软件 -- " & Rs_p("Down_Name") & " -- " & Web_Const(0)
        Call Class_Namex()
        Call Page_Head()
        Call Page_iHead()
        Call Page_nHead()
        Call Class_Names()
        IF Rs_p("Down_Address1")<>"" THEN
            Down_Address1="<A HREF=" & Rs_p("Down_Address1") & "><SPAN CLASS='type-color2'>点击下载(1)</SPAN></A>　　"
        End IF
        IF Rs_p("Down_Address2")<>"" THEN
            Down_Address2="<A HREF=" & Rs_p("Down_Address2") & "><SPAN CLASS='type-color2'>点击下载(2)</SPAN></A>"
        End IF
        %>
	    <TABLE WIDTH="770"  BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
            <TR>
                <TD VALIGN="top" CLASS="TABLE-Main"><DIV CLASS="page-head">软件介绍</DIV><DIV CLASS="TABLE-Mainall">
                <DIV CLASS="page-name"><%=Rs_p("Down_Name")%>　<%=Rs_p("Down_Edition")%></DIV>
                <DIV CLASS="down-content">所属分类：<%=Class_Name%><BR>软件大小：<%=Rs_p("Down_Size")%><%=Rs_p("Down_Size1")%><BR>软件类型：<%=Rs_p("Down_Category")%> / 授权形式：<%=Rs_p("Down_IsAuthorized")%><BR>显示语言：<%=Rs_p("Down_Language")%> / 运行环境：<%=Rs_p("Down_Platform")%><BR>相关网址：<A TITLE=<%=Rs_p("Down_Registers")%> HREF=<%=Rs_p("Down_Registers")%>><SPAN CLASS='type-color2'>注册地址</SPAN></A>　<A TITLE=<%=Rs_p("Down_Demonstrates")%> HREF=<%=Rs_p("Down_Demonstrates")%>><SPAN CLASS='type-color2'>演示地址</SPAN></A></DIV>
                <DIV CLASS="type-height2"></DIV>
                <DIV CLASS="down-content"><B>下载地址：</B><BR><%=Down_Address1 & Down_Address2%></DIV>
                <DIV CLASS="type-height2"></DIV>
                <DIV CLASS="down-content"><B>软件介绍：</B><BR><%=Rs_p("Down_Content")%></DIV>
                <DIV CLASS="type-height2"></DIV>
                <DIV CLASS="add-time">添加时间：<%=YearDa(Rs_p("Down_Date"))%>　　浏览次数：<SPAN CLASS="type-color2"><%=Rs_p("Down_Count")%></SPAN></DIV><%Call Class_Namez("Tx_Down","Down_Id","Down_Name","Down","Down")%></DIV><br><%IF int(Web_Const(86))=1 THEN%><DIV CLASS="page-head">软件评论</DIV><DIV CLASS="TABLE-Mainall"><%Call Cret_Pagex(3,DownloadMax_CretClass)%></DIV><%End IF%><DIV CLASS="page-head">下载须知</DIV><DIV CLASS="TABLE-Mainall"><%=Web_Const(85)%></DIV>
            </TD>
            <TD WIDTH="5"></TD>
            <TD WIDTH="195" ALIGN="center" VALIGN="top" CLASS="TABLE-Side">
                    <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">软件分类</SPAN></DIV><DIV CLASS='TABLE-side3'><%Call Parent_Class(0)%></DIV>
                    <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">软件搜索</SPAN></DIV><DIV CLASS='TABLE-side3'><%Call page_Search("Down")%></DIV>
                    <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">订单搜索</SPAN></DIV><DIV CLASS='TABLE-side3'><%Call page_Search("ShopCode")%></DIV>
		            <DIV CLASS='TABLE-side1'><SPAN CLASS="type-color1">热门产品</SPAN></DIV><DIV CLASS='TABLE-side3'><%Call Page_Top("Tx_Down","Down_Name","Down","Down",DownloadMax_Top)%></DIV>
            </TD>
        </TR>
    </TABLE>
    <%
	Rs_p.Close
	Set Rs_p=Nothing
    Call Page_iBottom()
    Call Page_Bottom()
    Call CloseConn()
    %>