⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 buy.asp

📁 简易购物车系统的程序代码
💻 ASP
字号:
<style type="text/css">
<!--
body,td,th {
	color: #000000;
}
body {
	background-color: #F4F4F4;
}
a:link {
	color: #003399;
}
a:visited {
	color: #003399;
}
a:hover {
	color: #003399;
}
a:active {
	color: #003399;
}
-->
</style>
<%
response.buffer = true
id = request.QueryString("id")
des = request.QueryString("des")
'取出cookie变量的值
if id = empty then
   response.redirect "index.asp"
end if
head="简易购物车 - [" & des & "] 区"
sql = "select * from products where categoryid=" & id
sql = sql & " order by productid"
'查询商品类别号和cookie保存的变量相同的商品信息
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shop.mdb")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn
%>
<html>
<head><title>简易购物车</title></head>

<body>
<h3 align=center><%=head%><hr></h3>
<center>
<form action="add.asp" method="post">
<table border=1>
<tr bgcolor=#FFFFCC>
<td>请挑选</td>
<td>商品编号</td>
<td>商品名称</td>
<td>价格</td>
<td>商品简介</td>
</tr>
<%
while not rs.eof
   ischeck="" '商品是否被选中
   productlist = request.cookies( "productlist" ) 
    'cookie变量productlist用来保存用户选中的商品编号
   if instr( productlist, rs("productid")) > 0 then 
      ischeck="checked"
   end if
%>
   <tr>
   <td align=center>
   <input type="checkbox" name="productid" value=
   "<%=rs("productid")%>" <%=ischeck%>>
   </td>
   <td><%=rs("productid")%></td>
   <td><%=rs("productname")%></td>
   <td align=right><%=rs("price")%></td>
   <td><a href=<%=rs("image")%>><%=rs("description")%></a></td>
   </tr>
<%
    rs.movenext
wend
%>
</table>
<input type=submit value="放入购物车">&nbsp;&nbsp;
<a href=check.asp>查看购物车</a>&nbsp;&nbsp;<a href=clear.asp>清空购物车</a><p>
</form>
<hr>选择购物区:
<% 
for i = 1 to request.cookies("categorylinks")
   response.write request.cookies( "categorylink" & i ) & "  "
next
%>
</center>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -