用ASP编写购物车代码

最新推荐文章于 2020-07-07 03:15:17 发布

转载最新推荐文章于 2020-07-07 03:15:17 发布

· 605 阅读

文章标签：

#数据库 #javascript #ViewUI

网上购物已成为生活的潮流，在网上购物之后，想要随时查看自己已买的东西，想要随时删除或改动某件商品数量，要怎么做呢？以下我就来写代码及释义。先来做用户登陆页面（login.asp）：

<html>

<head>

<title>购物车的实现</title>

</head>

<body>

<formmethod="post"action="check.asp">

<tablewidth="200"border="1">

<tr><tdwidth="107">username：</td>

<tdwidth="77"><inputtype="text"name="username"id="username"/></td></tr>

<tr><td>password：</td>

</tr>

</table>

</form>

</body>

</html>

然后来写接收用户所填写的信息以检查是否存在该用户的页面（check.asp），假设存在该用户，那么就跳到购物的首页（index.asp）:

uname=request.Form("username")

upass=request.Form("userpass")

sql="select*fromuserswhereuname='"&uname&"'andupass='"&upass&"'"

setrs=server.CreateObject("adodb.recordset")

rs.opensql,conn,3,1

ifnotrs.eofthen

用户登陆成功之后，将username放入session里，并给用户分配一个订单，就像去超市购物推着一个购物车，此时这个购物车是属于你的，用username和系统时间作为购物车的名字，然后跳转到购物首页。

session("name")=uname

session("orderid")=time&uname

response.Redirect("index.asp")

else

alert("username或password不对!");

history.back();

</script>

endif

rs.close

setrs=nothing

conn.close

setconn=nothing

那么，接下来就是购物的首页（index.asp）了

<html>

<head>

以下用css样式表将表格里的字体统一设置为14号字

<styletype="text/css">‘

<!--

table{

font-size:14px;

}

-->

</style>

</head>

<body>

假设用户没登陆就直接打开购物首页，那么就跳转到登陆页面

ifsession("name")=""then

response.Redirect("login.asp")

endif

做一个搜索的文本框，方便用户搜索商品。其原理是这种：用户填入要搜索的商品后，通过表单提交到本页面，从数据库中查找像用户填写的字符串的商品，再显示出来

<formmethod="post"action="index.asp">

<inputtype="text"size="15"name="search"id="search"/><inputtype="submit"value="搜索"/>

</form>

searchname=request.Form("search")‘得到用户填写的字符串

sql="select*fromproductswherepnamelike'%"&searchname&"%'"‘写sql语句，查找出结果

setrs=server.CreateObject("adodb.recordset")‘设置一个结果集对象

rs.opensql,conn,3,1

whilenotrs.eof‘循环输出商品的相关信息

每一个商品以下都有一个购买button，须要做一个表单

<formmethod="post"action="buy.asp">

<tablestyle="float:left">

<tr>

<tdwidth="103"rowspan="3"><ahref="product.asp?id=<%=rs(0)%>"><imgsrc="images/<%=rs(2)%>"width="100"height="100"border="0"></a><inputtype="hidden"name="id"value="<%=rs(0)%>"><inputtype="hidden"name="price"value="<%=rs(3)%>"/></td>

<tdwidth="107">名称：

<%=rs(1)%></td>

</tr>

<tr>

</tr>

<tr>

<tdalign="center"><inputtype="submit"name="buy"value="购买"/></td>

</tr>

</table>

</form>

rs.movenext‘指向下一个记录

wend

rs.close

setrs=nothing

conn.close

setconn=nothing

</body>

</html>

假设用户想要查看商品更具体的信息，那么就应该将商品图片做成一个超链接，连接到product.asp,在该页面显示具体信息。在该页面也有一个购买button，点击之后相同跳到buy.asp:

<body>

pid=request.QueryString("id")

response.Write(pid)

sql="select*fromproductswherepid="&pid

setrs=server.CreateObject("adodb.recordset")

rs.opensql,conn,3,1

ifnotrs.eofthen

<tablewidth="387"height="119">

<tr>

<tdwidth="120"rowspan="4"><imgsrc="images/<%=rs(2)%>"width="100"height="100"></td>

<tdwidth="276">名称：<%=rs(1)%></td>

</tr>

<tr>

</tr>

<tr>

<tdheight="30"><%=rs(4)%></td>

</tr>

<tr>

<tdalign="center"><inputtype="button"οnclick="javascript:location.href='buy.asp?id=<%=rs(0)%>&price=<%=rs(3)%>'"value="购买"></td>‘点击购买之后触发一个onclick事件，跳转到buy.asp

</tr>

</table>

endif

rs.close

setrs=nothing

conn.close

setconn=nothing

</body>

</html>

用户点击了购买以后，将该商品的id传到buy.asp,以下来写buy.asp的代码：

‘将连接数据库的字符串包括进来

pid=request("id")‘得到商品的id

price=request("price")‘得到商品的价格

sql="select*frommrcarwherepid="&pid&"andorderid='"&session("orderid")&"'"‘写sql语句来查询

setrs=server.CreateObject("adodb.recordset")

rs.opensql,conn,3,1

假设用户所要购买的商品已经买过，那么就直接在原来的基础上加1，否则的话，就插入记录

ifnotrs.eofthen

sql="updatemrcarsetpcount=pcount+1wherepid='"&pid&"'andorderid='"&session("orderid")&"'"

conn.executesql

response.Redirect("mycar.asp")

else

sql="insertintomrcar(orderid,pid,price,pcount)values('"&session("orderid")&"',"&pid&","&price&",1)"

conn.executesql

response.Redirect("mycar.asp")

endif

rs.close

setrs=nothing

conn.close

setconn=nothing

运行完了sql语句之后将跳转到购物车页面（mycar.asp），显示出用户所购买的商品。而且有改动数量的button和删除的超链接

sql="selecta.*,b.pnamefrommrcara,productsbwhereorderid='"&session("orderid")&"'anda.pid=b.pid"

setrs=server.CreateObject("adodb.recordset")

rs.opensql,conn,3,1

<formmethod="post"action="update.asp"name="form1">

<tableborder="1">

<tr><td>orderid</td>

</tr>

sum=0

i=1‘这里的i值到后边有介绍

whilenotrs.eof‘将所购买的商品循环输出

<td><inputtype="text"size="10"value="<%=rs(3)%>"name="pcount"></td>

<td><inputtype="button"οnclick="javascript:document.form1.action='update.asp?rowcount=<%=i%>&pid=<%=rs(1)%>';document.form1.submit();"value="确认改动"></td>

</tr>

i=i+1

sum=sum+cint(rs(2))*rs(3)‘计算总价格

rs.movenext

wend

rs.close

setrs=nothing

conn.close

setconn=nothing

</table>

</form>

<ahref="index.asp">返回继续购物</a>