📄 index.asp
字号:
<%
response.buffer = true
' 读取商品分类，然后写入cookies中
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shop.mdb")
'建立与数据库的连接对象
set rs=server.createobject("adodb.recordset")
sql="select * from category"
'查询category表中的所有商品类别名称
rs.open sql,conn
while not rs.eof
link = "<a href=buy.asp?id=" & rs("categoryid") &"&des="&rs("description")& ">" & rs("description") & "</a>"
'显示商品类别名称链接
'用户点击进入buy.asp文件，将商品类别编号传递给buy.asp文件
count = count + 1
response.cookies("categorylink" & count ) = link
'商品类别名称链接放入cookie中
response.cookies("categorylinks") = count
'链接个数也放入cookie中
rs.movenext
wend
%>
<html>
<head><title>简易购物车</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<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></head>
<body>
<h2 align=center>简易购物车<hr></h2>
<h3>选择商品购物区：</h3>
<ul>
<%
for i = 1 to request.cookies("categorylinks")
response.write request.cookies( "categorylink" & i ) & "<p>"
next
%>
</ul>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -