articleshow.asp

此系统都是基于ASP+ACCESS技术开发的电子商务平台,属于全自动化、全智能的在线方式管理、维护、更新的网站管理系统。此系统直接上传到你的网站空间就可以使用了

<!--#include file="Inc/syscode.asp"-->
<%
'=================================
'
'冠龙网络科技有限公司
'网址：http://www.glgk.com/
'电话：[phone]
'Q Q     53180986
'copyright(c)2006 GUANLONG
'
'=================================
%>
<!--#include file="Inc/top.asp"-->
<%
ShowSmallClassType=ShowSmallClassType_Article
dim ArticleID
ArticleID=trim(request("ArticleID"))
if ArticleId="" then
	response.Redirect("Product.asp")
end if

sql="select * from Product 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")
%>
<!-- #include file="Inc/Head.asp" -->
<TABLE width="760" border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
<TR> 
<TD width=196 vAlign=top bgcolor="#FFFFFF"> 
	<table width="92%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
		<tr>
			<td valign="top">

<!-- 会员登陆 -->
<!-- #include file="L_login.asp" -->
<!-- 产品列表 -->
<!-- #include file="L_product.asp" -->
<!-- 邮件列表 -->
<!-- #include file="L_mail.asp" -->

			</td>
		</tr>
	</table> 
</TD>

<TD width=1 background=img/kropki_pion_naBialym.gif><IMG height=2 src="img/1x1_pix.gif" width=1></TD>
<TD vAlign=top> 
	<TABLE width="90%" border=0 align="right" cellPadding=0 cellSpacing=0>
<!-- 广告栏 -->
<!-- #include file="L_adcolumn.asp" -->
<!-- 产品查看 -->
		<TR> 
			<TD>
				<TABLE cellSpacing=0 cellPadding=0 width="555" border=0>
					<TR> 
						<TD height="25"><img src="Img/cnpt/pt_01.gif" width="450" height="30"></TD>
					</TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD height=1 background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		</TR>
		<TR> 
			<TD>
				<TABLE width="98%" border=0 align="right" cellPadding=0 cellSpacing=0>
					<TR> 
						<TD width="459" 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="96" height=25 valign="bottom"
><a href='javascript:eshop(<%=rs("Product_Id")%>)'><img border=0 src=Img/addtocart.gif width=95 height=17></a>&nbsp;</TD>
					</TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD height=1 background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		</TR>
		<TR> 
			<TD height=1><br>&nbsp;&nbsp;&nbsp;&nbsp;<%call ShowArticleContent()%> </TD>
		</TR>
		<TR> 
			<TD height=1 background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		</TR>
		<TR> 
			<TD>
				<TABLE width="98%" border=0 align="right" cellPadding=0 cellSpacing=0>
					<TR> 
						<TD width="459" 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 width="96" height=25 valign="bottom"
><a href='javascript:eshop(<%=rs("Product_Id")%>)'><img border=0 src=Img/addtocart.gif width=95 height=17></a>&nbsp;</TD>
					</TR>
				</TABLE>
			</TD>
		</TR>
		<TR> 
			<TD height=1 background=img/naBialym.gif><IMG height=1 src="img/1x1_pix.gif" width=10></TD>
		</TR>
		<TR> 
			<TD height=1>&nbsp; </TD>
		</TR>
		<TR> 
			<TD height=1>&nbsp; </TD>
		</TR>
	</TABLE>
</TD>

</TR>
</TABLE>
<!-- #include file="Inc/Foot.asp" -->
</BODY></HTML>
<%
end if
rs.close
set rs=nothing
call CloseConn()
%>