📄 product.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<%dim id
id=request.QueryString("id")%><head>
<title><%=webname%>--商品详细资料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="include/css.css" rel="stylesheet" type="text/css">
</head>
<!--#include file="include/header.asp"-->
<% dim prename,company,intro,predate,graph2,description,remarks,price
set rs2=server.CreateObject("adodb.recordset")
rs2.open "select * from product where id="&id,conn,1,3
rs2("viewnum")=rs2("viewnum")+1
rs2.update%>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center">
<tr><td WIDTH="100%" VALIGN="TOP">
<div id=floater style="Z-INDEX: 20; WIDTH: 175px; POSITION: absolute; TOP: 100px; overflow: visible;; left: 0px"><br>
<!--#include file="status.asp"--></div>
<script language=javascript src="fly.js"></script>
<TABLE WIDTH="760" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR><TD BGCOLOR=#FFFFFF HEIGHT="1"></TD></TR>
<TR><TD BGCOLOR=<%=bgclr1%> HEIGHT="20"><FONT COLOR="#FFFFFF">类别：->><%=webname%>：->>><%=trim(rs2("mark"))%>：->><%=trim(rs2("name"))%></FONT></TD></TR>
</TABLE>
<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" STYLE="border-collapse: collapse" ID="AutoNumber3" HEIGHT="0" WIDTH="100%" BGCOLOR=<%=bgclr4%>>
<TR> <TD WIDTH="760">
<TABLE BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0" WIDTH="100%">
<TR> <TD>
<TABLE WIDTH="98%" BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
<TR>
<TD WIDTH="15%" rowspan="2" align="center" valign="middle">
<%if trim(rs2("pic"))<>"" then
response.write "<a href=#pic target=_top><img src="&trim(rs2("pic"))&" border=0 alt=点击查看图片实际尺寸！></a>"
else
response.Write "<img src=images/emptybook.jpg alt=此商品暂时没有图片！>"
end if%>
</TD>
<TD WIDTH="85%"><TABLE WIDTH="100%" BORDER="0" ALIGN="center" CELLPADDING="1" CELLSPACING="1">
<TR>
<TD colspan="4"></br>【<B><FONT COLOR="#FF0000"><% = rs2("prename") %></FONT></B>】<%=trim(rs2("name"))%></TD>
</TR>
<TR>
<TD colspan="4">【<B><FONT COLOR="#FF0000"><% = rs2("company") %></FONT></B>】<%=trim(rs2("mark"))%></TD>
</TR>
<TR>
<TD colspan="4">【<B><FONT COLOR="#FF0000"><% = rs2("intro") %></FONT></B>】<%=trim(rs2("introduce"))%></TD>
</TR>
<TR>
<TD colspan="4">【<B><FONT COLOR="#FF0000"><% = rs2("predate") %></FONT></B>】<%=trim(rs2("productdate"))%></TD>
</TR>
<TR>
<TD width="27%">【<B><FONT COLOR="#FF0000"><% = rs2("other") %></FONT></B>】<%=trim(rs2("grade"))%></TD>
<TD width="25%">【<B><FONT COLOR="#FF0000"><% = rs2("pretype") %></FONT></B>】<%=trim(rs2("type"))%></TD>
<TD width="26%">【<B><FONT COLOR="#FF0000">浏览次数：</FONT></B>】<%=trim(rs2("viewnum"))%></TD>
<TD width="22%">【<B><FONT COLOR="#FF0000">售出次数：</FONT></B>】<%=trim(rs2("solded"))%></TD>
</TR>
<TR>
<TD>【<B><FONT COLOR="#FF0000">市场价格：</FONT></B>】<S>￥<%=rs2("price1")%></S>元
</TD>
<TD>【<B><FONT COLOR="#FF0000">会员价格：</FONT></B>】<%=rs2("price2")%>元</TD>
<TD>【<B><FONT COLOR="#FF0000">马上节省：</FONT></B>】<%=rs2("price1")-rs2("price2")%>元</TD>
<TD>【<B><FONT COLOR="#FF0000">产品折扣：</FONT></B>】
<%response.write rs2("discount")*100&".00%"%>
</TD>
</TR>
<TR>
<TD>【<B><FONT COLOR="#FF0000">上货数量：</FONT></B>】<%=rs2("amount")%> 件</TD>
<TD>【<B><FONT COLOR="#FF0000">剩余数量：</FONT></B>】<%=rs2("stock")%> 件</TD>
<TD>【<FONT COLOR="#FF0000"><B>VIP价格：</B></FONT>】<%=rs2("vipprice")%>元</TD>
<TD>【<B><FONT COLOR="#FF0000">赠送积分：</FONT></B>】 <%=rs2("score")%>分
</TD>
</TR>
<tr><td height="5"></td></tr>
<TR>
<TD> </TD>
<TD>
<%response.write "<a href=# onClick=""javascript:window.open('cart.asp?id="&rs2("id")&"','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/cart.gif width=50 height=19 border=0></a>"%>
</TD>
<TD>
<%response.write "<a href=# onClick=""javascript:window.open('addto.asp?id="&rs2("id")&"&action=add','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/skin/default/addto.gif width=50 height=19 border=0></a>"%>
</TD>
<TD> </TD>
</TR>
</TABLE></TD>
</TR>
</TABLE></TD></TR>
<tr><td>
<TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR>
<TD> </TD>
</TR>
<TR>
<TD BGCOLOR=<%=bgclr1%>><IMG SRC="#" WIDTH="1" HEIGHT="1"></TD>
</TR>
</TABLE>
</td></tr></TABLE>
<TABLE WIDTH="96%" BORDER="0" CELLPADDING="0" CELLSPACING="0" align="center">
<TR>
<TD align="center" colspan="2"><table width="96%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="15%" align="left" valign="top"></br>
<%if trim(rs2("pic"))<>"" then
response.write "<a href=#top target=_top><img src="&trim(rs2("photo"))&" border=0 alt=点击返回页首！></a>"
else
response.Write "<img src=images/emptybook.jpg alt=此商品暂时没有大图片！>"
end if%>
</td>
<td width="85%" valign="top"></br><%=trim(rs2("description"))%>
<%if rs2("detail")<>"" then
response.write "<table width=19 height=4 border=0 cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>"&trim(rs2("detail")&"<table width=19 height=6 border=0 cellpadding=0 cellspacing=0><tr><td height=6></td></tr></table>")
end if
if rs2("content")<>"" then
response.write "备注说明<table width=19 height=4 border=0 cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>"&trim(rs2("content"))&"<table width=19 height=6 border=0 cellpadding=0 cellspacing=0><tr><td height=6></td></tr></table>"
end if
%>
</td>
</tr>
</table></TD>
</TR>
<tr><td colspan="2">
<TABLE WIDTH="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0">
<TR><TD> </TD></TR>
<TR><TD BGCOLOR=<%=bgclr1%>><IMG SRC="#" WIDTH="1" HEIGHT="1"></TD></TR>
</TABLE>
</td></tr>
<a name="pic"></a>
<tr><td width=70% ></br>会员评级</td>
<%
if rs2("mark")<>"" then
response.write "<form name=searchmakein method=post action=research.asp>"
response.write "<td width=30% ><div align=right><input type=hidden name=searchkey value="&trim(rs2("mark"))&"<input type=hidden name=selectaction value=2>"
response.write "</br>查看更多关于 <a href=research.asp?action=3&searchkey="&trim(rs2("mark"))&" target=_blank><font color=red>"&trim(rs2("mark"))&"</font></a> 的商品</div></td></form>"
end if
response.write "</tr>"
'用户评级
response.write "<tr><td colspan=2> "
call rank()
response.write " <a href=# onClick=""javascript:window.open('rank.asp?id="&id&"','','width=295,height=235,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"">发表您对本商品的评级</a></td></tr>"
rs2.close
set rs2=nothing
response.write "<tr><td>会员评论</td>"
response.write "<td><div align=right><a href=# onClick=""javascript:window.open('comment.asp?id="&id&"','','width=295,height=185,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"" ><img src=images/my_review.gif width=93 height=20 border=0 alt=用户评论></a></div></td></tr>"
'//用户评论
dim rs1
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from review where id="&id&" and audit=1 ",conn,1,1
if rs1.eof and rs1.bof then
response.write"<tr><td colspan=2> 如果您用过本商品，或对本商品有所了解，欢迎您发表自己的评论。您的评论将被网络上成千上万的用户所共享，我们将对您的慷慨深表感谢。"
response.write " 您的评论在提交后将经过我们的审核，也许您需要等待一些时间才可以看到。谢谢合作。</td></tr>"
else
do while not rs1.eof
%>
<TR>
<TD>[<B><%=rs1("title")%></B>@<%=rs1("reviewdtm")%>]<BR>
<%=rs1("reviewcontent")%></TD>
</TR>
<%rs1.movenext
loop
rs1.close
set rs1=nothing
end if%>
<TR>
<TD colspan="2" align="center"></br><B>本站发表用户评论，并不代表我们赞同或者支持用户的观点。我们的立场仅限于传播更多用户感兴趣的信息。</B></br></TD>
</TR>
</TABLE>
</TD></TR> </TABLE></td></tr> </table></br><!--#include file="include/footer.asp"-->
</body>
</html>
<%sub rank()
dim other
if rs2("ranknum")>0 and rs2("rank")>0 then
other=rs2("ranknum")\rs2("rank")
else
other=0
end if
response.write "<img src=images/rank/"&other&".gif alt=评论星级>"
end sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -