洗衣店管理系统数据库设计

1、课程设计报告课程：数据库系统原理学号:姓名：班级：教师:华东交通大学目录干洗店管理系统设汁与实现。错误!未定义书签。一、绪论。错误!未定义书签。二、需求分析错误!未定义书签。2. 1信息要求错误!未定义书签。2 .2处理要求。错误!未定义书签。2 .3安全性和完整性要求。错误!未定义书签。三、系统分析错误!未定义书签。四、系统设计错误!未定义书签。4. 1功能模块设计错误!未定义书签。4. 2数据库设讣错误!未定义书签。五、系统实现错误!未定义书签。5. 1创建数据库及创建表错误!未定义书签。5. 2创建应用止及应用对象错误!未定义书签。5. 3菜单设讣错误!未定义书签。5.4创建数据窗口错误

2、!未定义书签。五、总结。错误!未定义书签。干洗店管理系统设计与实现一、绪论本系统是针对小型干洗店的基本管理而设计的。随着计算机技术的迅速发 展,各种软件的不断推陈出新，作为一种用计算机作为工具来进行各种工作的工 作形式，不论是对我们传统的工作、生活，还是对我们情感的表达都带来了极其 深远的意义和影响。随着人们生活水平与消费档次的提高,我们生活当中出现了形形色色的衣 服来装扮我们，为了对那些高档次的衣物的清洗以及那些因学习繁忙而没有时间 进行衣物清洗的同学提供方便的清洗条件，个个髙校都有很多小型的个人经营的 干洗丿占，每个小型干洗店都有很多的衣物及财务的数据需要管理，手工管理这些 纷繁复杂数据的

3、方式已经不适应时代的潮流，实现数据规范化的电脑管理，是一 个管理规范、运作高效的个人单位的必然要求。所以我们设计了校园干洗店管理 系统,来基本解决各个干洗丿占的要求。如果用传统的方法进行管理，既容易出错, 透明度也不高，容易使消费者心理产生阴影，造成不良的影响。本系统是针对一 般小型干洗店出现的问题进行设计的,解决了干洗店日常的衣物与财务的管理。U前洗衣业管理状况要满足快速增长的洗衣量，是远远不够的，因为当前干 洗店采用手工或半手工处理洗衣丿占业务流程，多用人工方式在前台接送衣物，洗 衣管理，员工管理，营业额统讣等，另外除了接送货物外，还有不少业务面上用户, 客户查看衣物状况等，以上这些干洗丿

4、占内部业务如果用计算机来进行管理，能大 大节约大型干洗店工作人员和管理人的时间，提高工作效率。二、需求分析进行数据库设计首先必须准确了解与分析用户需求（包括数据与处理），需求 分析是整个设计过程的基础。2.1信息要求随着人门生活水平与消费档次的提高，我门生活当中出现了形形色色的衣服 来装扮，为了对那些非常高档次的衣物的和那些工作繁忙没有时间做家务人们的 衣物能够方便的清洗，个个街道都有很多小型的个人经营的干洗丿占，每个小型干 洗店都有很多的衣物及财务的数据需要管理,所以我们设计了干洗店数据库管理 系统，来基本解决各个干洗店的要求。2. 2处理要求能够进行数据库的数据定义、数据操纵、数据控制等处

5、理功能，进行联机处理的相应时间要短。2 .3安全性和完整性要求对于干洗店来说，数据的安全性最为重要。要保护数据库以防止不合法的使 用所造成的数据泄漏、更改和破坏，同时要保证数据的正确性和相容性，防止不 合语义的数据进入数据库。三、系统分析干洗店信息管理工作是干洗店管理工作的重要组成部分，现在相当一部分干洗店信息管 理工作仍沿用手工方式。随着社会发展、在干洗店洗衣服的人数增加，效率低下、容易出错 的手工方式越来越不适应实际管理工作的需要，按照软件工程原理和数据库技术开发于洗店 信息管理系统已成为干洗店的迫切需要。干洗店信息管理系统主要包括以下功能：1. 完成数据的录入和修改，并提交数摇库保存。英

6、中的数据包括:客户信息、衣物信息、 洗衣时间信息以及操作员信息等：2实现信息查询。主要包括：客户信息.衣物信息查询和洗衣査询等：3具备一左的安全性管理功能包括操作员的权限设置、密码设置和修改密码等功能。四、系统设计4-1功能模块设计本系统采用C/S体系结构，客户端负责提供表达逻辑、显示用户界而信息、访问数据库服务 器，采用VB作为开发工具：服务器端则用于提供数据服务，采用SQL Se rver2 0 00作为 数据库管理系统。本系统按照功能划分为以下四个模块:客户管理（包括客户信息录入和客户信息査询）.衣物管 理（包括衣物信息添加和衣物信息査询）、洗衣管理（包括洗衣信息录入和洗衣信息査询）和系

7、统管理 （包括密码修改和退出系统等）。系统的功能模块图如图1所示：T洗店管理系统图1系统的功能模块图4-2数据库设计42 1数据库槪念结构设计本系统主要有客户和洗衣两个实体集，一个客户包含若干信息,，两个实体集之间是多对 多联系，联系上有收取费用。为保证系统的安全性，设置了操作员这一实体集,用来存放合法 用户的编号、姓名.密码和权限。本系统的E-R图如图2所示：衣物顾客。图2系统的ER图4. 2 . 2数据库逻借结构设计 逻辑结构是独立于任何- 结构设计阶段设计好的基 符合的逻幔辿信息结构。逻辑结构的任务是把概念 LPBMS所支持的数据模型相操作员密码关系转化权限操作员编号对其进彳操作员姓名为

8、关余F畐性设计干洗店数据库，包括顾客、衣物、员工四个关系，其关系模式中对每个 实体定义的属性如下：顾客(customer):顾客编号、姓名、性别、身份证号.联系电话、联系地 址衣物(clothes):衣物编号、衣物名称、衣物颜色、衣物品牌、衣物单价洗衣(washing):顾客编号、衣物编号、衣物名称、衣物品牌、送衣时 间、取衣时间、收取费用操作员(操作员编号，操作员姓务密码权限)1、顾客表（customer）字段名字段类型字段长度字段限制注释cunov a rcha r20Pr i m a r y k e y顾客编号cun amevarchar10No t n u 11姓劣c u sexcha

9、r4Not null性別idvarchar20Xot null身份证号t elvar char20No t null联系电话add ressv a r char1 00No t nu 1 1联系地址2、衣物表(clo t h es)字段名字段类型字段长度字段限制注释c 1 n ov archar40P r i mar y key衣物编号c 1 nameva r char4 0衣物名称brandv a rchar40衣物品牌colorvarc h a r20Not null衣物颜色pr i c emoneyNot n ull衣物单价3、洗衣表（washing）字段名字段类型字段长度字段限制注释c

10、unovarchar20Prim ary key顾客编号c 1 n ovarch a r10P r i m ar y key衣物编号sendt i medate t imeN o t nu 1 1送衣时间t aketim edatetimeNot null取衣时间p r i cemo n e yNot null收取费用4 操作员(operator)字段名字段类型字段长度子段限制注释o p e a rto r nov a rcha r20Prim ary key操作员编号o p e rat o rnamevarchar1 ；iNot null操作员姓名pa s s wordvar c ha r6

11、Not null密码p e rmis s i onvar c ha rNot nul 1权限五、系统实现结合Po we r B ui 1 d比进行数据库应用开发的特点，设计过程可按如下步骤进行: 创建数据库及创建表； 创建应用库及应用对象； 创建菜单； 创建数据窗口； 创建窗口并在窗口中放置所需控件。5.1创建数据库及创建表在SQL 200 0査询分析器中创建数据库XYD_DB,在数据库中创建顾客表(C u S t o m e r),衣物表(clothes),洗衣表(wash i ng),操作员(o p e r a tor)。对应代码入下：1、创建数据库zqy：Crea t e d ataba

12、se zq y2、创建数据表顾客基本情况数据表cust o mer (cuno, cuname, c u sex, id, tel, ad d r e s s)的仓ij建语句：ere a te tabl e c ustom e r (ocuno varch a r (20 :d ocuname v a r char (40 'C u s e X c har (4) oid var C har (20)ot e 1 va r Char (20)o address varc h a r (100)衣物基本情况数据表c 1 othes (clno, cln a m e , b rcreate

13、 ta b le clothes (pr i ma r y key,n ot null,not n u Inot null uniq U e fn o t null,nOt nulli n d, c o 1 o r, pr i c e )的创建语句:oclno va r char (40 1 p r ima r y key ( C lno) , o o cl name varchar(4 0),o b rand v a rchar (40 ',b ©color varchar ' 20)not n ull,©price mon e y o ono t n u

14、 11,)洗衣基本情况数据表washing(cuno, c 1 n o , se n dtime, taketime, p ric e )的仓ij建语句:create table w a shing(o ©cuno varchar ' 20) » oo ocln O v arc h ar 40；,S end tim e dat e I i meno t null,t a ke I ime d at e t i menot nul 1 ,pri C e moneyno I n ul I ,p r imary key(cuno, C 1 n 0 ' »

15、f or e ign key ' c u no ' ref eren c e S cu S t 0 mer cuno), for e lg n k e y ( c lno) r e f e renc e s cloth e s (cln O )操作员数据表operato r (opeartorno, opea tor nam e, pas swor d )的创建语句： create table opera t oro ope r a tor n o va r char (20) oprima r y key,nOt null,not Dull,o ooperat 0 rnam

16、e var C h ar (4 0 ) o p a S swo r d va r char ( 6) o5.2创建应用库及应用对象在V B中新建工程，命名为干洗店管理系统，对数据库的操作设计一个可被各模块调用的 函数放入公共模块。在工程中添加公共模块，在工程引用中添加【Micro sof i t ActiveX D a ta Ob j ects 2 8 Library 公共模块代码如下：Pu bli c Fu net i on Exec u t e SQ L(B y V a 1SQL As St r ing, Ms g s tring As S t ring) As ADO D B R e c

17、 o r d s e tDim c n As ADODB Co n nectio nD i m r s As ADODB.Record s etDim s trConnectio n As Strin gD im s t r A r ray() As St r ingSet c n = New ADO DB.Con n ec t i onSe t r s = New A DODB. Rec ordsetOn E rror G oTo Er r H a nd ler：s t rC o nnection = " P rovid e r=SQLOLEDB 1 ;Integ r ated S

18、 e curity= S S P I;Pers i s t Secur i t y In fo=Fa 1 s e ; 1 nitial C a t a 1 o g =pos;Dat a S our c e = 127.0. 0. 1 HstrArra y = S p 1 it(sq 1 )c n.Open strCo n n e c t ion1 f St r Com p (UC a seS(strA r r a y (0),H s e 1 ecf vbTex tC o m p are) = 0 T he nrs. O pe n T r im$(s q 1), cn, adOpcnK e ys

19、et, adLoc k O p timi SticSet E xe S Q L = rsElsecn.E x e cu t e sqlEnd I fExeSQL_Exit:Set r s = N o t h i n gSet c n = NothingEx i t Fu n ctionErr Handl e r:显示错误信息M s gBox ”错误号：”& Er r .Numbe r & N 错误信息："& Err. Desc r ipt ion, vbExclamationRe s ume Ex e SQLExitEnd FunctionPublic Su

20、b c h angefo r mX YD_I) B(f r m a in A s MDIForm, f r m A s Fo r m)D im To p A s Intege rTop =(frmMain.Scale H ei g h t - frm.Heig h t) / 2 - 600I f Top>0 Thenfrm. Top = TopEls efrm.Top = 0End I ffrm. Le f t = (f r mMa i n.Sc a 1 e Wid t h - f rm.Wj d th) /2E nd SubSub M a i n ()frmLogin. ShowEnd

21、 Su b5.3菜单设计i.在工程中添加【添加mdi窗口】2.打开此窗口属性设巻3 在菜单编辑器中添加菜单，设置菜单层次菜单如图：至佔® 淞苜建衣饬售連图3系统菜单窗口5-4创建数据窗口1 在工程中添加登录窗口添加各控件并设宜各控件属性。如图图4登陆窗口确泄键命令代码：P r ivate Sub cmdOk_C lick ()D i m sql A s St r in gDim rs A s A D ODB.R e cord s etDim Us e rName A s StringDim Use r Key As I n t egerOn E r ror Go T o Err 11

22、 and 1 er:If Tr i m ( U s erName. T e xt = ,H,) T h enMsg B o x "请输入用户名称!"，vbE x clam a tionUserN a me.SetF o cu sElsesql = Hsel e c t * f r om o p era t o r w h er e opnam e =& U serName. T e xt & M ,MS e t r s = ExeSQL(s q I)I f r s.EO F = True ThenMsgBox ”没有此用户.请重新输入用户名广，v bE x

23、cl a mation UserNam e .Se t Fo c usEls eIf T r im (rs! Pa s sw o rd) = T r im(UserKe y .Te x t) The n Intopn o = rs! opnors. C los eMe. HidefrmMain.ShowUni o ad MeElseMsg Box "密码不正确,请重新输入密码!"，vbExclam a t ion U serK e y . S e tFoc u sUserKey. Text=八End IfEnd IfEnd IfExit SubE r rHandler:Ms

24、gBo x "错误号:"& Err.Number & ”错误描述："& Err.Des c r i p t io n End Sub衣物信息添加窗口图5衣物信息添加窗口保存键代码：Private S ub C o mmand 1_Cl i ck()Dim i As I n t e g e rD im s q 1 As Stri n gDim mon P rice A s C u rre n cyI f Tr i m(c 1 no ( i )=八 ThenMs g Box M 此项不允许为空! *' , vb E xcl a mati

25、 o nt xt P roduc t In f o( i ). SetFocusEx i t SubEnd IfNext iIf I sNume r ic (txtPro d uctl n f o (O).Text )= False T h enMsgBo x ”编号应为数字量！ "，vbExclama t io nt x tPro d uctln f o( 0 )SetFocusExit Su bEnd I fIf I s Num e ri c ( t xtP r o d u c t Info( 2 ). T ext) = F alse ThenMsgBox ”应为数字量!vb E

26、 x cl a matio nt x tProduc t In f o ( 2 ). S e t F o c usExit Su bElseni o n P rice = t xtPr o d uct I n f o (2).Te x tEnd IfEnd Ifsq 1= ,fin s e r t P ro d uct s(Pro d uct I D .P r o d u ct N a meUnitPri c e.Unit , R e mark) ” & _” v alucs C & txtProduct I nfo( 0 ). Text & H M &txtP

27、roduc t Info (1). Text &"& mon Price &sq 1 = s q 1 & cbo Unit. Tex t & f M & txtProduc tin f o( 4 ). T ext &ExeSQL (s q 1)sql = u in s ert Pr o d u c tin va 1 ues(H & tx t P r o du c t I n f o ( 0) . Text & &_txtPr o duct Info (3).Text & ： M & dtpInDat e . V alu e & “)”Exe S QL (sql)MsgBox 11 数据添加成功!,: vbEx c lamati o nIn i tContro 1End Sub2 用客户信息查询窗口如图图6客戸信息査询窗口査找客戸信息窗口查找键代码：Private Sub C omma n dl_Cli c k()D im st r Query As String