products.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=Prclass.asp>产品列表</A> > "
    Set Rs_p=server.Createobject("Adodb.Recordset")
    Sql="Select * from Tx_Products where Products_Flag=1 and Products_Id=" & Id
    Rs_p.open Sql,Conn,1,3
	    IF Rs_p.RecordCount=0 THEN Call Page_check(1,0)
	        Rs_p("Products_Count")=Rs_p("Products_Count")+1
	    Rs_p.UpDate
        buyId=Id
		CretId=Id
        Id=Rs_p("Products_ClassId")
        sId=Id
        Table_List="Tx_PrClass"
        FileName="Prclass"
        Page_Name="产品 -- " & Rs_p("Products_Name") & " -- " & Web_Const(0)
        Call Class_Namex()
        Call Page_Head()
        Call Page_iHead()
        Call Page_nHead()
        Call Class_Names()
        %>
	    <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("Products_Name")%></DIV>
                    <TABLE WIDTH="100%" BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
                        <TR>
                            <TD WIDTH="150">
                                <DIV CLASS='products-bg'><A HREF="<%=Rs_p("Products_Pic")%>" TITLE="点击查看大图" TARGET="_blank"><IMG SRC="<%=Rs_p("Products_Pic")%>" HEIGHT="140" WIDTH="210" BORDER="0"></A></DIV>
                            </TD>
                            <TD>
                                <DIV CLASS="products-classcontent">所属分类：<%=Class_Name%><BR>编　　号：<SPAN CLASS="type-color2"><%=Rs_p("Products_Code")%></SPAN><BR>规　　格：<%=Rs_p("Products_Specification")%><BR>型　　号：<%=Rs_p("Products_Model")%><BR>产品价格：<SPAN CLASS="type-color2">￥ <%=Rs_p("Products_Money")%> 元</SPAN></DIV>
                                <DIV CLASS="products-classto"><%Call Page_Productsbuy()%></DIV>
                            </TD>
                        </TR>
                    </TABLE>
                    <DIV CLASS="products-content"><%=Rs_p("Products_Content")%></DIV>
                    <DIV CLASS="type-height2"></DIV>
                    <DIV CLASS="add-time">添加时间：<%=YearDa(Rs_p("Products_Date"))%>　　浏览次数：<SPAN CLASS="type-color2"><%=Rs_p("Products_Count")%></SPAN></DIV><%Call Class_Namez("Tx_Products","Products_Id","Products_Name","Products","Products")%></DIV><br><%IF int(Web_Const(86))=1 THEN%><DIV CLASS="page-head">产品评论</DIV><DIV CLASS="TABLE-Mainall"><%Call Cret_Pagex(1,ProductsMax_CretClass)%></DIV><%End IF%><DIV CLASS="page-head">订购须知</DIV><DIV CLASS="TABLE-Mainall"><%=Web_Const(83)%></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("Products")%></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_Products","Products_Name","Products","Products",ProductsMax_Top)%></DIV>
                </TD>
            </TR>
        </TABLE>
        <%
	    Rs_p.Close
	    Set Rs_p=Nothing
        Call Page_iBottom()
        Call Page_Bottom()
        Call CloseConn()
        %>