收藏 分销(赏)

实习二:网上商城订单系统功能模块开发.doc

上传人:天**** 文档编号:2670429 上传时间:2024-06-04 格式:DOC 页数:25 大小:1,012.54KB
下载 相关 举报
实习二:网上商城订单系统功能模块开发.doc_第1页
第1页 / 共25页
实习二:网上商城订单系统功能模块开发.doc_第2页
第2页 / 共25页
实习二:网上商城订单系统功能模块开发.doc_第3页
第3页 / 共25页
实习二:网上商城订单系统功能模块开发.doc_第4页
第4页 / 共25页
实习二:网上商城订单系统功能模块开发.doc_第5页
第5页 / 共25页
点击查看更多>>
资源描述

1、实习二:网上商城订单系统功能模块开发(完整版) 作者: 日期:25 个人收集整理 勿做商业用途实习二1. 在站点根目录下新建order文件夹,在该文件夹中设置个人购物订单payment。asp的静态效果及Css布局设置,效果如下图所示:Html代码如下所示LANGUAGE=”VBSCRIPT” CODEPAGE=”936”head生成订单页面/titlelink href=./styles/payment。css rel=”stylesheet” type=text/css /headbody td colspan=5”购物车 tr class=”tdtbg td class=”l2” 名称

2、td class=l3 单价/td 金额/td /tr 目前您的购物车是空的。 /tr nbsp;/td td nbsp;/td nbsp;/td /tr tr td colspan=5 align=center class=total总计金额:¥ td colspan=5” align=”centerinput type=”button” value=修改购物车input type=button” value=”返回继续购物/td /tr tr td colspan=”2 class=”info您购物车中没有商品,不可以填写订单!/td /tr tr td height=”35”

3、colspan=2 align=”centerstrongfont color=#0000FF” 收货人信息 /font/td /tr tr td class=ol2 /td /tr 收货人姓名:/td span*/span/td tr td class=”ol1联系电话: td class=”ol2span/span/td td class=ol2”span/span/td tr 邮编:input type=”text name=”postcode” size=15” maxlength=25”/span/td /tr td class=”ol2”select name=payme

4、ntoption value=1货到付款网上支付/option/selectspan/td td class=”ol1备注:span*/span/td td colspan=”2”input type=button value=”返回继续购物” /tr/table/htmlCss代码如下所示:body font-size:12px;backgroundcolor:#FFFFFF;background-image: url(。/img/back.gif);backgroundrepeat: repeat;tablewidth:770px;margin:auto;。cartbackgroundco

5、lor:#F0F0FF;border:1px 884400 solid;。order margintop:20px;background-color:F0F0FF;border:1px #884400 solid;td font-size:12px;textalign:center;.l1,。l3,。l4width:15;。l2width:30%;。tdtbg color:#FFFFFF;backgroundcolor:996633;。tdbg color:#000000;backgroundcolor:#FFCC66;。totalcolor:blue;background-color:FFF

6、F66;”.ol1width:20;text-align:right;paddingright:15px;background:#996633;color:FFFFFF;.ol2textalign:left;background:#FFCC66;paddingleft:15px;spancolor:#FF0000;。ordersuccessalign:center;border:0px;width:550px;.infotext-align:center;font-size:18px;color:FF0000;fontfamily:”黑体”;padding:10px;下面开始进行动态效果的开发

7、.首先进行登录判断,根据登录成功标志变量session(“login”)是否为yes,如果是则表示登录成功,进入该页面下的购物车数据显示和订单表单的操作;否则,通过msgbox函数弹出一个对话框,并结束该网页的执行。代码如下:在%LANGUAGE=VBSCRIPT” CODEPAGE=936之下加入:!-#include file=”.。/product/cartclass.asp”-response。buffer=trueresponse。expires=0response。CacheControl=no-cacheif session(”loginyes)yes then%script l

8、anguage=”vbscript”if msgbox(”您没有登录,不可以进行此操作! & vbcrlf ”是否回首页登录?”,292,”登录警示!”)=vbyes thenwindow.location。href=.。/index。aspelsewindow。location.href=。/product/basket。aspend if/script%response。end()end if%购物车表格的内容与购物车网页文件basket。asp中购物车表格的设计是类似的,代码如下:html xmlns=”http:/www.w3.org/1999/xhtml”headmeta httpe

9、quiv=”Content-Type content=”text/html; charset=gb2312 /title生成订单页面/titlelink href=”。./styles/payment。css rel=stylesheet type=text/css” /headbody 购物车/td /tr tr class=”tdtbg” td class=l1” 商品编号/td 名称/td 单价/td 金额/td /tr %if ucart.checkempty() then tr class=tdbg else for i=0 to ubound(ucart。viewcart(),2)

10、 tr class=tdbg %=ucart。viewcart()(0,i)=ucart.viewcart()(1,i) td=ucart。viewcart()(2,i)/td =ucart.viewcart()(5,i)%=ucart。viewcart()(3,i)*ucart.viewcart()(5,i)%/td /tr td colspan=”5 align=”center class=total”总计金额:¥/td /tr页面效果如下所示:关于网页中的订单表单中显示的数据是从数据库中会员信息表member中取出来的,具体操作选择“应用程序绑定,点击添加按钮,进入如下对话框:然后展开记

11、录集把相应字段拖放到相应位置,效果如下所示:然后在表单form1中,添加5个隐藏控件,代码如下:input type=hidden” name=”action value=paid”input name=”ordertime” type=hidden” value=now()”input name=”userid type=”hidden value=”%=(Recordset1.Fields.Item(”id).Value)然后选择应用程序服务器行为命令,单击添加按钮-插入记录,在弹出的对话框中进行如下所示的设置:此时,网站具备了提交订单的功能,用户在如下面检查购物车信息是否有误,检查收货人

12、信息是否需要修改(注意:谁登陆就默认谁是收货人),比如你的收货人信息想要改为张三,那么直接在该页面上修改即可。如下:改完成后,击交单,此时orderform数据库中会新增一条记录,如下所示:下面开始设置订单插入成功后跳转至paymentsuccess。aspe页面,该页面的效果如下所示:实现代码如下:LANGUAGE=”VBSCRIPT CODEPAGE=936”%html xmlns=”http:/www.w3.org/1999/xhtmlhead结账成功页面/titlescript language=javascriptfunction gouwu()window。location。hre

13、f=./product/showclass。asp;/scriptstyle type=text/css!-body font-size:12px;background-color:FFFFFF;backgroundimage: url(img/back.gif);backgroundrepeat: repeat;。ordersuccess align:center;border:0px;width:550px;.tdbg color:000000;backgroundcolor:#FFCC66;text-align:center;。tdtbg color:#FFFFFF;background

14、color:996633;-/style/headbodytable class=ordersuccess align=”center border=0 cellspacing=”1 cellpadding=”4 width=550” tr class=”tdtbg td align=center tr class=tdbg” 付款/a /br/br a href=”#订单查询/a/td /tr input type=”button value=返回继续购物 onClick=gouwu()/td /table/body/html在该页面中会根据付款类型的选择提示不同的信息,如选择的是货到付款,

15、则显示“您的订单已经提交成功,请等待我们给您发货”,如选择的是货到付款,则显示“请尽快付款,以便我们尽快给您发货!付款为了取得刚提交成功的订单信息,可以通过对订单信息表orderform中所有的记录进行按照orderid字段的降序排序,并取得的第一条记录即是刚提交成功的订单记录。具体如下:然后,利用判断语句实现,代码如下:tr class=”tdbg td align=”center”请尽快付款,以便我们尽快给你们发货! /br/bra href=”#”订单查询/a 将session购物车中的所有信息内容存储至数据表orderform_sub中并清空购物车,具体实现代码参照如下:bodydim

16、 ucartset ucart=new usercartucart.createcart()set rs=server.CreateObject(adodb.recordset”)sql=select * from orderform_subrs.open sql,MM_conn_STRING,1,3for i=0 to ubound(ucart。viewcart(),2)rs.addnewrs(orderid”)=(Recordset1。Fields。Item(orderid)。Value)rs(”proid)=ucart。viewcart()(0,i)rs(proname)=ucart.v

17、iewcart()(1,i)rs(”proprice)=ucart.viewcart()(2,i)*0.8rs(proamount”)=ucart.viewcart()(5,i)nextrs。updaters。closeset rs=nothingtotal=ucart。tprice()(1)session。contents.remove(”usercart”)%table class=”ordersuccess align=”center” border=0 cellspacing=1” cellpadding=”4” width=550” tr class=tdtbg” td align=

18、”center”/td if (Recordset1.Fields。Item(”payment).Value)=1 then% 您的订单已经提交成功,请等待我们给您发货。请尽快付款,以便我们尽快给你们发货! 付款/a end if% /br/brform name=dopay action=”orderlist.asp method=”post”input type=hidden” name=paytotal value=”input type=”hidden” name=orderid” value=”/form a href=” onclick=sub()订单查询/a /tr /td /t

19、r/body单击订单查询超链接实现跳转至订单查询页面orderlist.asp,并传输订单号及该订单的总价格。具体实现思路是把订单号和订单的总价格分别放至表单dopay中的两个隐藏区域的值中,然后通过“订单查询超链接的“单击”动作激活表单dopay的提交工作,代码如下:a href=”付款 /br/brinput type=”hidden name=”paytotal” value=total%input type=hidden name=”orderid value=”%=(Recordset1.Fields.Item(orderid”).Value)%” a href=” onclick=

20、”sub()订单查询/td 此时设置basket.asp页面中的结账按钮,单击结账按钮就会实现页面跳转至payment.asp,代码如下:input type=”button value=”结账 onclick=jiezhang()”script language=”javascriptfunction jiezhang()window.location。href=。/order/payment.asp下面开始设计订单查询页面orderlist.asp页面效果如下:实现代码如下:html xmlns=http:/www。w3。org/1999/xhtmlheadlink href=。/styl

21、es/orderlist。css rel=stylesheet type=text/css” /headdiv id=box !include file=”./inc/top。asp”- p align=”centerfont size=+1”b您没有登录,不可以进行此操作,请返回a href=.。/index.asp”首页/a登录/font/pdiv id=”left”您没有订单!/td/trtd= Session(MM_Username”) %客户,您的订单如下:/trtda href=”订单/tablediv ; /divdiv id=”righttable align

22、=”center border=”0” class=cart” cellspacing=”1 cellpadding=4” tr class=”tdtbg” 订单详细内容/td /tr td class=”l1” 商品编号/td td class=”l2 名称/td 单价/td td class=l4” 数量金额 td1 1 1 td1 td1 总计金额:1¥/td /tr tr strongfont color=”0000FF” 收货人信息 /td /tr tr td class=ol1 会员名:/td td class=ol2”1/td tr td class=”ol1收货人姓名: td

23、class=”ol2”1/td /tr tr /tr tr 收货地址:/td td class=”ol2”1/td /tr tr /tr tr 付款方式: 1/td form action=pay.asp method=post name=dopay” input type=”hidden name=”orderid” value=” /form /td td class=”ol1”备注: /div!-include file=”。/inc/foot。asp-/div/body !-include file=”。./inc/top。asp- p align=”centerfont size=+

24、1”b您没有登录,不可以进行此操作,请返回a href=。/index.asp首页/a登录/b/font/p!-#include file=.。/inc/foot。asp-然后对div=left这个盒子的内容进行动态开发,首先在应用程序-绑定标签中展开session,把session中的MM_username拖放到网页“客户”文本之前。然后选择应用程序-绑定命令,单击添加按钮记录集,进入记录集对话框,具体设计如图:单击记录集对话框中的高级按钮,把sql代码改成如下所示的效果。选中页面中您没有订单哪一行,选择应用程序-服务器行为命令,单击添加按钮显示区域-如果记录集为空则显示区域.选中订单文本后

25、,选择应用程序服务器行为命令,单击添加按钮重复区域,具体设置如下图所示:下面完善订单文本的超链接效果,使得单击订单文本能在右边的名为right框架内显示订单详细信息,而且能把订单编号传输过去,具体代码如下所示: tda href=”orderlist.asp?orderid=(Recordset1.Fields。Item(orderid”)。Value)”订单/td /tr其中/tr%i=1 While ((Repeat1_numRows td订单/a/td /tr i=i+1 Repeat1_index=Repeat1_index+1 Repeat1_numRows=Repeat1_numR

26、ows-1 Recordset1.MoveNext()Wend下面接收传输过来的订单编号然后根据orderid来查询出数据表orderform_sub中订单编号为orderid的商品记录信息。具体设置如下图:然后把相应的字段拖放到网页的相应位置,如下图所示:然后选中改行设置重复区域。其代码为: While (Repeat2_numRows 0) AND (NOT Recordset2.EOF) % tr class=tdbg td%=(Recordset2.Fields。Item(”proid)。Value) td%=(Recordset2.Fields。Item(proname”).Value)/td td td=(Recordset2。Fields.Item(”proamount)。Value)%=(Recordset2.Fields。Item(”proamount”)。Value)*(Record

展开阅读全文
相似文档                                   自信AI助手自信AI助手
猜你喜欢                                   自信AI导航自信AI导航
搜索标签

当前位置:首页 > 包罗万象 > 大杂烩

移动网页_全站_页脚广告1

关于我们      便捷服务       自信AI       AI导航        获赠5币

©2010-2024 宁波自信网络信息技术有限公司  版权所有

客服电话:4008-655-100  投诉/维权电话:4009-655-100

gongan.png浙公网安备33021202000488号   

icp.png浙ICP备2021020529号-1  |  浙B2-20240490  

关注我们 :gzh.png    weibo.png    LOFTER.png 

客服