开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Java编程 > Jsp/Servlet > 查看源码
car.asp
资源名称：blog.rar　[点击查看]
上传用户：syzzy1975
上传日期：2022-07-17
资源大小：670k
文件大小：4k
源码类别：

Jsp/Servlet

开发平台：

Java

car.asp：源码内容
  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
  2. <%
  5. %><!--#include file="manage/inc/config.asp"--> 
  6. <!--#include file="inc/conn.asp"--> 
  7. <!--#include file="inc/chk.asp"--> 
  9. <%
  10. dim id,username,action
  11. action=request.QueryString("action")
  12. username=trim(request.cookies(cookieName)("username"))
  13. id=request.QueryString("id")
  14. set rs=server.CreateObject("adodb.recordset")
  15. select case action
  16. case "del"
  17. conn.execute "delete from orders where actionid="&request.QueryString("actionid")
  18. response.redirect "car.asp"
  19. case "add"
  20. rs.open "select id,username from orders where username='"&username&"' and id="&id&" and state=6",conn,1,1
  21. if not rs.eof and not rs.bof then
  22. call MsgBox("对不起，此商品已存在于您的购物车中，不可以重复添加！","Close","None")
  23. response.end
  24. rs.close
  25. else
  26. rs.close
  27. rs.open "select id,username,state,paid from orders",conn,1,3
  28. rs.addnew
  29. rs("id")=id
  30. rs("username")=username
  31. rs("state")=6
  32. rs("paid")=0
  33. rs.update
  34. rs.close
  35. set rs=nothing
  36. call MsgBox("商品成功添加到你的购物篮！","Close","None")
  37. response.end
  38. end if
  39. end select
  41. rs.open "select orders.actionid,orders.id,product.name,product.price1,product.price2,product.discount from product inner join orders on product.id=orders.id where orders.username='"&request.cookies(cookieName)("username")&"' and orders.state=6",conn,1,1 
  42. %>
  43. <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
  44. <html>
  45. <head>
  46. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
  47. <title>406网络书店</title>
  48. <link href="style.css" rel="stylesheet" type="text/css">
  51. </head>
  53. <body>
  54. <!--#include file="head.htm"-->
  56. <table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  57.   <tr>
  58.     <td width="219" align="left" valign="top"><!--#include file="uleft.asp"-->      <br></td><td width="561" align="left" valign="top"><br>        <table cellpadding="0" cellspacing="0" border="0">
  59.         <tr>
  60.           <td width="18"><img src="images/w.gif"></td>
  61.           <td style="color:#415373">购物车</td>
  62.         </tr>
  63.         </table>
  64.         <br>      <form name="form1" method="post" action="cart.asp">
  65.   <table width="96%" border=0 align=center cellpadding=2 cellspacing=2>
  66.   <tr height=20><td width=7% align=center>选 择</td>
  67.   <td width="45%" align=center>商品名称</td>
  68.   <td width="14%" align=center>市场价</td>
  69.   <td width="13%" align=center>会员价</td>
  70.   <td width="12%" align=center>折扣</td>
  71.   <td width="9%" align=center>删除</td></tr>
  72.   <%
  73. do while not rs.eof
  74. %>
  75.   <tr bgcolor=#ffffff>
  76.   <td align="center" bgcolor=#FFFFFF><input name=id type=checkbox checked value="<%=rs("id")%>"></td>
  77.   <td STYLE="PADDING-LEFT: 5px" align=center><a href=vpro.asp?id=<%=rs("id")%> target=_blank><%=rs("name")%></a></td>   
  78.   <td align=center><%=rs("price1")%>元</td>
  79.   <td align=center><font color="#FF6600"><%=rs("price2")%>元</font></td>
  80.   <td align=center><%=(rs("discount")*100)%>%</td>
  81.   <td align="center">
  82.   <a href="car.asp?action=del&actionid=<%=rs("actionid")%>"><img src=images/trash.gif width=15 height=17 border=0></a></a></td>
  83.   </tr>
  84.   <%
  85. rs.movenext
  86. loop
  87. rs.close
  88. set rs=nothing
  89. %>
  90.   <tr align="center"><td height=36 colspan=6 bgcolor=#FFFFFF><input type=submit name=Submit  value=去下订单 onclick="location='cart_t.asp'">
  91.   <%
  92. if action<>"addtocart" then
  93. %>
  94.   <input type=button name=Submit2 value=继续采购 onclick=javascript:window.close()>
  95.   <%
  96. end if
  97. %>
  98.   </td>
  99.   </tr></table>        
  100.         </form>        <p>&nbsp;</p></td>
  101.   </tr>
  102. </table>
  103. <!--#include file="foot.htm"-->
  104. </body>
  105. </html>