数据库课程设计-酒店管理信息系统gese.docx

《数据库课程设计-酒店管理信息系统gese.docx》由会员分享，可在线阅读，更多相关《数据库课程设计-酒店管理信息系统gese.docx（23页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、数据库库课程程设计课题 酒酒店管理理系统班级 009044 学号 09442000145581334 姓名 罗 浩 成绩 20100年 110 月月30 日酒店管理理信息系系统编写目目的酒店在正正常的运运营中需需要对客客房资源源、顾客客信息、结结算信息息进行管管理，利利用宾馆馆管理信信息系统统及时了了解各个个环节中中信息的的变更，有有利于提提高管理理效率。系统功功能分析析 系统开开发的总总体任务务是实现现宾馆各各种信息息的系统统化、规规范化和和自动化化。主要完成成功能： 有关关客房标标准的制制定、标标准信息息的输入入，包括括标准编编号、标标准名称称、房间间面积、床床位数量量、住房房单价、是是否

2、有空空调、电电视机、电电话以及及单独卫卫生间等等。 客房房标准信信息的修修改、查查询等。 客房房基本信信息的输输入，包包括客房房编号、客客房类型型、客房房位置、客客房单价价、备注注等。 客房房基本信信息的查查询、修修改，包包括客房房编号、客客房类型型、客房房位置、客客房单价价、备注注等。 剩余余客房信信息的查查询等。 订房房信息的的输入，包包括客房房编号、客客房种类类、客房房位置、客客房单价价、顾客客姓名、顾顾客身份份证号码码、入住住日期、折折扣、备备注信息息等。 订房房信息的的修改和和查询，包包括客房房编号、客客房种类类、客房房位置、客客房单价价、顾客客姓名、顾顾客身份份证号码码、入住住日期

3、、折折扣、备备注信息息等。 结算算信息的的输入，包包括客房房编号、客客房种类类、位置置、客房房单价、顾顾客姓名名、顾客客身份证证号码、入入住日期期、折扣扣、结算算日期、备备注信息息等。 结算算信息的的修改和和查询，包包括客房房编号、客客房种类类、客房房位置、客客房单价价、顾客客姓名、顾顾客身份份证号码码、入住住日期、折折扣、结结日期、备备注信息息等。系统功功能模块块设计按结构化化程序设设计思想想，分析析得出如如下系统统功能模模块图宾馆管理信息系统结算信息管理订房信息管理客房信息管理系统管理结算信息查询结算信息修改结算信息添加订房信息查询订房信息修改订房信息添加剩余客房信息查询设置客房信息设置客

4、房标准密码管理用户管理客房信息查询客房信息修改客房信息添加客房标准修改客房标准添加 图系统功功能模块块图数据库库设计数据库设设计步骤骤： 数据库需需求分析析 数据库概概念结构构设计 数据库逻逻辑结构构设计数据库库需求分分析分析调查查有关宾宾馆管理理信息需需求的基基础上得得本系统统所处理理的数据据流程客房标准设置基本信息输入客房登记基本信息录入客房信息管理顾客登记订房信息管理订房信息管理结算信息输入结算信息管理客房信息返回图 宾宾馆管理理信息系系统数据据流程图图 针对对一般宾宾馆管理理信息系系统的需需求，通通过对宾宾馆管理理过程的的内容和和流程分分析，设设计如下下面所示示的数据据项和数数据结构构

5、： 客房标准准信息，包包括的数数据项有有：标准准编号、标标准名称称、房间间面积、床床位数量量、住房房单价、是是否有空空调、电电视、电电话、单单独卫生生间等。 客房信息息，包括括的数据据项有：客房编编号、客客房种类类、客房房位置、客客房单价价、备注注等。 订房信息息，包括括的数据据项有：订房编编号、客客房编号号、客房房种类、客客房位置置、客房房备注信信息、顾顾客姓名名、顾客客身份证证号码、入入住时间间、折扣扣、备注注等。 结算信息息，包括括的数据据项有：订房编编号、客客房编号号、客房房种类、客客房位置置、客房房备注信信息、顾顾客姓名名、顾客客身份证证号码、入入住时间间、折扣扣、结算算时间、备备注

6、等。数据库库概念结结构设计计 本系统统根据以以上的设设计规划划出的实实体有：客房标标准信息息实体、客客房信息息实体、订订房信息息实体、结结算信息息实体。各各个实体体具体的的描述-图图如下：客房标准信息实体标准编号标准名称床位数量客房单价客房标准准信息实实体-图客房信息实体客房标准客房编号客房位置客房单价客房信息息实体-图图订房信息实体客房信息顾客信息折 扣入住时间订房信息息实体-图图结算信息实体客房信息顾客信息结算时间结算金额结算信息息实体-图图客房标准信息客房登记客房信息管理订 房订房信息管理结算信息管理客房结算实体之间间关系-图图数据库库逻辑结结构设计计 首先先将宾馆馆管理信信息系统统的数

7、据据库概念念结构转转化为SSQL 20000数据据库系统统所支持持的实际际数据模模型，即即：数据据库的逻逻辑结构构。其各各个表格格的设计计结果如如下列名数据类型型可否为空空说明TypeeidVarccharrNOT NULLL标准编号号TypeenammeVarccharrNOT NULLL标准名称称AreaaNumeericcNULLL房间面积积BednnumNumeericcNULLL床位数量量HairrconndittionnVarccharrNULLL是否有空空调HtellephhoneeVarccharrNULLL是否有电电话HtelleviisioonVarccharrNULLL是

8、否有电电视HtoiilettVarccharrNULLL是否有单单独卫生生间PricceNumeericcNULLL单价Roommtyppe 客客房标准准信息表表列名数据类型型可否为空空说明roommNOVarccharrNOT NULLL客房编号号RoommtyppeVarccharrNOT NULLL客房种类类RoommpossitiionVarccharrNULLL客房位置置RoommpriiceNumeericcNULLL单价PutuupVarccharrNOT NULLL是否被预预定RoommmemmoTexttNULLL备注Roomms 客客房信息息表列名数据类型型可否为空空说明B

9、ookkno VarccharrNOT NULLL订房编号号CusttomnnameeVarccharrNOT NULLL 顾客姓名名CusttomIIDVarccharrNOT NULLL身份证号号码RoommnoVarccharrNOT NULLL客房编号号IndaateDateetimmeNULLL入住日期期DisccounntNumeericcNULLL折扣InmeenoTexttNULLL备注ChecckdaateDateetimmeNULLL结算日期期AmouuntNumeericcNULLL金额Bookkin 订房信信息表数据库库结构的的实现利用SQQL 220000数据库库系统

10、中中的查询询分析实实现数据据库的逻逻辑结构构，其表表格如下下：创建系统统用户表表格 uuserr_Innfo CREEATEE TAABLEE ddbo.uuserr_Innfo11( useer_IIDchaar(10) COOLLAATE Chiinesse_PPRC_CI_AS NOTT NUULL, useer_PPWD ccharr (10) COOLLAATE Chiinesse_PPRC_CI_AS NULLL, useer_DDes ccharr(110) COLLLATTE CChinnesee_PRRC_CCI_AAS NNULLL ) ONN PPRIMMARYY 创建客

11、客房标准准信息表表格rroommtyppe CRREATTE TTABLLE dboo.rooomtyype( tyypeiidchaar(10) COOLLAATE Chiinesse_PPRC_CI_AS NOTT NUULL, tyypennameeccharr(110) COLLLATTE CChinnesee_PRRC_CCI_AAS NNOT NULLL, arreanuumerric(5,0) NULLL, beednuumnummeriic(2,00) NNULLL, haairccondditiionchhar(2) COOLLAATE Chiinesse_PPRC_CI_A

12、S NULLL, htteleephoonechhar(2) COOLLAATE Chiinesse_PPRC_CI_AS NULLL, htteleevissionnccharr(22) CCOLLLATEE Chhineese_PRCC_CII_ASS NUULL, httoilletchhar(2) COOLLAATE Chiinesse_PPRC_CI_AS NULLL, prriceennumeericc(110,22)NUULL ) ONN PPRIMMARYY创建客房房信息表表格rroommsCREAATE TABBLE dbbo.rooomss( rooomNOOccharr(

13、110) COLLLATTE CChinnesee_PRRC_CCI_AAS NNOT NULLL, rooomtyypechhar(100) CCOLLLATEE Chhineese_PRCC_CII_ASS NOOT NNULLL, rooompoosittionnccharr(220) COLLLATTE CChinnesee_PRRC_CCI_AAS NNULLL, rooomprriceennumeericc(110,22) NNULLL, puttupchhar(2) COOLLAATE Chiinesse_PPRC_CI_AS NOTT NUULL, rooommeemoteex

14、t COOLLAATE Chiinesse_PPRC_CI_AS NULLL ) OON PRIIMARRY TEXXTIMMAGEE_ONN PPRIMMARYY创建订房房信息表表boookinnCREAATE TABBLE dbbo.boookiin( boooknooccharr(114) COLLLATTE CChinnesee_PRRC_CCI_AAS NNOT NULLL, cusstommnammechaar(10) COOLLAATE Chiinesse_PPRC_CI_AS NOTT NUULL, cusstommIDchhar(188) CCOLLLATEE Chhinee

15、se_PRCC_CII_ASS NOOT NNULLL, rooomnooccharr(110) COLLLATTE CChinnesee_PRRC_CCI_AAS NNOT NULLL, inddateeddateetimme NULLL, disscouuntnuumerric(2,0) NULLL, inmmemoottextt CCOLLLATEE Chhineese_PRCC_CII_ASS NUULL, cheeckddateeddateetimme NULLL, ammmounntnummeriic(10,2) NULLL) ONN PPRIMMARYY TTEXTTIMAAGE

16、_ON PRRIMAARY宾馆管管理信息息系统具具体程序序实现客房信息息管理模模块的创创建 客房房信息管管理模块块主要实实现如下下功能：添加客客房信息息修改客客房信息息删除客客房信息息查询客客房信息息 具体体实现代代码如下下：Privvatee Suub FFromm_Looad()载入窗窗体时，自自动添加加客房信信息种类类 Diim ssSqll Ass Sttrinng Diim iintCCounnt AAs IInteegerr Diim MMsgTTextt Ass Sttrinng Diim mmrccc Ass ADDODBB.Reecorrdseet Iff giintRRmo

17、dde=11 Thhen 判断是是否处于于添加状状态 Mee.Caaptiion=me.Capptioon&“添加” txxtSQQL=”sellectt DIISTIINCTT tyypennamee frrom rooomtyype” Seet mmrc=ExeecutteSQQL(ttxtSSQL,MsggTexxt) Iff Noot mmrc.EOFF Thhen Do Whiile Nott mrrc.EEOF cbooIteem(00).AAddIItemm Trrim(mrcc.Fiieldds(00) mrcc.MooveNNexttLoopp cbooIteem(00).L

18、ListtInddex=0显示记记录内容容 Ellse MsggBoxx “请先进进行客房房标准设设置!”,vbbOKOOnlyy+vbbExcclammatiion,“警告” cmddSavve.EEnabbledd=Faalsee Exiit SSub Ennd IIf mrrc.CClosse EllseIIf gginttRmoode=2 TThenn 判断是是否处于于修改状状态 Sett mrrcc=ExeecutteSQQL(ttxtSSQL,MsggTexxt)设置SSQL语语句显示示当前选选择记录录 If mrccc.EEOF=Fallse Theen Witth mmrccc

19、 ttxtIItemm(0)=.FFiellds(0) Forr inntCoountt=1 To 2 Iff Noot IIsNuull(.Fiieldds(iintCCounnt+11)TThenn判断内内容是否否为空 txxtIttem(inttCouunt)=.FFiellds(inttCouunt+1) Ennd IIf Nexxt iintCCounnt txttIteem(33)=.Fieeldss(5) txttSQLL=”sellectt DIISTIINCTT tyypennamee frrom rooomtyype” Sett mrrc=EExeccuteeSQLL(tx

20、xtSQQL,MMsgTTextt) If Nott mrrc.EEOF Theen Do Whiile Nott mrrc.EEOF cbooIteem(00).AAddIItemm Trrim(mrcc.Fiieldds(00) mrcc.MooveNNexttLoopp cbooIteem(00).LListtInddex=0 Elsse MsggBoxx“请先进进行客房房标准设设置!”,vbbOKOOnlyy+vbbExcclammatiion,“警告” cmddSavve.EEnabbledd=Faalsee Exiit SSub Endd Iff mrcc.Cllosee Ennd

21、 WWithh Ennd IIf mrrcc.Cloose Mee.Caaptiion=Me.Capptioon&“修改” Endd Iff mbllChaangee=FaalseeEnd SubbPrivvatee Suub ccmdSSavee_Cllickk()单击保保存按钮钮触发事事件 Dimm inntCoountt Ass Inntegger Dimm sMMeg As Strringg Dimm mrrcc As ADOODB.Reccorddsett Dimm Mssgteext As Strringg Forr inntCoountt=0 To 3 If Triim(TTxt

22、IItemm(inntCoountt)&”)=” TThenn Sellectt Caase inttCouunt Caase 0 sMeeg=“客房编编号” Caase 1 sMeeg=“客房位位置” Ennd SSeleect sMMeg=sMeeg&“不能为为空！” MssgBoox ssMegg,vbbOKOOnlyy+vbbExcclammatiion,“警告” txxtIttem(inttCouunt).SeetFoocuss Exxit Subb Ennd IIf Neext inttCouunt Iff giintRRmodde=11 Thhen判断是是否有重重复记录录 txx

23、tSQQL=”sellectt * froom rroomms wwherre rroommNO=”&TTrimm(txxtIttem(0)&” Seet mmrc=ExeecutteSQQL(ttxtSSQL,msggTexxt) Iff mrrc.EEOF=Fallse Theen MssgBoox “已经存存在此客客房编号号的记录录！”,vbbOKOOnlyy+vbbExcclammatiion,“警告” txxtIttem(0).SettFoccus Exxit Subb Ennd IIf mrrc.CClosse Ennd IIf Iff giintRRmodde=22 Thhen

24、判断是是否处于于修改状状态 txxtSQQL=”delletee frrom roooms wheere rooomNOO=”&TTrimm(txxtIttem(0)&” Seet mmrc=ExeecutteSQQL(ttxtSSQL,MsggTexxt) Ennd IIf txxtSQQL=”sellectt*frrom roooms”再加入入新记录录 Seet mmrc=ExeecutteSQQL(ttxtSSQL,MsggTexxt) mrrc.AAddNNew为数据据库对象象添加记记录 mrrc.FFiellds(0)=Triim(ttxtIItemm(0) mrrc.FFielld

25、s(1)=Triim(ttxtIItemm(0) Foor iintCCounnt=11 Too 2 Iff Trrim(txttIteem(iintCCounnt)&”)=” TThenn mrcc.Fiieldds(iintCCounnt+11)=NNulll Ellse mrcc.Fiieldds(iintCCounnt+11)=TTrimm(txxtIttem(inttCouunt) Ennd IIf Neext inttCouunt mrrc.FFiellds(4)=” mrrc.FFiellds(5)=Triim(ttxtIItemm(3) mrrc.UUpdaate mrrc.C

26、Closse Iff giintRRmodde=11 Thhen Foor iintCCounnt=00 Too 3 txxtIttem(inttCouunt)=” Neext inttCouunt mbblChhangge=FFalsse Iff fllagRRediit TThenn UUnlooad frmmRooom ffrmRRoomm.txxtSQQL=”sellectt*frrom roooms”重新显显示数据据 ffrmRRoomm.Shhow EEnd If ElsseIff giintRRmodde=22 Thhen UUnlooad Me IIf fflaggReddit

27、 Theen UUnlooad frmmRooom EEnd If ffrmRRoomm.txxtSQQL=”sellectt*frrom roooms” ffrmRRoomm.Shhow Endd Iff End Subb修改客客房信息息Privvatee Suub mmenuuModdifyyrooom_CClicck()选择修修改房间间信息，触触mennuMoodiffyrooom的的Cliick事事件,程程序判断断为修改改状态后后，首先先删除原原有记录录，然后后把新内内容加入入到数据据库中 DDim inttCouunt As Inttegeer IIf fflaggReddit Th

28、een 判断记记录窗体体是否打打开 IIf ffrmRRoomm.mssgLiist.Rowws11 Thhen判断客客房信息息列表内内容是否否为空 gginttRmoode=2设置为为修改状状态 inntCoountt=frrmRooom.msggLisst.RRow纪录当当前记录录位置frmRRoomm1.ttxtSSQL=”sellectt*frrom roooms wheere rooomNOO=”&TTrimm(frrmRooom.msggLisst.TTexttMattrixx(inntCoountt,1)&”frmRRoomm1.SShoww EElsee CCalll meen

29、uAAddrroomm_Cllickk添加记记录EEnd If Elsee frrmRooom.txttSQLL=”sellectt*frrom roooms” frrmRooom.ShoowEnd IfEnd Subb 删除客客房信息息Privvatee Suub mmenuuDelleteerooom_CClicck() DDim txttSQLL Ass Sttrinng DDim inttCouunt As Inttegeer DDim mrcc Ass ADDODBB.Reecorrdseet DDim MsggTexxt AAs SStriing IIf fflaggTeddit

30、Theen IIf ffrmRRoomm.mssgLiist.Rowws11 Thhen判断客客房信息息列表内内容是否否为空 IIf MMsgBBox(“真的要要删除这这条文件件记录么么？”,vbbOKCCanccel+vbEExcllamaatioon,“警告”)=vvbOKK Thhen iintCCounnt=ffrmRRoomm.mssgLiist.Roww记载当当前记录录位置 ttxtSSQL=”delletee frrom roooms wheere rooomNOO=”&TTrimm(frrmRooom.msggLisst.TTexttMattrixx(inntCoountt,1

31、)&” Sett mrrc=EExeccuteeSQLL(txxtSQQL,MMsgTTextt)执行删删除操作作Unnloaad ffrmRRoomm frmmRooom.ttxtSSQL=”sellectt*frrom roooms” frmmRooom.SShoww Endd Iff EEnd If Ennd IIf End Subb查询客客房信息息Privvatee Suub FFromm_Looad()载入窗窗体时，将将自动加加入所有有记录的的入库时时间 DDim i AAs IInteegerr DDim j AAs IInteegerr DDim sSqql AAs SStrii

32、ng DDim txttSQLL Ass Sttrinng DDim MsggTexxt AAs SStriing DDim mrcc Ass ADDODBB.Reecorrdseet ttxtSSQL=”sellectt DIISTIINCTT tyypennamee frrom rooomtyype”初始化化客房种种类 SSet mrcc=ExxecuuteSSQL(txttSQLL,MssgTeext) IIf NNot mrcc.EOOF TThenn DDo WWhille NNot mrcc.EOOF CCombbo1.AdddIteem TTrimm(mrrc.FFiellds(

33、0) MMrc.MovveNeextLoopp CCombbo1.LisstInndexx=0 EElsee MMsgBBox “请先进进行客房房标准设设置!”,vbbOKOOnlyy+vbbExcclammatiion,”警告” EExitt Suub EEnd If mmrc.ClooseEnd SubbPrivvatee Suub ccmdOOK_CClicck()设置完完查询内内容和方方式后，单单击cmmdOkk按钮查查询 DDim sQSSql As Strringg IIf cchkIItemm(0).Vaaluee=vbbCheeckeed TThenn ssQSqql=”roo

34、omNOO=”&TTrimm(txxtIttem(0)&”)&” EEnd If IIf cchkIItemm(1).Vaaluee=vbbCheeckeed TThenn IIf TTrimm(sQQSqll&”)=” TThenn ssQSqql=”rooomtyype=”&TTrimm(Coomboo1&”)&” EElsee EEnd If EEnd If IIf TTrimm(sQQSqll)=” TThenn MMsgBBox “请设置置查询条条件！”,vbbOKOOnlyy+vbbExcclammatiion,“警告” EExitt Suub EElsee IIf fflaggReddit Theen UUnlooad frmmRooom EEnd If ffrmRRoomm.txxtSQQL=”sellectt*frrom roooms wheere”&sQQSqll ffrmRRoomm.Shhow EEnd If MMe.HHideeEnd Subb7小结结对于本次次课程设设计主要要从三方方面，即即知识、技技能和态态度，学学生采用用自我评评估方式式来检查查自己，这这样可以以产生这这种日常常性的，内内省方式式的自我我评估，以以检查自自己的学学习进度度和成绩绩，改进进学习方方法和增增强学习习自信心心。