📄 showproduct.asp
字号:
<!-- #include file="setup.asp" -->
<%
Call top
Call table()
ProID=Trim(Request.QueryString("ProID"))
if ProID = "" Then Error 2,"无此产品信息！",""
if IsNumEric(ProID)=False Then Error 1,"参数非法传递！",""
Sql="Select ProductCommend,ProductImgI,ProductImgII,ProductI,ProductII,ProductIII,ProductInfo,ProductID,ProductSort,ProductAddtime,ProductBuy,ProductEnName,ProductNum,ProductSf,ProductPacking,ProductCnName From Product_Info Where ProductConceal=False and ProductID="&ProID&" and DelThis=False"
Set Rs = Conn.Execute(Sql)
if Rs.Eof or rs.bof Then Error 2,"无此产品信息！",""
ProducL=Request.Cookies("Product")
if ProducL="" Then ProducL = 0
if Conn.Execute("Select Count(SortID) From Product_Sort where SortID="&Rs("ProductSort"))(0) > 0 Then
SortPwd=Trim(Conn.Execute("Select SortPWD From Product_Sort where SortID="&Rs("ProductSort"))(0))
End if
if SortPwd = "vip" and ProducL < 2 Then Error 2,"对不起，此类别产品为VIP专柜！\n您不能进入！",""
if SortPwd <> "vip" and SortPwd <> "" and Session(SortID) <> SortPwd Then %>
<script>var id=prompt("此产品类别已加密，请输入通行密码！","");if(id){location.href='SortList.asp?menu=SortPsd&SortID=<%=SortID%>&pass='+id+'';}</script>
<%Response.end
end if
money=""
if Application(registered&"ProductI")<>"" then money=money& Application(registered&"ProductI")&":<strike>"&FormatCurrency(rs("ProductI"))&"</strike> "
if Application(registered&"ProductII")<>"" then money=money& Application(registered&"ProductII")&":"&FormatCurrency(rs("ProductII"))&" "
if Application(registered&"ProductIII")<>"" then money=money& Application(registered&"ProductIII")&":"&FormatCurrency(rs("ProductIII"))&" "
image=""
if rs("ProductImgII") <> "" then
image="<a title=点击查看大图片 target=_blank href=UpProductimg/B/"&rs("ProductImgII")&"><img src=UpProductimg/B/"&rs("ProductImgII")&" border=1 width=160 height=160></a>"
elseif rs("ProductImgI") <> "" then
image="<a title=点击查看大图片 target=_blank href=UpProductimg/S/"&rs("ProductImgI")&"><img src=UpProductimg/B/"&rs("ProductImgI")&" border=1></a>"
else
image="<img src=images/none.gif border=1>"
end if
if rs("ProductCommend")=true Then Cd="<font color=Red>(推荐产品)</font>"
ProductCnName=Rs("ProductCnName")
ProductBuy=Rs("ProductBuy")
ProductAddtime=Rs("ProductAddtime")
SortID=Rs("ProductSort")
ProductID=rs("ProductID")
ProductInfo=Rs("ProductInfo")%>
<title><%=Community%></title>
<script>
function loadThreadFollow(ino){
var targetImg =eval("followImg" + ino);
var targetDiv =eval("follow" + ino);
if (targetDiv.style.display!='block'){
targetDiv.style.display="block";
targetImg.src="images/minus.gif";
if (targetImg.loaded=="no"){document.frames["hiddenframe"].location.replace("loading.asp?Menu=Online&id=9");}
}else{
targetDiv.style.display="none";
targetImg.src="images/plus.gif";
}
}
</script>
<style>
<!--
TABLE{BORDER-TOP:0px;BORDER-LEFT:0px;BORDER-BOTTOM:1px}TD{BORDER-RIGHT:0px;BORDER-TOP:0px}
-->
</style>
<iframe HEIGHT="0" WIDTH="0" NAME="hiddenframe"></iframe>
<body bgcolor="#FFFFFF" text="#000000" topmargin="0" link="#000000" vlink="#000000" alink="#000000">
<br> <br>
<TABLE borderColor=a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR>
<TD width=80% height=25 background=images/title_sub.gif valign="middle"><b>■ </b>产品详细信息</TD>
<TD width=20% height=25 background=images/title_sub.gif valign="middle">
<p align="right"> <a href=javascript:window.print()><font color=#000000>[打印]</font></a> <A href=javascript:window.external.AddFavorite(location.href,document.title)><font color=#000000>[收藏]</font></a> </TD>
</TR>
<TR>
<TD height=25 colspan="2" > <img src="images/2.gif" width="60" height="9">商城推荐：</TD>
</TR>
<TR>
<TD height=25 colspan="2" valign="middle">
<marquee scrollAmount="5" id=yidong><%=Application(registered&"Commend")%></marquee>
</TD>
</TR>
</TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR>
<TD height=25 width="75%" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
<tr>
<td width="70%"> <img src="images/2.gif" width="60" height="9">以下是 <font color=red><%=ProductCnName%></font> 的详细信息！ <%=Cd%></td>
<td width="30%">
<p align="right">
<a href=OrderList.asp?menu=Confirm><img src="images/Confirm.gif" border="0"><img src="images/shoping.gif" border="0" title="您的购物袋中已有<%=BuyNum%>种产品！"></a>
</td>
</tr>
</table>
</TR>
</TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR>
<TD height=25 width="75%" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="207">
<tr><td width="31%" rowspan="8" height="162"><p align="center">
<%=image%></td>
<td width="69%" colspan="3" height="20">中文品名:<%=Rs("ProductCnName")%> / Englist:[<%=Rs("ProductEnName")%>]</td>
</tr>
<tr>
<td width="69%" colspan="3" height="20">产品货号:<%=Rs("ProductNum")%></td>
</tr>
<tr>
<td width="69%" colspan="3" height="20"><%=money%></td>
</tr>
<tr>
<td width="69%" colspan="3" height="20">产品规格:<%=Rs("ProductSf")%></td>
</tr>
<tr>
<td width="69%" colspan="3" height="20">产品包装:<%=Rs("ProductPacking")%></td>
</tr>
<tr>
<td width="69%" colspan="3" height="19">
<%rs.close:Set Rs = Nothing%>
<p align="left"> 所属类别:<%SortA SortID,""%></td>
</tr>
<tr>
<td width="69%" colspan="3" height="19">统计购买人数:<%=ProductBuy%></td>
</tr>
<tr>
<td width="29%" height="24">加入时间:<%=ProductAddtime%></td>
<td width="3%" height="24">
<p align="right"> </td>
<td width="37%" height="24" ><a href=# onclick=javascript:open('OrderList.asp?menu=AddPro&ProID=<%=ProductID%>&ProCName=<%=ProductCnName%>','','width=400,height=150')><img src=images/nico_01.gif border=0> <font color=Red title=将<%=ProductCnName%>放入您的购物栏中！>加入购物栏</font></a></td>
</tr>
<tr>
<td width="100%" height="1" colspan="4" valign="top">
<img src="images/supply.gif" ></td>
</tr>
<tr>
<td width="100%" height="79" colspan="4" valign="top"> <%=ProductInfo%>
</td>
</tr>
</table>
</TR>
</TABLE>
<table borderColor="#a4b6d7" cellSpacing="0" cellPadding="6" width="100%" border="1" style="border-collapse: collapse" height="5">
<tr height="25">
<td height="1" width="945">
<p align="right">
<%
id1=Conn.Execute("Select min(ProductID) From Product_Info where ProductID>"&ProID&" and ProductSort = "&SortID)(0)
id2=Conn.Execute("Select max(ProductID) From Product_Info where ProductID<"&ProID&" and ProductSort = "&SortID)(0)
%>
<input name=Nexpage type=button onClick=Javascript:location.href='?ProID=<%= id2 %>' value=上一个产品><input name=Nexpage type=button onClick=Javascript:location.href='?ProID=<%= id1 %>' value=下一个产品><input type="button" value="<< 返回上一页" name="B1" Onclick=JavaScript:history.back();>
</td>
</tr>
</table>
<br>
<%
Online
htmlend%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -