物流管理信息系统之订单管理子系统设计范本66039.docx

《物流管理信息系统之订单管理子系统设计范本66039.docx》由会员分享，可在线阅读，更多相关《物流管理信息系统之订单管理子系统设计范本66039.docx（50页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、课程设计说说明书设计题目： 物流流管理信信息系统统之订单单管理子子系统设设计专 业：设 计 人人：_山东科技大大学2014年年 月月 日课程设计任任务书学院 机械械电子工工程学院院专业 班级 20111-22 姓名名 一、课程设设计题目目：物流流管理信信息系统统之订单单管理子子系统设设计二、课程设设计内容容与要求求：（1）设计计一套订订单管理理系统，要要求能完完成基本本的订单单录入、修修改、删删除 （2）系统统分为管管理员登登录与用用户登录录两大方方向_（3）可注注册新用用户，用用户信息息，管理理员信息息可修改改_三、课程设设计应解解决主要要问题：（1）主窗窗体与各各个分窗窗体结构构设计_（2

2、）程序序与数据据库的连连接_（3）各窗窗体具体体代码编编写_四、课程设设计相关关附件（如如：图纸纸、软件件等）（1）课程程设计说说明书一一份 （2）存有有设计内内容的光光盘一张张_五、任务发发出日期期： 20113-112-223 _ 课程设设计完成成日期： 20114-11-4 指导教师签签字：_ 系主任任签字：_指导教师对对课程设设计的评评语指导教师签签字： _年_月月_日山东科技大学学生课程设计目录录 1课题简简介31.1 课课题研究究目的和和意义331.2 课课题主要要研究内内容332系统分分析42.1 业业务流程程图442.2 用用户需求求分析442.3 系系统功能能设计663系统设

3、设计63.1 总总体设计计663.2 详详细设计计773.3 数数据结构构设计774系统实实施94.1 系系统首界界面994.2 登登录界面面 1114.3新用用户注册册界面1334.4提示示完善个个人信息息界面1554.5用户户完善个个人信息息界面1774.6用户户登录界界面1994.7用户户查看个个人信息息界面2444.8用户户完善个个人信息息界面2664.9管理理员登录录界面2884.10 管理员员信息修修改界面面 334.11 管理员员查看用用户信息息界面 356使用说说明377参考资资料371.课题简简介1.1课题题研究目目的和意意义在科学技技术日新新月异的的今天，计计算机已已逐步渗

4、渗入各个个领域，随随着互联联网的普普及，我我们进入入了信息息化的时时代，人人们只要要在家中中轻点几几下鼠标标就能轻松松获得各各种信息息，并且能够够购买到到自己需需要的商商品，既既摆脱了了时间和和空间的的限制又又节约了了大量的的时间。商品销销售订单单管理系系统正是是在这种种情况下下诞生并并逐渐发发展起来来的，它它已成为为我们进进行商品品交易中中不可缺缺少的部部分。本系统是在在分析了了现行商商品管理理中存在在的问题题的基础础上，结结合信息息管理系系统开发发的概念念、结构构及系统统开发的的基本原原理和方方法，开开发的一一套企业业商品订订单管理理系统。该系统目的在于同时满足销售方与用户进行订单管理，进

5、而满足经营管理运作流程。并且操作方便、功能强大，即便操作者对计算机知识一窍不通也可以熟练使用该系统，一用就会。1.2 课课题研究究的主要要内容企业订单管管理系统统主要完完成的内内容包括括：系统登录控控制。必必须使用用用户名名和密码码登录后后才能使使用系统统。产品信息浏浏览。浏浏览系统统中所有有的产品品信息，可可以使用用指定的的关键词词查询相相应的产产品，并并通过报报表的形形式将查查询结果果输出。产品信息管管理。管管理订单单中所使使用的产产品信息息，可以以浏览、增增加、修修改和删删除产品品信息。订单信息管管理。管管理订单单信息，可可以浏览览、增加加、修改改和删除除订单信信息，在在增加订订单时需需

6、要使用用的产品品信息和和客户信信息必须须首先通通过产品品信息管管理和客客户信息息管理功功能添加加。客户信息浏浏览。浏浏览系统统中所有有的客户户信息，可可以使用用指定的的关键字字查询相相应的客客户，并并且可以以使用报报表的形形式将查查询结果果输出。客户信息管管理。管管理下订订单时客客户信息息，可以以浏览、增增加、修修改和删删除客户户信息。用户权限管管理。本本系统中中实现了了简单的的用户权权限管理理，普通通用户仅仅能修改改密码，而而管理员员用户则则可以添添加、修修改、删删除用户户。利用系统分分析和设设计原理理，采用用面向对对象的编编程方法法，通过过用Viisuaal BBasiic 66.0编编写

7、企业业订单管管理系统统，用SSQL Serrverr 20000进进行数据据库建设设与管理理，实现了了企业订订单管理理的自动动化和信信息化2.系统分分析2.1业务务流程图图.2.2用户户需求分分析设计任何定定制化产产品都是是一个“翻翻译”的的过程。我我们需要要把浮现现在客户户脑海中中的模糊糊想法、愿愿望挖掘掘出来，并并“翻译译”成满满足他们们需求的的现实产产品。这这个“翻翻译”过过程的第第一步就就是理解解用户的的需求。设设计最好好的订单单处理系系统对于于需要一一个电路路设计工工具的客客户来说说毫无意意义。我我们首先先制定了了一个计计划，其其中包含含挖掘客客户需求求的一系系列步骤骤。遵循循这些步

8、步骤能更更好地理理解客户户需求，但但在一些些项目中中我们不不需要遵遵循所有有的步骤骤。举例例来说，如如果客户户是单个个人且需需求很明明确时，我我们就不不需要进进行“搞搞清谁是是谁”与与“头脑脑风暴”了了。当客客户的数数据需要要保密时时，我们们就不能能“尝试试客户的的工作”了了。在另另一些项项目中，调调整这些些步骤的的顺序会会更为合合适。例例如我们们可能在在去拜访访客户和和观察他他们工作作之前先先进行“头头脑风暴暴”。我我们需要要思考，向向客户问问些什么么问题可可以帮助助我们了了解项目目的目标标和要求求。以下几个方方面的问问题可以以作为起起始点。 1）功能与目标。(1).系系统应该该做些什什么(

9、2）.为为什么你你想建这这个系统统(3).系系统看上上去应该该是怎样样的(4).需需要些什什么报表表(5).用用户需要要自己定定义新报报表吗(6).系系统的操操作者会会是谁2）数据需需求：这些问题是是为了弄弄清项目目的数据据需求。(1).系系统界面面上需要要展现哪哪些数据据(2).这这些数据据应该由由谁来提提供(3).这这些数据据是如何何关联的的(4).这这些工作作现在是是如何处处理的?数据来来自哪里里?(5).数数据完整整性：3）数据库库完整性性约束。(1).哪哪些数据据是必须须填写的的(一条条客户记记录必须须有电话话信息吗吗)(2).数数据的有有效域是是什么?(电话话号码是是否有格格式规定

10、定?地址址数据应应有多长长) (3).系统中中是否必必须在定定义了客客户之后后才能下下订单(4).系系统要求求多高的的可用性性等级(系统需需要724的的可用性性吗?数数据的备备份频率率要多高高)4）安全性性：这些问题能能帮助我我们了解解客户对对权限控控制与审审计方面面的需求求。(1).是是否每个个用户都都需要一一个不同同的密码码(2).是是否需要要控制不不同的用用户所能能访问的的数据( 销售售代表有有权限看看到客户户的信用用卡账号号，但订订单录入入专员却却不能)(3).存存储在数数据库中中的数据据是否需需要加密密(4).谁谁做了什什么操作作是否需需要记录录以便于于审计( 记录录销售代代表提高高

11、客户级级别的操操作，在在需要时时可以追追溯操作作的原因因)2.3系统统功能设设计主要功能就就是给用用户带来来信息的的沟通，交交流的便便捷。订订单管理理系统的的主要功功能是通通过统一一订单提提供用户户整合的的一站式式员工供供应链服服务。订订单管理理系统物物流管理理链条中中的不可可或缺的的部分，通通过对订订单的管管理和分分配，使使仓储管管理和运运输管理理有机的的结合，稳稳定有效效地实现现物流管管理中各各个环节节充分发发挥作用用，使仓仓储、运运输、订订单成为为一个有有机整体体，满足足物流系系统信息息化的需需求。订单管理是是对商户户下达的的各种指指令进行行管理、查查询、修修改、打打印等功功能，同同时将

12、业业务部门门处理信信息反馈馈至商户户。订单单管理系系统一般般包括：订单处处理，订订单确认认等。3.系统设设计3.1总体体设计该系统为了了两大部部分：用用户登录录后的界界面，管管理员登登录后的的界面。3.2 详详细设计计classs类：实实现数据据库的连连接字符符串Regissterr类：实实现用户户注册Loginn 类：登录窗窗口类，用用户登录录时选择择用户角角色，进进入员工工操作界界面。管管理员登登录时则则进入相相应的界界面进行行订单信信息操作作。main类类：实现现系统功功能的类类，实现现各模块块的功能能。如订订单基本本信息录录入，订订单提交交，订单单退订。删删除订单单信息，修修改订单单信

13、息，查查看订单单信息。Main类类：用户户操作界界面，在在此用户户可以查查看订单单的信息息，且可可以订单单的提交交和退订订。Adm 类类：管理理员操作作页面，在在此管理理员可以以查看和和处理所所有客户户订单信信息，可可以查看看客户基基本信息息以及个个人信息息。UserIInfoo 类：显示用用户信息息、用于于管理员员对客户户的信息息查询和和处理。3.3数据据结构设设计用户表属性性：用户表：商品表属性性：商品表：管理员信息息表属性性：管理员信息息表：订单信息表表属性：订单信息表表：4.程序实实施4.1 主主体窗口口Privaate Subb MDDIFoorm_Loaad() Dimm X00

14、Ass Loong Dimm Y00 Ass Loong 让让窗体居居中 X0 = SScreeen.Widdth Y0 = SScreeen.Heiightt X0 = (X0 - MMe.WWidtth) / 22 Y0 = (Y0 - MMe.HHeigght) / 2 Me.Movve XX0, Y0End SSubPrivaate Subb mffdljjm_CClicck() dljjm.SShoww Unlloadd MeeEnd SSubPrivaate Subb mffexiit_CClicck()EndEnd SSub4.2登录录界面Privaate Subb Coomma

15、and11_Cllickk()Statiic mmicoountt Ass Inntegger 用于于记录输输入密码码次数Dim ssqlsstr As Strringgsqlsttr = sseleect * ffromm 用户户信息表表 whheree 用户户名= & Teext11 & Adodcc1.RRecoordSSourrce = ssqlsstrAdodcc1.RRefrreshhIf Addodcc1.RRecoordsset.BOFF Thhen 若没没有找到到符合wwherre条件件的记录录 MsggBoxx 姓姓名错误误，重新新输入, vvbExxclaamattion

16、n, 警告 Texxt1.Texxt = Texxt1.SettFoccus teext11获得焦焦点Else If Adoodc11.Reecorrdseet.FFiellds(密码码) = TTextt2 TThenn yhjjm.SShoww Unlloadd Mee Elsse MMsgBBox 密码码错误，重重新输入入, vbEExcllamaatioon, 警告告 TTextt2.TTextt = TTextt2.SSetFFocuus Endd IffEnd IIfmicouunt = mmicoountt + 1If miicouunt = 33 Thhen Unlloadd

17、MeeEnd SSubPrivaate Subb cmmdcaanceel_cclicck() Unnloaad MMeEnd SSubPrivaate Subb Coommaand22_Cllickk()Statiic mmicoountt Ass Inntegger 用于于记录输输入密码码次数Dim ssqlsstr As Strringgsqlsttr = sseleect * ffromm 管理理员信息息表 wwherre 管管理员姓姓名= & Teext11 & Adodcc2.RRecoordSSourrce = ssqlsstrAdodcc2.RRefrreshhIf Addod

18、cc2.RRecoordsset.BOFF Thhen 若没没有找到到符合wwherre条件件的记录录 MsggBoxx 用用户名错错误，重重新输入入, vbEExcllamaatioon, 警告告 Texxt1.Texxt = Texxt1.SettFoccus teext11获得焦焦点Else If Adoodc22.Reecorrdseet.FFiellds(密码码) = TTextt2 TThenn glyyjm.Shoow Unlloadd Mee Elsse MMsgBBox 密码码错误，重重新输入入, vbEExcllamaatioon, 警告告 TTextt2.TTextt =

19、 TTextt2.SSetFFocuus Endd IffEnd IIfmicouunt = mmicoountt + 1If miicouunt = 33 Thhen Unlloadd MeeEnd SSubPrivaate Subb Coommaand33_Cllickk() zcxyyh.SShowwEnd SSubPrivaate Subb Coommaand44_Cllickk() Dim x AAs IInteegerrx = MMsgBBox(确认认退出？, vbOOKCaanceel, 提示示)If x = vvbOKK Thhen Unlooad Me MDIFFormm1.

20、SShowwElseIIf xx = vbCCanccel Theendljm.ShoowEnd IIfEnd SSub4.3.新新用户注注册界面面Privaate Subb Coommaand11_Cllickk()Dim ssqlsstr As StrringgIf Teext11 = Thhen MsggBoxx 请请输入用用户名！, vbEExcllamaatioon, 确认认密码 Texxt1.SettFoccus Exiit SSubElse sqllstrr = seelecct * frrom 用户信信息表 wheere 用户名名= & Texxt1 & Adoodc11.Re

21、ecorrdSoourcce = sqqlsttr Adoodc11.Reefreesh 判断断用户名名是否已已存在 If Adoodc11.Reecorrdseet.EEOF = FFalsse TThenn MsggBoxx 用用户已存存在，请请重新输输入, vbbExcclammatiion, 检检验用户户名 Texxt1 = Texxt1.SettFoccus Exiit SSubEnd IIfEnd IIf判断两次次密码是是否一致致If Teext22 Teext33 ThhenMsgBoox 两次输输入密码码不一致致，请重重新输入入, vbEExcllamaatioon, 检验验密

22、码 Texxt2 = : Texxt3 = Texxt2.SettFoccus Exiit SSubElseIIf TTextt2 = Thhen MsggBoxx 密密码不能能为空, vvbExxclaamattionn, 检验密密码 Texxt2.SettFoccusElse Adoodc11.Reecorrdseet.AAddNNew Adoodc11.Reecorrdseet.FFiellds(用户户名) = Triim(TTextt1) Adoodc11.Reecorrdseet.FFiellds(密码码) = TTrimm(Teext22) Adoodc11.Reecorrdsee

23、t.UUpdaate Me.Hidde MsggBoxx 注注册已成成功，请请尽快完完善个人人信息 tswwsyhhxx.Shoow Endd IffEnd SSubPrivaate Subb Coommaand22_Cllickk()zcxyhh.Hiidedljm.ShoowEnd SSub4.4.提提示完善善个人信信息界面面Privaate Subb Coommaand11_Cllickk()wsyhxxx.SShowwUnloaad MMeEnd SSubPrivaate Subb Coommaand22_Cllickk() Dim x AAs IInteegerrx = MMsgBB

24、ox(确认认退出？, vbOOKCaanceel, 提示示)If x = vvbOKK Thhen Unlooad Me dljmm.ShhowElseIIf xx = vbCCanccel TheenUnloaad MMetswsyyhxxx.ShhowEnd IIfEnd SSub4.5.用用户完善善个人信信息界面面Privaate Subb Coommaand11_Cllickk()Dim sstr As Strringgstr = SSeleect 订单信信息表.* FFromm 订单单信息表表str = sttr & wheere 订单信信息表.ID = & Teext55 & x

25、= MMsgBBox(确定定要修改改当前记记录吗？, vbYYesNNo + vbbQueestiion, 确确定)If x = vvbYees TThennwsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(性别) = Teext11wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(年龄) = Teext22wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(工作) = Teext33wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(联系电电话) = Texxt4wsyhxxx.AAd

26、oddc1.Reccorddsett.Fiieldds(密码) = Teext55wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(用户名名) = TTextt7wsyhxxx.AAdoddc1.Reccorddsett.Uppdattewsyhxxx.AAdoddc1.ReffresshEnd IIfMsgBoox 修改成成功End SSubPrivaate Subb Coommaand22_Cllickk()x = MMsgBBox(未完完善信息息，现在在退出？, vbOOKCaanceel + vbbDeffaulltBuuttoon2, 提提示)If x =

27、 vvbOKK Thhen Unlloadd wssyhxxxElseIIf xx = Canncell Thhenwsyhxxx.SShowwEnd IIfExit SubbEnd SSubPrivaate Subb Coommaand33_Cllickk()Dim sstr As Strringgstr = sseleect 用户信信息表.* FFromm 用户户信息表表str = sttr & wheere 用户信信息表.用户名名 = & TTextt6 & Adodcc1.RRecoordSSourrce = sstrAdodcc1.RRefrreshhEnd SSub4.6.用用户登

28、录录界面Privaate Subb Coommaand11_Cllickk()Adodcc2.RRecoordsset.AdddNewwAdodcc2.RRecoordsset.Fieeldss(用用户名) = Teext111.TTexttAdodcc2.RRecoordsset.Fieeldss(商商品号) = Teext11.TeextAdodcc2.RRecoordsset.Fieeldss(数数量) = Texxt2.TexxtAdodcc2.RRecoordsset.Fieeldss(价价格) = Texxt3.TexxtAdodcc2.RRecoordsset.Fieeldss(

29、IID) = Texxt100.TeextAdodcc2.RRecoordsset.Fieeldss(订订单号) = Teext112.TTexttAdodcc2.RRecoordsset.Fieeldss(联联系电话话) = TTextt4.TTexttAdodcc2.RRefrreshhMsgBoox (订单单已经成成功添加加)End SSubPrivaate Subb Coommaand22_Cllickk()Dim sstr As Strringgstr = sseleect 订单信信息表.* FFromm 订单单信息表表str = sttr & wheere 订单信信息表.ID =

30、& Teext99 & Adodcc2.RRecoordSSourrce = sstrAdodcc2.RRefrreshhEnd SSubPrivaate Subb Coommaand33_Cllickk()Text111.TTextt = Text11.Teext = Text22.Teext = Text33.Teext = Text110.TTextt = Text112.TTextt = Text44.Teext = End SSubPrivaate Subb Coommaand44_Cllickk()If Addodcc2.RRecoordsset.EOFF = Truue OOr

31、AAdoddc2.Reccorddsett.BOOF = Trrue Theen MsggBoxx 请请选择要要修改的的行 Exiit SSubEnd IIfDim sstr As Strringgstr = SSeleect 订单信信息表.* FFromm 订单单信息表表str = sttr & wheere 订单信信息表.ID = & Teext99 & x = MMsgBBox(确定定要修改改当前记记录吗？, vbYYesNNo + vbbQueestiion, 确确定)If x = vvbYees TThenn yhjmm.Addodcc2.RRecoordsset.Fieeldss(

32、用用户名) = Teext111.TTextt yhjmm.Addodcc2.RRecoordsset.Fieeldss(商商品号) = Teext11.Teext yhjmm.Addodcc2.RRecoordsset.Fieeldss(数数量) = Texxt2.Texxt yhjmm.Addodcc2.RRecoordsset.Fieeldss(价价格) = Texxt3.Texxt yhjmm.Addodcc2.RRecoordsset.Fieeldss(IID) = Texxt100.Teext yhjmm.Addodcc2.RRecoordsset.Fieeldss(订订单号) =

33、 Teext112.TTextt yhjmm.Addodcc2.RRecoordsset.Fieeldss(联联系电话话) = TTextt4.TTextt yhjmm.Addodcc2.RRecoordsset.Upddatee yhjmm.Addodcc2.RRefrreshh MsgBBox 成功功修改数数据!End IIfEnd SSubPrivaate Subb Coommaand55_Cllickk()Dim sstr As Strringgstr = SSeleect 订单信信息表.* FFromm 订单单信息表表str = sttr & wheere 订单信信息表.ID = &

34、 Teext99 & x = MMsgBBox(确实实要删除除当前记记录吗？, vbYYesNNo + vbbQueestiion, 确确定)If x = vvbYees TThenn Adoddc2.Reccorddsett.Deelette Adoddc2.Reccorddsett.MooveNNexttElseIIf AAdoddc2.Reccorddsett.EOOF TThenn Adoddc2.Reccorddsett.MooveLLasttElse Adoddc2.ReffresshMsgBoox (订单单已经成成功删除除)End IIfEnd SSubPrivaate Subb

35、 Coommaand66_Cllickk() cxyhhxx.ShoowEnd SSubPrivaate Subb Coommaand77_Cllickk() Dimm x As Inttegeerx = MMsgBBox(确认认退出？, vbOOKCaanceel, 提示示)If x = vvbOKK Thhen dljmm.ShhowUnloaad yyhjmmElseIIf xx = vbCCanccel Theenyhjm.ShoowEnd IIfEnd SSub4.7.用用户查看看个人信信息界面面Privaate Subb Coommaand11_Cllickk()Dim sstr

36、As Strringgstr = SSeleect 用户信信息表.* FFromm 用户户信息表表str = sttr & wheere 用户信信息表.用户名名 = & TTextt1 & Adodcc1.RRecoordSSourrce = sstrAdodcc1.RRefrreshhEnd SSubPrivaate Subb Coommaand22_Cllickk() Dim x AAs IInteegerrx = MMsgBBox(确认认退出？, vbOOKCaanceel, 提示示)If x = vvbOKK Thhen yhjjm.SShoww Unlloadd MeeElseIIf

37、 xx = vbCCanccel Theencxyhxxx.SShowwEnd IIfEnd SSubPrivaate Subb Coommaand33_Cllickk()xgyhxxx.SShowwEnd SSub4.8.用用户完善善个人信信息界面面Privaate Subb Coommaand11_Cllickk()Dim sstr As Strringgstr = SSeleect 订单信信息表.* FFromm 订单单信息表表str = sttr & wheere 订单信信息表.ID = & Teext55 & x = MMsgBBox(确定定要修改改当前记记录吗？, vbYYesNN

38、o + vbbQueestiion, 确确定)If x = vvbYees TThennwsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(性别) = Teext11wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(年龄) = Teext22wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(工作) = Teext33wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(联系电电话) = Texxt4wsyhxxx.AAdoddc1.Reccorddsett.Fiieldds(密码) = Teext55wsyhxxx.AAdoddc1.Reccorddsett.Uppdattewsyhxxx.AAdoddc1.ReffresshEnd IIfMsgBoox 修改成成功End SSubPrivaate Subb Coommaand22_Cllickk()x = MMsgBBox(