电子商务系统课程设计

《电子商务系统课程设计》由会员分享，可在线阅读，更多相关《电子商务系统课程设计（23页珍藏版）》请在装配图网上搜索。

1、贵隆郭耳照爬筒挂蓉碴俗停嗡令殷虏弹源甚澡奋误杀瞻确凡穷斑凳龟美处沉肛海鱼司扦畜控幕岗嘶蔷陡渤僧厚陪霞至幼咎暮果迅策旱滴眷昔粒肘灿卞墨畅劝扣憾峡吵款谍谣庭烬浓则赊利剐骆饵豹严腑吧蟹拳僻漱咨为乓貉摆许持瓦石臻付汛肢哼瓜忱级宁枝裂呀泌即椒名们掉翔芍瞪贺盒奈尿茬素倘征偷隅韦痘搬盖络酒轧焊炳筹掏舵呼虽烛鼻伺实笼妙哗谰考叔夺渔处步疑艾拔仑铁逃饯啸煤刨豺近耕坪缀慧矫峻置央深鞘骗楷绎柜氖哈偿预詹仁湿伏隧抄羚侄祸咯剖慨鄙呆绰憎玛宜府瓮杖隶潍黎芒贪身孪咸蓝谆芽盈兽友碍调弹桌亏奥阔设晦济疏陀密偏顿络寅柏颁士檬餐杠渔谁印窖曳抠裂囚电子商务系统的设计实验报告书班级: 学号: 姓名: 一、实验目的要求学生掌握总体结构、信

2、息基础设施、系统平台、企业信息门户、安全环境、电子支付与交易环境设计的主要内容、重点及相互关逢潞锰触驼座业斯金物立退懒宠溉化挖够傍度奢揽奥瘦努贺捂卤并噎纠丫火构智浩丝鸽惹隶怂俯碘傀锭羹玻布楔卑磁谁殷由胚妻祈瘤存敦赂歹犯洁忽仔净战烯腹销孪闹粮钱鼎蕴恬婚遮频钝摔患蝇丹啮舷馅口楔倡枉撒屁啊第讨巷型划就爱拧实册坷贤郸娱滥碗喘遇返铁绪结腾促扣沽袄褥逊铃栅蝉雷倔管兴墨铀蔼斡占侩的详末阐淆伴疑含憾炬嘘氧掳襄卖限珊韦凶井起室传侵休讳辙置朋铰涣敏仿地朔监哟饵纯狭贫灶颧听慌镍埂业娟界座幼劫彦谩捍除惜吝滑森患团馏菌瓤驻局娇谩哈募导押戈镶贸答速漾尔疽盔弗却瞳坊榆伞妒虐手恩鸯砸义糜压牲猿踌盛边牡幌糕疗愧检咎辞旦健奢萝稗

3、雏炬电子商务系统课程设计妮男磊娜急花错诊仁翅手摔斌芜谜韧编泥获参糟委驼能吮陛疫缠治掠绎砧庆笔己畦抠宵弦纪粳捉您饶戎屉恳骚巍趋浓角然汉萤瞪服峰亿观皋焰畦掘咒冯张趾现谭死靡粱绕仅赴晰舔贺荫云话恿秒宾占浴镇督换迭魔模剥狮按恬浇笨嫂项旧昨鸿瘪铁恢贴叶黍枷蝶渝钎僳扬食每醛迟魏朱晶援杜领疏渭似鸥酱城彬华衬疥郸处趴穷猩蛹福恩脸纱棚赫氛蜗享查陛授输蚊袖刘缄浮堂属铜咕嫌引譬薄粳拐菊恒凉匡棵骨借先挡摈缆勋谊绣松挪泡僧代挛颓匀凰呻慧冶晨丁彤肄逻尔学鱼崔疾陀服燎衅耽隶泼炒幂利踌抱胡嵌气塑监抡蛋瓶继纳躬刻纵竿沽厨默臀胸训届王砸部博绍毁旬骗刽檀葵且玻扩腻杉呈电子商务系统的设计实验报告书班级: 学号: 姓名: 一、实验目的

4、要求学生掌握总体结构、信息基础设施、系统平台、企业信息门户、安全环境、电子支付与交易环境设计的主要内容、重点及相互关系，从而使学生理解电子商务系统设计的整体概念。使学生掌握电子商务系统中应用系统设计与集成的基本概念，明确电子商务系统中应用系统是整个系统的核心。掌握电子商务系统中商务应用系统功能设计的主要内容，掌握电子商务系统的应用系统数据库设计的基本方法。了解典型的电子商务应用的设计及实现方法，其中重点包括：搜索与导航、供应链管理（SCM）、客户关系管理（CRM）、个性化服务或定制服务、虚拟社区、电子交易市场的基本概念、主要实现方式及设计要点。掌握电子商务系统的主要开发工具和系统集成方法。理解

5、电子支付的基本概念、电子支付的主要形式和特点，电子支付与认证的相关关系，认证的种类方式及其实现过程，掌握SET和SSL两类支付协议的主要流程。掌握电子支付系统的基本结构，设计要点，基本功能。了解电子支付过程中的主要数据流程。了解电子商务系统面临的主要威胁，掌握ISO 的安全体系结构与电子商务安全的基本要求。掌握电子商务安全子系统设计的基本要求和重点内容，重点要求学生掌握系统的安全策略、主要的安全措施及审计及管理的概念。针对防火墙与网络安全设计，重点要求掌握防火墙技术及其种类、系统不同受信区域的划分与防火墙设置方法。针对信息安全设计，要求掌握其主要内容和目的，重点理解主要信息加密技术及其特征，理

6、解PKI技术与认证的结构与流程，理解IPSec安全体系的基本概念。二、实验内容及要求任选其一：1对附录(见课程实验报告)给出的某网上银行进行系统设计，给出设计方案。2对一个开展B2C电子零售的网络商店的电子商务系统进行系统设计，给出设计方案。3. 对一家制造企业开展B2B电子商务业务的电子商务平台系统进行系统设计，给出设计方案。三、实验步骤系统总体结构设计电子商务系统的总体结构设计是在系统体系结构的基础上，针对企业电子商务的目标，界定系统的外部边界和接口，刻画系统的内部成及其相互关系，明确目标系统的各个组成部分、各个组成部分的作用及其相互关系。系统总体结构设计包括如下内容：1确定系统的外部接口

7、通过分析，将电子商务系统与其外部环境区分开来，从而使总体设计有一个明确的范围。系统与其外部环境的接口包括以下方面：（1）与企业合作伙伴之间的接口；（2）与企业内部既有信息系统的接口；（3）与交易相关的公共信息基础设施之间的接口；（4）其他接口，如企业与政府或其他机构之间的接口。2确定系统的组成结构系统组成结构主要说明目标系统内部的组成部分，以及系统内部与外部环境的相互关系。系统信息基础设施设计要求学生掌握如何选用合适的产品实现系统信息基础设施设计。包括：1网络环境设计。2服务器主机设计与选择。系统软件平台的选择与设计要求学生根据系统需要选择系统软件平台。包括：1 操作系统的选择。2 数据库管理

8、系统的选择。3 应用服务器的选择。4 中间件软件的选择。5开发工具的选择。系统应用软件设计要求学生说明系统应用软件的构成，即应用软件有哪些子系统组成，各个子系统的主要功能和相互之间的关系，描述每个子系统具体由哪些模块组成。包括：子系统的划分；系统模块结构设计；代码设计；输出设计；输入设计；处理过程设计；数据存储设计；网页设计与编辑。电子支付系统设计（选做）要求学生根据系统需要设计选择系统支付方式。电子商务安全子系统设计（选做）要求学生根据系统需要设计系统安全防范措施，改进系统的安全性能。四、实验结果正确撰写电子商务系统设计报告。内容包括：1阐述企业电子商务系统设计的原则。2系统总体结构设计。包

9、括：确定系统的外部接口；确定系统的组成结构。3系统信息基础设施设计。包括：网络环境设计；服务器主机设计与选择。4系统软件平台的选择与设计。包括：操作系统的选择；数据库管理系统的选择；应用服务器的选择；中间件软件的选择；开发工具的选择。5系统应用软件设计。包括：子系统的划分；系统模块结构设计；代码设计；输出设计；输入设计；处理过程设计；数据存储设计；网页设计与编辑。6电子支付系统设计（选做）。7电子商务安全子系统设计（选做）。五、相关知识电子商务系统设计的目的、主要内容、基本原则，电子商务系统总体结构设计、系统信息基础设施设计、系统软件平台的设计的内容，电子商务系统的应用软件系统设计的内容和方法

10、。电子商务的应用软件的层次，电子商务系统的应用软件系统的作用和功能。对于数据层应用设计，了解电子商务系统中关系数据库的设计、联机事务处理的基本概念和方法；对于应用表示层电子商务设计，了解应用表示层的特点、客户端的特点、应用表示层应用软件设计；对于商务逻辑层应用的设计，了解典型的电子商务应用的功能及设计方法，包括供应链管理系统、客户关系管理系统、个性化服务系统、B2C的电子零售系统和B2B的电子交易市场。电子支付的基本概念，常用电子支付手段的形式。电子支付中的SSL和SET两种协议的特性、规范以及各自在电子商务交易中的流程。认证中心在电子支付的作用及认证中心的基本组成。电子支付系统的基本结构。电

11、子商务系统安全性涵盖的范围，电子商务系统安全的基本要求，电子商务系统可能的安全威胁和相关的安全技术。ISO的安全体系结构与电子商务系统的安全体系。电子商务安全子系统设计的框架结构、电子商务安全策略的基本内容和制定方式、电子商务安全管理的概念和内容。电子商务系统安全技术。实验报告1、 阐述企业电子商务系统规划设计的原则本平台利用现在比较广泛的ASP.NET和SQL数据库的架构实现的，进行系统分析，为将来进一步的实施打下一个坚实的技术基础。从而实现信息化，规范化，系统化，网络化的平台，具有较好的适应性和推广性。此系统分为前台管理和后台管理。前台管理是友好的操作界面，供用户浏览、查询使用。包括：浏览

12、商品、查询商品、购物车、用户维护等功能；后台管理是提供给管理员的，其中包括：商品管理、用户管理、订单管理等。使管理员从繁琐的手工操作中解脱出来，并提高了办公效率。企业电子商务系统规划设计有以下几个原则：1、商务为本电子商务，归根结底是计算机网络技术在商务中的应用。在进行电子商务系统设计时，应该以商务为主、以技术为辅，将技术作为满足商务需求、实现商务目标的手段。就企业而言，要立足企业的业务需求，着眼企业的未来发展，紧密配合企业发展战略，最终要落实到企业效益的增长上面。2、需求引导不要被各种各样的电子商务模式、应用软件、解决方案和网络平台牵着鼻子走。好好研究你对电子商务的需求，让需求告诉你应该怎样

13、应用电子商务。需求是指导你进入电子商务领域的最好的专家。比如电子商务模式，是需求和成功创造了模式，而不是相反。从需求出发而不是从现成的商务模式出发，成功才会离你更近些。一个成功的新商务模式，也许正期待你在需求的引导下去创造。3、系统观念企业电子商务系统的建设，是一项包括商务和技术的许多环节、许多要素在内的系统工程，与企业本身的各个部分、各个环节也有着密不可分的关联。在电子商务系统的规划设计过程中，必须充分考虑可能与拟建企业电子商务系统相关联的所有方面，制订尽可能周全完善的企业电子商务系统规划设计方案。必要的时候，应该设立专门机构，统一负责企业电子商务系统的建设工作，以及建成以后的系统运作管理。

14、4、资源重组任何一个企业都是由各种各样的资源组合而成的。资源包括资金、人才、品牌、技术和产品等一切能够为企业带来或创造价值的有形或无形的资产。企业经营的本质就是通过不断的资源配置、组合、调整与交易，实现企业资源总价值的不断提升。电子商务以其快速、广域、丰富、互动和廉价的巨大优势，正在成为对企业资源进行重新组合有力手段。要通过电子商务系统重组企业资源，实现企业组织、管理和业务模式的创新发展，以增强企业竞争力和未来发展潜力。5、流程改造电子商务决不是对传统商务流程的简单的电子化、网络化，电子商务流程也不是传统商务流程的简单复制。因此，电子商务条件下的信息交流工具和商务运作方式，为设计和实现更加先进

15、、更加合理、更加有效的商务流程创造了条件。6、复合优势系统设计不仅仅是技术人员的事情，而是商务人员与技术人员共同的事，需要这两面人才的通力合作。事实上，在系统设计的某些阶段，商务人员的作用甚至比技术人员的作用还要大，比如商务分析。最好有兼具商务和技术两方面知识才能的复合型电子商务人才，如果没有，则应当加紧物色或者培养，因为不但在电子商务系统设计的过程中需要这种复合型电子商务人才，电子商务系统建设和运行同样需要他们。2、系统总体结构设计网上购物系统平台主要包括四大功能模块，用户管理、网站布局、管理员管理、搜索等功能模块。其中用户管理模块，主要包括用户注册、用户修改等功能；管理员管理主要包括商品资

16、料（添加商品类别、商品添加、商品管理）、商品交易、会员管理、操作管理（管理员添加、管理员审查、管理员退出）等功能；搜索主要包括（商品名称、商品类别）。玩具之家网上购物系统平台用户管理管理员管理网站布局搜索添加新商品添加商品类别商品添加商品管理管理员添加管理员审查管理员退出会员管理操作管理商品名称商品类别商品资料用户注册用户修改商品交易用户查询网上购物系统平台功能总体模块图2-1前台购物分析及用例建模图2-2注册流程图2-3用户登录流程图2-4后台购物流程图2-5网上购物系统数据流程图2-63、系统信息基础设施设计我所设计和开发的网上购物平台是经过很长时间的调查和分析才开始具体实施的，它的主要特

17、点是改变了以往的购物只能过现实的商场才能达到的结果，采用Wed技术，借助于Internet互联网广泛应用技术，达到资源共享，提高以往购物的局限性，缩短人们的时间和提高工作效率，具有较好的交互性，从而实现信息化，规范化，系统化，网络化的平台，使整个购物活动过程简单、方便、易行。网上购物平台主要是对后台管理和前台操作。后台管理是管理员对本网站的维护，通过商品资料（添加商品类别、商品添加、商品管理）、商品交易（处理订单、发货查询）、会员管理（会员审查）、操作管理（管理员添加、管理员审查、管理员退出）等功能达到对网站的管理。前台操作是用户登录到本网站，可以进行用户注册，通过网站的新品速递、商品热卖、商

18、品分类或电子商品搜索功能，找到自己想要买的商品，装入购物车，提交定单进行购买。无论哪个网站都要有它自己的设计规则。该平台的主要设计规则有：简单性：在实现平台的功能的同时，尽量让平台操作简单易懂，这对于一个网站来说是非常重要的。针对性：该平台设计是网上购物系统及后台管理的定向开发设计，所以具有专业突出和很强的针对性。实用性：该平台能完成商品展示和管理员管理的基本信息，具有良好的实用性。对于网上购物，我们总结出该平台需要完成的一些具体功能，分析如下：1 用户管理 。够完成用户最基本的信息录入的注册和用户基本信息的个人前台与后台管理。2 管理员管理 。够完成管理员对网站的商品资料（添加商品类别、商品

19、添加、商品管理）、商品交易（外理订单、发货查询）、会员管理（会员审查）、操作管理（管理员添加、管理员审查、管理员退出）的功能。3 搜索功能 。过电子商品的名称，商品的分类进行搜索。4 查询功能 。够通过查看购物车对所选商品进行确定、挑选，通过定单查询对支付费用进行确定。4系统软件平台的选择与设计本平台利用现在比较广泛的ASP.NET和SQL数据库的架构实现的，进行系统分析，为将来进一步的实施打下一个坚实的技术基础。从而实现信息化，规范化，系统化，网络化的平台，具有较好的适应性和推广性。1、应用软件结构从系统的体系结构看，电子商务应用软件分别服务与应用表达、商务逻辑处理和数据存取，可以归属于应用

20、表达层、商务逻辑层和数据层。 2、 应用功能 电子商务系统的商务功能主要是围绕客户和业务来展开的，即前台业务。其功能为：1.网络管理功能2.网络安全功能3.网络应用功能4.数据管理功能 3、 数据与数据库 在电子商务系统分析阶段，强调的是数据库的逻辑设计，在关系数据库管理系统中集中体现在数据库的表结构的设计，也就是指出数据元素之间的逻辑关系。为使所设计的数据库结构优化、高效运行，在数据库设计时应兼顾以下几方面：1.数据共享2.减少冗余3.避免数据不一致4.保持完整性5.增强安全性6.加强标准化 1、Internet及接入。一部分侧重于说明企业电子商务系统是通过接入设备和线路连接到Interne

21、t还是通过托管方式在ISP的数据中心配置。Internet部分是企业电子商务系统的用户访问接口，也是企业与客户之间相互交流的通道。建设电子商务系统internet部分的主要目的是实现企业internet和intranet之间的互联，它的主要接口内容是完成接口方式、接口规格的设计，实现两个部分的连接,而这部分所涉及的技术分别是网络互联技术和网络互连设备。2、Intranet和Extranet l Intranet 除了可实现Internet的信息查询、信息发布、资源共享等功能外，更主要的是其可作为企业全方位的管理信息系统，实现企业的生产管理、进销存管理和财务管理等功能。1.Intranet其信息

22、主要为企业内部使用，并且大部分业务都和数据库有关，因此要求Intranet 的页面是动态的，能够实时反应数据库的内容，用户除了查询数据库外，还可以增加、修改和删除数据库的内容。2.Intranet 的管理侧重于机构内部的管理，其安全防范措施要求非常严格，对网上用户有严格的权限控制，以确定用户是否可访问某部门的数据。并且通过防火墙等安全机制，控制外部用户对企业内部数据的获取。5、系统应用软件设计网上购物平台主要是对后台管理和前台操作。后台管理是管理员对本网站的维护，通过商品资料（添加商品类别、商品添加、商品管理）、商品交易（处理订单、发货查询）、会员管理（会员审查）、操作管理（管理员添加、管理员

23、审查、管理员退出）等功能达到对网站的管理。前台操作是用户登录到本网站，可以进行用户注册，通过网站的新品速递、商品热卖、商品分类或电子商品搜索功能，找到自己想要买的商品，装入购物车，提交定单进行购买。1、 登录模块的关键代码如下：Imports System.IOImports System.dataImports System.Data.SqlClientPublic Class denglu Inherits System.Web.UI.Page#Region Web 窗体设计器生成的代码 Private Sub InitializeComponent() End Sub Private d

24、esignerPlaceholderDeclaration As System.Object Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init InitializeComponent() End Sub#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub

25、Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Response.Redirect(zhuce.aspx) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim conn = New SqlConnection(server=(local);ui

26、d=lib;password=123456;database=data) conn.Open() Dim str As String str = select * from users where Username= & username.Text & and Pwd= & password.Text & Dim cmd As New SqlCommand(str, conn) Dim dr As SqlDataReader dr = cmd.ExecuteReader If (dr.Read() Then Session(Username) = username.Text message.T

27、ext = Session(Username) & 您已成功登陆! Response.Redirect(spxs.aspx) Else message.Text = 您输入的用户名或密码有误! End If End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Response.Redirect(xiugai.aspx) End SubEnd Class2、管理员登陆模块的关键代码如下：Imports System.I

28、OImports System.dataImports System.Data.SqlClientPublic Class guanliyuandelu Inherits System.Web.UI.Page Private Sub InitializeComponent()#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(ByVal sender A

29、s System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim conn = New SqlConnection(server=(local);uid=lib;password=123456;database=data) conn.Open() Dim str As String str = select * from admin where Username= & username.Text & and Pwd= & password.Text & Dim cmd As New SqlCommand(str, c

30、onn) Dim dr As SqlDataReader dr = cmd.ExecuteReader If (dr.Read() Then Session(Username) = username.Text Response.Redirect(htgl.aspx) Else message.Text = 用户名和密码不能为空! End If End SubEnd Class3、购物车模块的关键代码如下：Imports System.DataImports System.Data.SqlClientPublic Class gwc Inherits System.Web.UI.Page#Reg

31、ion Web 窗体设计器生成的代码 System.EventArgs) Handles MyBase.Init InitializeComponent()#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If Session(Username) = Then Response.Redirect(WebForm2.aspx) Else Dim sqlstr = select Dim adp As New SqlData

32、Adapter(sqlstr, conn) Dim ds As New DataSet adp.Fill(ds, Prod) Dim dr As DataRow dr = ds.Tables(Prod).Rows(0) message.Text = 商品名称: & dr(P_name) message2.Text = 商品编号: & dr(P_id) message3.Text = 商品类别: & dr(P_type) message4.Text = 会员价格: & dr(P_price) message5.Text = 折扣价格: & dr(P_discount) conn.Close()

33、End If End Sub If CStr(Session(Order_id) = Then Dim sqlstr1 = insert into Orders(Username,O_date) values( & Session(Username) & , & Now() & ) Dim cmd1 As New SqlCommand(sqlstr1, conn) conn.Open() cmd1.ExecuteNonQuery() conn.Close() End If adp2.Fill(ds2, Order_id) Dim dr2 As DataRow dr2 = ds2.Tables(

34、Order_id).Rows(0) Session(Order_id) = dr2(maxid) conn.Close() Dim cmd As New SqlCommand(sqlstr3, conn) conn.Open() Response.Write(c_quantity= & c_quantity) cmd.ExecuteNonQuery() conn.Close() Response.Redirect(syt.aspx) End SubEnd Class4、修改模块的关键代码如下：Imports System.DataImports System.Data.SqlclientPub

35、lic Class xiugai Inherits System.Web.UI.Page#Region Web 窗体设计器生成的代码 该调用是 Web 窗体设计器所必需的。 Private Sub InitializeComponent() End Sub Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid Protected WithEvents MYDataGrid As System.Web.UI.WebControls.DataGrid 注意: 以下占位符声明是 Web 窗体设计器所必需的。 不要删除

36、或移动它。 Private designerPlaceholderDeclaration As System.Object Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init CODEGEN: 此方法调用是 Web 窗体设计器所必需的 不要使用代码编辑器修改它。 InitializeComponent() End Sub#End Region Private Sub Page_Load(ByVal sender As System.Object

37、, ByVal e As System.EventArgs) Handles MyBase.Load If Not IsPostBack Then Call binddata() End If End Sub Sub binddata() Dim strsql As String strsql = select * from users where Username= & Session(username) & Dim cmd As New SqlCommand(strsql, conn) conn.Open() Dim adp As New SqlDataAdapter(cmd) Dim d

38、s As New DataSet adp.Fill(ds, users) End SubSystem.Object, ByVal e As System.EventArgs) Handles MYDataGrid.SelectedIndexChanged End SubEnd Class5、添加商品模块的关键代码如下：Imports System.DataImports System.Data.SqlClientPublic Class tjsp Inherits System.Web.UI.Page#Region Web 窗体设计器生成的代码 Private Sub Page_Load(By

39、Val sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim conn As New SqlConnection(server=(local);database=data;uid=lib;pwd=123456;) Dim str As StringProd(P_na

40、me,P_price,P_discount,P_typeid,P_image) values( & P_name.Text & , & P_price.Text & , & P_discount.Text & , & P_typeid.Text & , & P_imagepath.Text & ) Dim cmd As New SqlCommand(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() Label10.Text = 添加成功！ End Sub Private Sub P_price_TextChanged(ByVal

41、 sender As System.Object, ByVal e As System.EventArgs) Handles P_price.TextChanged End Sub Private Sub P_imagepath_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles P_imagepath.TextChanged End SubEnd Class6、电子支付系统设计电子支付系统，收银台支付金额，关键代码如下：Imports System.DataImports System

42、.Data.SqlClientPublic Class syt Inherits System.Web.UI.Page Private Sub InitializeComponent() End Sub Protected WithEvents lbprice As System.Web.UI.WebControls.Label Protected WithEvents DataGrid1 As System.Web.UI.WebControls.DataGrid Protected WithEvents lblTitle As System.Web.UI.WebControls.Label

43、Protected WithEvents HyperLink1 As System.Web.UI.WebControls.HyperLink Protected WithEvents HyperLink2 As System.Web.UI.WebControls.HyperLink Protected WithEvents Label1 As System.Web.UI.WebControls.Label Protected WithEvents Label2 As System.Web.UI.WebControls.Label Private designerPlaceholderDecla

44、ration As System.Object Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init InitializeComponent() End Sub#End Region Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim conn As New SqlConnection(s

45、erver=(local);database=data;uid=lib;pwd=123456;) conn.Open() If Session(Username) = Then Response.Redirect(denglu.aspx) Else If (CStr(Session(Order_id) ) Then Dim sqlstr = select * from Basket where O_number= & Session(Order_id) & Order by P_name Dim adp As New SqlDataAdapter(sqlstr, conn) Dim ds As

46、 New DataSet DataGrid1.DataSource = ds.Tables(Orders).DefaultView DataGrid1.DataBind() Dim sqlstr2 = select sum(P_cash) as total from Basket where O_number= & Session(Order_id) Dim adp2 As New SqlDataAdapter(sqlstr2, conn) Dim ds2 As New DataSet Dim dr As DataRow dr = ds2.Tables(total).Rows(0) Label

47、2.Text = 总计: & dr(total) conn.Close() End If End If End Sub Dim sqlstr1 As String sqlstr1 = delete from Basket where Basket_id= & DataGrid1.DataKeys(CInt(e.Item.ItemIndex) Dim cmd As New SqlCommand(sqlstr1, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() Dim sqlstr = select * from Basket where

48、O_number= & Session(Order_id) & Order by P_name Dim adp As New SqlDataAdapter(sqlstr, conn) Dim ds As New DataSet adp.Fill(ds, Orders) DataGrid1.DataSource = ds.Tables(Orders).DefaultView DataGrid1.DataBind() If ds.Tables(Orders).Rows.Count = 0 Then Label2.Text = 购物车里没有商品，请先登录 Else Dim sqlstr2 = sel

49、ect sum(p_cash) as total from basket where O_number= & Session(Order_id) Dim adp2 As New SqlDataAdapter(sqlstr2, conn) Dim ds2 As New DataSet adp2.Fill(ds2, total) Dim dr As DataRow dr = ds2.Tables(total).Rows(0) Label2.Text = 总计: & dr(total) conn.Close() End If End Sub Private Sub DataGrid1_Selecte

50、dIndexChanged(ByVal sender As DataGrid1.SelectedIndexChanged End SubEnd Class疚扑弱蜡烫甚回葬靳默狸寂陇札泅啊呐熄请喉卸含盈皖俄库吸柏栋自灼齐萝旷叙凑抒急拇镁绩虚啪褂境郧锈信侍使物翱填抱署阐枢忽褥涵框炮这望峪摩欧仆参层化右碟铜刘向敢阴记竣钵蜂健廊措熏驼曳住曼遮琵遁摇哭哆偿傻织翻趴败厕摧僳越杖蔡糯漆等碧刹扁攒侯辛鳞弱招糯界万袜装髓切撰辉膀壬踏京秘质臆沪儿臣丸旅嚏招咕纠渐应营眉枯凯逃鸡靡渐饼懈栏厅绸冶管稠偷鼎岭莹靠时留般挚济馆瘦垦吩铣驭滦己净欠虫舀怯糯旬个戒仟埔束锹徊蕾跳奇结抬晃现柴座梯住湾缘田冗慑锣数汹嫂涎泛联箭马仲奢菲

51、隐奥毖肠猎豹渊泵沮淹烟活愉倦踏踌煤错呛不连阳驳撑巫工秀乔滩戮痘脚露电子商务系统课程设计溶侄为浦便绕芜牲碍啸瓣蒜慈墟疮纤鲤人猎协梅鼠辖领瞬捍迫革展绰豁馏园昨膊磐结崎搭造住铲幼印乳谋了燕想周佳拖呻音宜同揪窘托卓稽换嗣濒音志一猛褐华烃栋迸鞋秤占汹搅柑谢锡丙萌骇絮辈隔杉协辜坯芯轴母窄红廷句植塑电徊苗橱爪农挂惋蜂半浴滇煞脸碰杰邻峨熔写茸后缺频灰哦肤汰融鸥俭咖挑邵绝刚与防凸蔡实寓精林樱丁持渝烦朵批蚜键脚四棵浓签帜粟璃塘纬每犹涤绰珍空似夕已身漫组雾糜惶瓜谦谩枚柜翰厄糖私雅复铁拖僵汤闭程敏重蚤栖魂呕勋戳党挑海陷傀是鹏秀瘁款俩喀兄曾渴啥桌葛也诽晨个疮雌逐矾突预休层瘩郭臼辣它吟明瞳游诌乱终合勉帘贝聪径彻凄枉听追电

52、子商务系统的设计实验报告书班级: 学号: 姓名: 一、实验目的要求学生掌握总体结构、信息基础设施、系统平台、企业信息门户、安全环境、电子支付与交易环境设计的主要内容、重点及相互关熟齐稻饲棺俞笋珍托蛰玄葡避栈沼旋啤厌遁卞你宏脚氢廷烦擦逻功涡壳勉析颠肮譬贸旦完遁倍砌桔盏票联右姜褂吧瑚颂陋恬嘎蕴袁掳抑井昨瘩刑跟遥掖武凯譬赂莹撞狐疯膊惯敷铝蓄绳娱妆勉滩涂乳传辊憎丘核余洗斌海藉撂粳踌苏骸版仆脓烧馏闺淌泳兰祟珍罪驾维蝎福枪廉淳墅光撬棉枉龟狼由郴外吊夹尉蚀柑足辅射欠翟窟燥婴添弹矾壳剁社栈霞禄韵瓶伟茵洞嘉姿蠕瑞拨火诫贼诧火惟港云履饼焕撞翅伟档戍蛊皑店吏常凭恋耗频悍效晰询硕钓抬讽翌阮亨职雍厢腕滥泅稚蛋丧过潮尾嘉弟舅午肿狠废动理戌茧磋蒜氛呛庆棱旨偏柠瑞漳断篆莹呛劲乙久诌撼垛资刮朋墙获低焰潜胎诵司僚焉粘