📄 gouwu.asp
字号:
<!--#include file="conn.asp"-->
<%
if request.cookies("godbook")("username")="" then
response.write "<script language=javascript>alert('对不起，您还没有登陆！');window.close();</script>"
response.End
end if
dim bookid,username,action
action=request.QueryString("action")
username=trim(request.cookies("godbook")("username"))
bookid=request.QueryString("id")
'//删除收藏
select case action
case "del"
conn.execute "delete from shop_action where actionid="&request.QueryString("actionid")
if request.QueryString("ll")=22 then
response.redirect "myuser.asp?action=shoucang"
else
response.redirect "gouwu.asp?action=show"
end if
response.End
case "add"
'//商品，判断是否存在
set rs_s=server.CreateObject("adodb.recordset")
rs_s.open "select * from shop_books where bookid="&bookid,conn,1,1
if request.Cookies("godbook")("reglx")=1 then
danjia=rs_s("huiyuanjia")
else
danjia=rs_s("vipjia")
end if
kucun=rs_s("kucun")
bookname=rs_s("bookname")
shjiaid=rs_s("shjiaid")
rs_s.close
set rs_s=nothing
if kucun<=0 then
response.write "<script language=""javascript"" type=""text/javascript"">alert('你选购的商品“"&bookname&"”暂时缺货不能放到购物车里，请选购其它商品！');window.close();</script>"
response.end
end if
set rs=server.CreateObject("adodb.recordset")
rs.open "select bookid,username,bookcount,zonger from shop_action where username='"&username&"' and bookid="&bookid&" and zhuangtai=7",conn,1,3
if rs.recordcount=1 then
if kucun<(rs("bookcount")+1) then
response.write "<script language=""javascript"" type=""text/javascript"">alert('你选购的商品“"&bookname&"”暂时缺货不能放到购物车里，请选购其它商品！');window.close();</script>"
response.end
end if
rs("zonger")=(rs("bookcount")+1)*danjia
rs("bookcount")=rs("bookcount")+1
rs.update
rs.close
set rs=nothing
response.Redirect "gouwu.asp?action=show"
else
'//添加购物
rs.close
set rs=server.CreateObject("adodb.recordset")
rs.open "select bookid,username,shjiaid,zhuangtai,zonger,bookcount from shop_action",conn,1,3
rs.addnew
rs("bookid")=bookid
rs("username")=username
rs("zhuangtai")=7
rs("bookcount")=1
rs("shjiaid")=shjiaid
rs("zonger")=danjia
rs.update
rs.close
set rs=nothing
response.Redirect "gouwu.asp?action=show"
end if
case "show"
%>
<!--#include file="webconfig.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=webname%>-商品信息</title>
<link href="css/main.css" rel="stylesheet" type="text/css" />
</head>
<body>
<!-- 导航菜单 -->
<!--#include file="top.asp" -->
<div id="content">
<!-- 快捷导航 -->
<div id="content_m"><a href="index.asp">首页</a> > <span class="new">我的购物车</span></div>
<!-- 主内容左侧 -->
<div id="content_l">
<!-- 公告 -->
<!--#include file="history.asp"-->
<!-- 左侧目录 -->
<!--#include file="shoppingbag.asp"-->
<div class="clear-both"> </div>
</div>
<!-- 右侧内容 -->
<div id="content_r">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_action.actionid,shop_action.bookid,shop_action.bookcount,shop_action.zonger,shop_action.shjiaid,shop_books.bookname,shop_books.shichangjia,shop_books.huiyuanjia,shop_books.vipjia from shop_books inner join shop_action on shop_books.bookid=shop_action.bookid where shop_action.username='"&request.cookies("godbook")("username")&"' and shop_action.zhuangtai=7",conn,1,1
%>
<!-- 购物车 -->
<div id="shoppingbaglist">
<form name='form1' method='post' action="xgsl.asp">
<table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="tit">商家名称</td>
<td class="tit">商品名称</td>
<td class="tit">单价<%if request.cookies("godbook")("reglx")=2 then %>(VIP)<%else%>(会员)<%end if%></td>
<td class="tit">数量</td>
<td class="tit">总价</td>
<td class="tit">删除</td>
</tr>
<%shuliang=rs.recordcount
jianshu=0
zongji=0
do while not rs.eof%>
<tr>
<td><%id=rs("shjiaid")
if id>1 then
set rs_shj=server.CreateObject("adodb.recordset")
rs_shj.open "select name from shjia where shjiaid="&id,conn,1,1%>
<span class="new"><%=rs_shj("name")%>
<%rs_shj.close
set rs_shj=nothing
else
response.write "<span class=""new"">"&webname&""
end if%></span></td>
<td><strong><a href="list.asp?id=<%=rs("bookid")%>"><%=rs("bookname")%></a></strong> <input name="bookid" type="hidden" value="<%=rs("bookid")%>" /><input name="actionid" type="hidden" value="<%=rs("actionid")%>" /></td>
<td><%
if request.Cookies("godbook")("reglx")=2 then
response.write rs("vipjia")
else
response.write rs("huiyuanjia")
end if%>
元</td>
<td><input name="bookcount" value="<%=rs("bookcount")%>" /></td>
<td><%=rs("zonger")%></td>
<td><a href="gouwu.asp?action=del&actionid=<%=rs("actionid")%>">删除</a></td>
</tr><%jianshu=jianshu+rs("bookcount")
zongji=zongji+rs("zonger")
rs.movenext
loop
rs.close
set rs=nothing%>
</table>
<p>购物车里有商品：<%=shuliang%> 件 总数：<%=jianshu%> 件 共计：<%=zongji%> 元 您有预存款：<%=request.cookies("godbook")("yucun")%> 元</p>
<p><input name="imageField" type="image" src="images/btn_keepbuy.gif" class="keepbuy" onfocus="this.blur()" onclick="javascript:window.close()" /><input name="imageField2" type="image" src="images/btn_modnum.gif" class="modnum" onfocus="this.blur()" onclick="this.form.action='xgsl.asp';this.form.submit()" /><input name="imageField22" type="image" src="images/btn_clean.gif" class="clean" onfocus="this.blur()" onclick="this.form.action='qkgwc.asp';this.form.submit()" /><input name="imageField222" type="image" src="images/btn_pay.gif" class="pay" onfocus="this.blur()" onclick="this.form.action='jszx.asp';this.form.submit()" /></p>
<ul><li>如果您想继续购物，请点选继续购物。</li><li>如果您想更新已在购物车内的产品，请先修改，然后点选修改数量。</li><li>如果您想全部取消已订购在购物车中的产品，请点选清空购物车。</li><li>如果您满意您所购买的产品，请点选去收银台(会员须先登陆，非会员须先免费注册成为会员)。</li></ul>
<%set godbook=server.CreateObject("adodb.recordset")
godbook.open "select * from shop_action_jp where username='"&request.cookies("godbook")("username")&"' and zhuangtai=7",conn,1,1
if godbook.recordcount>0 then%>
<table width="590" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="tit">奖品名称</td>
<td class="tit">使用积分</td>
<td class="tit">删除</td>
</tr>
<%while not godbook.eof%>
<tr>
<td><%set godbook1=server.CreateObject("adodb.recordset")
godbook1.open "select * from shop_jiangpin where bookid="&godbook("bookid"),conn,1,1
if godbook1.recordcount=1 then
response.write "<a href='listjp.asp?id="&godbook("bookid")&"'>"&godbook1("bookname")&"</a>"
end if
godbook1.close
set godbook1=nothing%></td>
<td><%=godbook("jifen")%></td>
<td><a href="jifen.asp?actionid=<%=godbook("actionid")%>&action=del&ll=22"><img src="images/trash.gif" alt="" /></a></td>
</tr>
<%godbook.movenext
wend%>
</table>
<%end if
godbook.close
set godbook=nothing
end Select
%>
</form>
</div>
</div>
</div>
<div class="clear-both"> </div>
<!-- 服务声明 -->
<!--#include file="service.asp" -->
<!-- 版权信息 -->
<!--#include file="copyright.asp" -->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -