📄 products.asp
字号:
<html>
<head>
<!--#include file="conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file="./alipay_inc/myAlipay.asp"-->
<!--#include file="./alipay_inc/alipay_Config.asp"-->
<title><%=webname%>--商品详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="description" content="网趣网上购物系统,网趣网上购物系统时尚版,网趣购物系统,网上购物系统,购物系统,网趣购物,商城源码,网上商店,网上商店系统,域名注册,虚拟主机,恒伟网络">
<meta name="keywords" content="网趣网上购物系统,网趣网上购物系统时尚版,网趣购物系统,网上购物系统,购物系统,网趣购物,商城源码,网上商店,网上商店系统,域名注册,虚拟主机,恒伟网络">
<link href="images/css.css" rel="stylesheet" type="text/css">
</head>
<script language="JavaScript">
<!--
function OpenNews()
{
window.name = "news"
win = window.open('','newswin','left=110,width=600,height=420,scrollbars=1');
}
//-->
</script>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" >
<%if IsNumeric(request.QueryString("id"))=False then
response.write("<script>alert(""非法访问!"");location.href=""index.asp"";</script>")
response.end
end if
dim id
id=request.QueryString("id")
if not isinteger(id) then
response.write"<script>alert(""非法访问!"");location.href=""index.asp"";</script>"
end if%>
<%dim bookid,action
bookid=request.QueryString("id")
action=request.QueryString("action")
if action="save" then
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from review",conn,1,3
rs.addnew
rs("bookid")=bookid
rs("pingji")=request("pingji")
rs("pinglunname")=HTMLEncode2(trim(request("pinglunname")))
rs("pingluntitle")=HTMLEncode2(trim(request("pingluntitle")))
rs("pingluncontent")=HTMLEncode2(trim(request("pingluncontent")))
rs("ip")=Request.servervariables("REMOTE_ADDR")
rs("pinglundate")=now()
rs("shenhe")=0
rs.update
rs.close
set rs=nothing
set rs=server.CreateObject("adodb.recordset")
rs.open "select * from products where bookid="&bookid,conn,1,3
rs("pingji")=rs("pingji")+1
rs("pingjizong")=rs("pingjizong")+request("pingji")
rs.update
rs.close
set rs=nothing
response.Write "<script language=javascript>alert('您的评论已成功提交,待管理员审核！');history.go(-1);</script>"
response.End
end if
%>
<!--#include file="include/head.asp"-->
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="39" valign="top"><table width="100%" height="184" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="30" align="right" valign="top"><img src="images/body/jiao.gif" width="15" height="17"></td>
</tr>
<tr>
<td height="90"><div align="right"><img src="images/ttts.gif" width="26" height="110" /></div></td>
</tr>
<tr>
<td height="30"> </td>
</tr>
</table></td>
<td width="190"style="BORDER-bottom:#FF67A0 1px solid;BORDER-left:#FF67A0 1px solid; BORDER-right:#FF67A0 1px solid;" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0" >
<tr>
<td ><table width="190" height="190" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="middle" background="images/index_2.gif"><!--#include file="logins.asp"--></td>
</tr>
</table></td>
</tr>
<tr>
<td><img src="images/index_4.gif" width="190" height="12" alt="" /></td>
</tr>
<tr>
<td><!--#include file="shopcart.asp"--></td>
</tr>
<tr>
<td><!--#include file="include/selltop.asp"--></td>
</tr>
<tr>
<td height="5"></td>
</tr>
<tr>
<td><div align="center"><a href="<%=ad6url%>" target="_blank"><img src="<%=ad6%>" border="0" width="180" ></a></div></td>
</tr>
<tr>
<td height="5"></td>
</tr> <tr>
<td><div align="center"><a href="<%=ad7url%>" target="_blank"><img src="<%=ad7%>" border="0" width="180" ></a></div></td>
</tr>
</table></td>
<td valign="top"><table width="100%" height="41" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="28" background="images/body/pdbg01.gif"><div align="center"><span class="table-zuo">
<%set rs=server.createobject("adodb.recordset")
rs.open "select * from products where bookid="&request("id"),conn,1,3
if rs.recordcount=0 then
%>
<font color="#FF0000"><strong>商品已不存在</strong></font>
<%
else
rs("liulancount")=rs("liulancount")+1
rs.update
if request.cookies("Cnhww")("username")<>"" then
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from [user] where username='"&request.cookies("Cnhww")("username")&"'",conn,1,1
t_userid=rs_s("userid")
rs_s.close
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from history where bookid="&request("id")&" and username='"&request.cookies("Cnhww")("username")&"' and lx=1",conn,1,3
if rs_s.recordcount>0 then
rs_s("ltime")=now()
rs_s("userid")=t_userid
rs_s.update
rs_s.close
set rs_s=nothing
else
rs_s.close
set rs_s=server.createobject("adodb.recordset")
rs_s.open "select * from history where username='"&request.cookies("Cnhww")("username")&"' and lx=1 order by ltime",conn,1,3
if rs_s.recordcount>=4 then
rs_s.delete
rs_s.update
end if
rs_s.addnew
rs_s("username")=request.cookies("Cnhww")("username")
rs_s("bookid")=id
rs_s("bookname")=rs("bookname")
rs_s("userid")=t_userid
rs_s("lx")=1
rs_s("ltime")=now()
rs_s.update
rs_s.close
set rs_s=nothing
end if
end if
%>
</span></div>
<a href=index.asp><%=webname%></a> >>
<%set rs2=server.createobject("adodb.recordset")
rs2.open "select * from bsort where anclassid="&rs("anclassid"),conn,1,1
if rs2.recordcount>0 then
response.write "<a href=class.asp?lx=big&anid="&rs2("anclassid")&" targer=_blank>"&rs2("anclass")&"</a> >> "
end if
rs2.close
set rs2=server.createobject("adodb.recordset")
rs2.open "select * from ssort where nclassid="&rs("nclassid"),conn,1,1
if rs2.recordcount>0 then
response.write "<a href=class.asp?lx=small&anid="&rs2("anclassid")&"&nid="&rs2("nclassid")&" targer=_blank>"&rs2("nclass")
end if
rs2.close
set rs2=nothing%></td>
</tr>
<tr>
<td ><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="400"><br>
<table width=300 height=300border=0 align="center" cellpadding=0 cellspacing=0>
<tbody>
<tr>
<td align=center>
<div align="center">
<%if rs("zhuang")="" then
response.write "<img src=images/emptybook.gif width=200 border=0>"
else%>
<img src="<%=trim(rs("zhuang"))%>" width=300 border=0 alt="商品名称：<%=rs("bookname")%>" height="300">
<%end if%> </td>
</tr>
</tbody>
</table></td><td width="8" rowspan="2" background="images/body/p_bg01.gif"></td>
<td width="462" rowspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="25" colspan="2" align="center"> <font color="#ff6600" size="3"><strong><%=rs("bookname")%></strong></font></td>
</tr>
<tr>
<td width="28%"> <img src="images/body/orange-bullet.gif" height="7" width="9">
商品编号：</td>
<td width="72%" height="22"><%=trim(rs("grade"))%></td>
</tr>
<tr>
<td> <img src="images/body/orange-bullet.gif"height="7" width="9" >
商品规格：</td>
<td height="22"><%=trim(rs("isbn"))%></td>
</tr>
<tr>
<td> <img src="images/body/orange-bullet.gif"height="7" width="9" >
商品品牌：</td>
<td height="22"><%=trim(rs("pingpai"))%></td>
</tr>
<tr>
<td> <img src="images/body/orange-bullet.gif" height="7" width="9">
赠送积分：</td>
<td height="22"><%=rs("yeshu")%> 分</td>
</tr>
<tr>
<td> <img src="images/body/orange-bullet.gif" height="7" width="9">
商品数量：</td>
<td height="22"><%=trim(rs("kucun"))%> <%=rs("bookchuban")%><%if rs("kucun")>0 then%>
<font color="#999999">热卖中</font>
<%else%>
<font color="#999999">缺货</font>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -