网络书店的编程思路.txt

网络书店的代码 以及整个构思 框架设计

程序实现的要点是如何判别当前订购的商品在购物小车中是否存在，因此，首先要将Session变量的内容拆分并存入数组： 


array1=split(Session(“spid”),“:”) 


然后用循环语句判别array1中是否有元素与传递来的spid相同并将结果存入变量ifbuy： 


for i=0 to ubound(array1)－1 


if array1(i)= Request.QueryString(“spid”) then 


ifbuy=true 


exit for 


end if 


next 


将新增的商品信息加入Session： 


Session(“spid”)=Session(“spid”)＆ Request. 


QueryString(“spid”)＆“:” 


Session对象的另一个自定义属性num的处理同spid相同。 


购物小车的显示 


显示用户已经购买的商品信息，即是显示Session变量的内容。只要将Session变量的内容拆分，存入数组中，再显示数组的内容即可。购物小车的显示界面如图1所示，其中“数量”栏的类型为“text",“取消本商品”栏的类型为“checkbox”。这两栏的数据是可以变动的，在“取消本商品”栏中打“√”，再按“重新计算”，将在购物小车中取消该商品。 



图1 


“重新计算”和“继续购买”两个命令按钮用javascript实现： 


＜scriptlanguage=“javascript"＞ 


＜!－－ 


functiononback(theForm) 


{window.history.back()} 


functionrecal(theForm) 


{theform.action=“modifycart.asp"} 


－－＞ 


＜/script＞ 


实现显示购物小车的代码如下： 


＜％ 


dimk 


array1=split(Session(“spid”),“:”) 


array2=split(Session(“num”),“:”) 


k=0 


dowhilek＜ubound(array1)％＞ 


＜tr＞ 


＜td＞＜palign=“center”＞＜％=array1(k)％＞ 


＜/p＞＜/td＞ 


＜td＞＜p＞＜inputtype=“text”name=“t1”size=“10”value=“＜％=array2(k)％＞”＞＜/p＞＜/td＞ 


＜td＞＜p＞＜inputtype=“checkbox”name= 


“ifcancel”value=＜％=k％＞＞＜/p＞＜/td＞＜/tr＞ 


＜％k=k＋1 


loop％＞ 


＜tr＞ 


＜tdalign=centerheight=“42”colspan=“2”＞ 


＜inputtype=“submit”name=“submit”value=“重新计算” 


onclick=“returnrecal(this.form)”＞＜/td＞ 


＜tdalign=centerheight=“42”colspan=“3”＞ 


＜inputtype=“submit”name=“Submit”value=“继续购买” 


onclick=“returnonback(this.form)”＞＜/td＞ 


＜/tr＞ 


购物小车的修改 


在用户点击“重新计算”按钮后，需要对购物小车的内容进行修改，包括对数量的修改和将被取消的商品从Session中删除。 


对于数量的修改，只要将文本框中被变动过的数据重新存入Session中即可： 


＜％ 


’首先将保存在Session变量中的订购数量提取出来 


array=split(Session(“num”),“:”) 


’将文本框t1中商品的数量提取出来，存入array数组中 


ifRequest.Form(“t1”)＜＞“”then 


Session(“num”)=“” 


j=0 


foreachiteminRequest.Form(“t1”) 


array(j)=item 


j=j＋1 


next 


’将提交后的商品数量放入Session变量中 


fori=0toubound(array)－1 


Session(“num”)=Session(“num”)＆array(i)＆“:” 


next 


endif％＞ 


要从Session中删除被选中的商品，首先要取得“checkbox”的返回值，它用来定位被取消的商品在Session变量中的位置。“checkbox”的返回值k是一个循环变量，是商品所在行的行数，其实也就是被选中商品在Session中的位置。如果不加返回值定义的话，“checkbox”的返回值是按自然数顺序排列的。例如，在图1所示的情况下，如果“电视机”和“书籍”两行被选中，若是“checkbox”不加返回值定义，它的返回值将分别为1和2，这样就会导致把“电视机”和“钢笔”从Session中删除的错误。 


＜％dimarray1,array2,ifcancel(20),m1,m2,i,j 


array1=split(Session(“spid”),“:”) 


array2=split(Session(“num”),“:”) 


m1=ubound(array1)－1 


m2=ubound(array2)－1 


’保存复选框checkbox的值 


fori=1toRequest.Form(“ifcancel”).Count 


ifcancel(i)=Request.Form(“ifcancel”)(i) 


next 


fori=1toRequest.Form(“ifcancel”).Count 


’将checkbox选中的spid和num从Session中去掉 


forj=ifcancel(j)tom1－1 


array1(j)=array1(j＋1) 


array2(j)=array2(j＋1) 


next 


’将总数减1，并将后面的checkbox的值减1 


m1=m1－1 


forp=itoRequest.Form(“ifcancel”).Count 


ifcancel(p)=ifcancel(p)－1 


next 


’将处理后的spid和num放回Session 


Session(“spid”)=“” 


Session(“num”)=“” 


forj=0tom1 


Session(“spid”)=Session(“spid”)＆array1(j)＆“:” 


Session(“num”)=Session(“num”)＆array2(j)＆“:” 


next 


next％＞ 
这样就可以轻松购物的功能了！
【后台管理的实现】
主要功能如下： 
1、按任意字段模糊查询、组合条件查询(查询语句的保存/删除/修改)、排序以及记录的添加、修改、删除等功能。 
2、查询的内容可直接生产报表,并可按需选择字段生产报表,转入EXCEL、WORD等办公软件中进行修改、打印。 
3、可远程建立数据表及数据表字段的添加、删除。 
4、可对多个数据库进行统一管理。 
5、用户管理：添加、修改、删除用户；用户权限设置。 
6、用户日志：记录用户登陆的时间， 
7、菜单管理：可无限扩展以增强系统的功能，可任意挂接任何WEB服务体系。 
8、公告发布：提供了网页在线编辑器，用于公告的发布，如发布通知等。 
9、文件传递：提供文件的上传与下载。 
10、留言功能：用于各部门之间的联系。 
11、信使功能：用户快速传递信息，可单发、群发信息， 
12、高级管理员可自定软件界面风格 
13、高级管理员可将系统安装成系统服务，服务器将自动启动服务，像IIS服务器一样。
 






  
                                                                        2004年11月18日10:14:46湖南省长沙市电信ADSL
61.186.105.243:4002<QQ2004 正式版SP1 0928>