📄 gouwu.asp
字号:
<!--#include file="conn.asp"-->
<%
if request.cookies("snsn")("username")="" then
response.write "<script language=javascript>alert('对不起，您还没有登陆！');window.history.go(-1);</script>"
response.End
end if
dim bookid,username,action
action=request.QueryString("action")
username=trim(request.cookies("snsn")("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("snsn")("reglx")=1 then
danjia=rs_s("huiyuanjia")
else
danjia=rs_s("vipjia")
end if
kucun=rs_s("kucun")
bookname=rs_s("bookname")
rs_s.close
set rs_s=nothing
if kucun<=0 then
response.write "<script language=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>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,zhuangtai,zonger,bookcount from shop_action",conn,1,3
rs.addnew
rs("bookid")=bookid
rs("username")=username
rs("zhuangtai")=7
rs("bookcount")=1
rs("zonger")=danjia
rs.update
rs.close
set rs=nothing
response.Redirect "gouwu.asp?action=show"
end if
case "show"
'//////////////////
%>
<!--#include file="webconfig.asp"-->
<!--#include file="fuction.asp"-->
<html>
<head>
<title><%=webname%>--我的购物车</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onMouseOver="window.status='【<%=webname%>】<%=weburl%> 如果您喜欢本站,别忘了把本站介绍给您的好友哦！：）';return true">
<!--#include file="webtop.asp"-->
<%
response.write "<table width=760 border=0 align=center cellpadding=2 cellspacing=2 class=table-zuoyou><tr><td valign=baseline align=center>我的购物车</td></tr></table>"
set rs=server.CreateObject("adodb.recordset")
rs.open "select shop_action.actionid,shop_action.bookid,shop_action.bookcount,shop_action.zonger,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("snsn")("username")&"' and shop_action.zhuangtai=7",conn,1,1
%>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" class="table-zuoyou">
<tr>
<td bordercolor="#FFFFFF" bgcolor="#FFFFFF"> <br>
<table width=96% border=0 align=center cellpadding=1 cellspacing=1 bgcolor=#CCCCCC>
<form name='form1' method='post' action=xgsl.asp>
<tr>
<td width=40% height="22" bgcolor="#f1f1f1">
<div align=center><font color="#666666">商品名称</font></div>
</td>
<td width=18% height="22" bgcolor="#f1f1f1">
<div align=center><font color="#666666">单价
<%if request.cookies("snsn")("reglx")=2 then %>
(VIP)
<%else%>
(会员)
<%end if%>
</font></div>
</td>
<td width=15% height="22" bgcolor=#f1f1f1>
<div align=center><font color="#666666">数量</font></div>
</td>
<td width=15% height="22" bgcolor="#f1f1f1">
<div align=center><font color="#666666">总价</font></div>
</td>
<td width=12% height="22" bgcolor="#f1f1f1">
<div align=center><font color="#666666">删除</font></div>
</td>
</tr>
<%shuliang=rs.recordcount
jianshu=0
zongji=0
do while not rs.eof%>
<tr>
<td height="22" style='PADDING-LEFT: 5px' width="40%" bgcolor="#FFFFFF">
<div align=left><a href=list.asp?id=<%=rs("bookid")%> target=_blank><%=rs("bookname")%></a>
<input name=bookid type=hidden value="<%=rs("bookid")%>" >
<input name=actionid type=hidden value="<%=rs("actionid")%>" >
</div>
</td>
<td height="22" width="18%" bgcolor="#FFFFFF">
<div align=center>
<%
if request.Cookies("snsn")("reglx")=2 then
response.write rs("vipjia")
else
response.write rs("huiyuanjia")
end if%>
元</div>
</td>
<td height="22" width="15%" bgcolor="#FFFFFF">
<div align=center><font color=#dd6600>
<%=rs("bookcount")%>
</font></div>
</td>
<td height="22" width="15%" bgcolor="#FFFFFF">
<div align=center><font color=#FF3300><%=rs("zonger")%></font>元</div>
</td>
<td height="22" width="12%" bgcolor="#FFFFFF">
<div align=center> <a href=gouwu.asp?action=del&actionid=<%=rs("actionid")%>>
<img src=images/trash.gif width=15 height=17 border=0></a></div>
</td>
</tr>
<%
jianshu=jianshu+rs("bookcount")
zongji=zongji+rs("zonger")
rs.movenext
loop
rs.close
set rs=nothing%>
<tr>
<td height=30 colspan=6 bgcolor="#FFFFFF">
<div align=center>
<input name="Submit3" type="button" class="go-wenbenkuang" value="返回继续购物" onClick="javascript:window.history.go(-1)">
<input name="Submit22" type="submit" class="go-wenbenkuang" value="清空购物车" onClick="this.form.action='qkgwc.asp';this.form.submit()">
<input name="Submit222" type="submit" class="go-wenbenkuang" value="去收银台" onClick="this.form.action='jszx.asp';this.form.submit()">
</div>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height=36 colspan=6>
<div align=center> 购物车里有商品：<%=shuliang%>件 总数：<%=jianshu%>件 共计：<%=zongji%>元 您有预存款：<%=request.cookies("snsn")("yucun")%>元
<%if request("lx")<>1 then %>
<br>
购物车将在6分钟后自动关闭
<script language="Javascript">
function closeinfo(){window.close();}
setTimeout("closeinfo()", 600000);
</script>
<%end if%>
</div>
</td>
</tr>
<%set snsn=server.CreateObject("adodb.recordset")
snsn.open "select * from shop_action_jp where username='"&request.cookies("snsn")("username")&"' and zhuangtai=7",conn,1,1
if snsn.recordcount>0 then%>
<tr bgcolor="#FFFFFF">
<td colspan=5>
<table width="96%" border="0" cellspacing="1" cellpadding="1" bgcolor="#CCCCCC" align="center">
<tr>
<td colspan="3" height="22" bgcolor="#FFFFFF"><b>您已选择的奖品清单</b></td>
</tr>
<tr align="center">
<td height="22" bgcolor="#f1f1f1"><font color="#666666">奖品名称</font></td>
<td height="22" bgcolor="#f1f1f1"><font color="#666666">使用积分</font></td>
<td height="22" bgcolor="#f1f1f1"><font color="#666666">删除</font></td>
</tr>
<%
while not snsn.eof%>
<tr bgcolor="#FFFFFF">
<td height="22">
<%
set snsn1=server.CreateObject("adodb.recordset")
snsn1.open "select * from shop_jiangpin where bookid="&snsn("bookid"),conn,1,1
if snsn1.recordcount=1 then
response.write "<a href='listjp.asp?id="&snsn("bookid")&"' target=_blank>"&snsn1("bookname")&"</a>"
end if
snsn1.close
set snsn1=nothing%>
</td>
<td align="center" height="22"><%=snsn("jifen")%></td>
<td align="center" height="22"><a href="jifen.asp?actionid=<%=snsn("actionid")%>&action=del&ll=22"><img src=images/trash.gif width=15 height=17 border=0></a></td>
</tr>
<%
snsn.movenext
wend%>
</table>
</td>
</tr>
<%end if
snsn.close
set snsn=nothing%>
</form>
</table>
<br></td>
</tr>
</table><%
end select%>
<!--#include file="service1.asp"-->
<!--#include file="copyright.asp"-->
</body>
</html>
<SCRIPT LANGUAGE="JavaScript">
<!--
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function checkk()
{
if(checkspace(document.form2.searchkey.value)&&((document.form2.action.value=="3")||(document.form2.action.value=="1"))) {
document.form2.searchkey.focus();
alert("请输入查讯关键字！");
return false;
}
document.form2.submit();
}
//-->
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -