productshow.asp

简洁清爽的网站管理管理系统,基本功能都具备了

<!--#include file="Inc/syscode.asp"-->
<!--#include file="inc/Skin_css.asp"-->
<%
ShowSmallClassType=ShowSmallClassType_Article
dim ArticleID
ArticleID=trim(request("ArticleID"))
if ArticleId="" then
	response.Redirect("Product.asp")
end if

sql="select * from Products where ArticleID=" & ArticleID & ""
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="767" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td class="tdbg_left"  width="202" valign="top" >
      <!--#include file="left_product.asp" --></td>
    <td width="6"></td>
    <td  valign="top"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td height="206" valign="top">
            <table width="100%" height="5"  border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td></td>
              </tr>
            </table>
            <table width="556" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td width="556" height="28" background="Images/xxbg.gif"><img src="Images/81235959_proshow.gif" width="556" height="35"></td>
              </tr>
            </table>
            <table width="556" border="0" cellpadding="0" cellspacing="0" background="Images/81235959_dj_gbg.gif">
              <TR>
                <TD width="451" 
                  height=25>
                  <%
response.write "&nbsp;<a href='Product.asp?BigClassName=" & rs("BigClassName") & "'>" & rs("BigClassName") & "</a>&nbsp;&gt;&gt;&nbsp;"
if rs("SmallClassName") & ""<>"" then
	response.write "<a href='Product.asp?BigClassName=" & rs("BigClassName")&"&SmallClassName=" & rs("SmallClassName") & "'>" & rs("SmallClassName") & "</a>&nbsp;&gt;&gt;&nbsp;"
end if
response.write rs("Title")
%>
                </TD>
                <TD width="106">&nbsp;</TD>
              </TR>
              <TR>
                <TD 
                  height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" 
              width=10></TD>
              </TR>
              <TR>
                <TD height="1" colspan="3">
                  <%call ShowArticleContent()%>
                </TD>
              </TR>
              <TR>
                <TD 
                  height=1 colspan="3" background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" 
              width=10></TD>
              </TR>
              <TR>
                <TD 
                  height=25>点击数：<%=rs("Hits")%>&nbsp; 录入时间：<%= FormatDateTime(rs("UpdateTime"),2) %>&nbsp;【<a href='javascript:window.print()'>打印此页</a>】&nbsp;【<a href='javascript:history.back()'>返回</a>】</TD>
                <TD 
                  height=25>&nbsp;</TD>
              </TR>
              <TR>
                <TD colspan="2"><img src="Images/81235959_dj_tb.gif" width="556" height="6"></TD>
              </TR>
          </table>
            <table width="100%" height="5"  border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td></td>
              </tr>
            </table></td>
        </tr>
    </table></td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>
<!--网站系统交易网:www.csys.com.cn-->
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>