酒店管理系统猛(DOC毕设论文).doc

毕业设计(论文)说明书学院(系)： 信息工程学院 专 业： 计算机应用技术 题 目： 酒店客房管理系统 主 题： 酒店客房的管理 目录目录2摘 要3第一章 设计目的与要求511设计目的512设计环境513设计内容及要求52 要求5第二章 设计内容621数据库设计6211需求分析622数据流程图723数据字典924数据结构定义11241概念设计112.5数据库的设计13第三章 主要功能14第四章：主要模块介绍154.1管理员登陆154.2登录后的界面图17第五章 系统的详细设计175.1系统的管理175.2住宿登记185.3住宿查询245.4操作员的管理265.5退房295.6系统的维护及备份36第六章 系统测试396.1 背景396.2目的396.3测试计划396.3.1测试内容396.3.2测试准备396.4测试内容说明396.5测试进度406.6分析摘要40第七章 总结41第八章 参考文献41摘 要本文主要介绍了酒店客房管理信息系统的开发过程。论文详尽地论述了从需求分析,系统分析,概要设计,详细设计,到测试与调试的整个开发过程，总结了开发过程中的经验及本系统今后的改进方向。酒店客房管理系统研究的内容涉及系统登陆、客房管理、房客管理、消费管理、报表管理、系统管理、系统信息。建立酒店客房管理信息系统，采用计算机对客房信息进行管理，可以进一步提高酒店的经济效益和现代化水平，帮助酒店工作人员提高工作效率，实现客房信息管理工作流程的系统化、规范化和自动化。本文将探讨怎样利用计算机实现对仓库的高效管理，利用Visual C+作为软件平台，通过用VC+的各种功能，了解各种功能在不同应用中的优缺点。利用Visual C+的界面设计功能，进行仓库管理的人性化界面的设计，把实际问题和计算机应用合理的结合起来。关键字：酒店客房管理信息系统; 功能; Visual Basic 6.0AbstractThis text mainly introduced the development process of the cabaret guest roommanagement information system. The thesis discussed in details analytical from the need, system analytical, essentials design, detailed design, arrive test and the whole development process that adjust to try, tallied up to develop the improvement direction of the experience and this system within process after time. The cabaret guest room manages the contents of the system research to involve the system debarkation, guest room management, tenant management, consume the management, statement management, system management, system information.Build up the cabaret guest room management information system, adopt the calculator to carry on the management to the guest room information, can further raise the economic performance and the modernization levels of the cabaret, help the cabaret staff member exaltation work efficiency, carry out the guest room information management workflow to systematize, the norm turns and automates. This text will inquiry into how the exploitation calculator realization manages to the warehouse efficiently, making use of the Visual C+ be the software terrace, pass to use the VC+ of various function, understand various function in dissimilarity apply of merit and shortcoming. Make use of the Visual C+ of the interface design function, carry on the design of the humanized interface of the warehouse management, the knot that apply the actual problem and calculator reasonable put together.Key words: The cabaret guest room management information system; Function; Visual Basic 6.0第一章 设计目的与要求11设计目的本实践课的主要目的是：（1）掌握运用管理系统及数据库原理知识进行系统分析和设计的方法；（2）掌握关系数据库的设计方法；（3）掌握Visual Basic和ACCESS技术应用；（4）掌握简单的数据库应用程序编写方法；12设计环境 硬件平台：CPU：P41.8GHz。内存：256MB以上。软件平台：操作系统：Windows XP/ Windows 2000。数据库：SQL 2000。浏览器： IE6.0分辨率：最佳效果1024768像素。本系统主要的开发工具是 Visual Basic 后台数据采用ACCESS进行连接13设计内容及要求1内容 1.要求根据管理信息系统及数据库设计原理，按照数据库系统设计的步骤和规范，完成各阶段的设计内容。2.需求分析具体实际，数据流图、数据字典、关系模型要正确规范3.对应用程序进行概要设计。4.用VB实现简单的应用程序编写。2 要求设计过程中，要严格遵守课程设计的时间安排，听从指导教师的指导，根据社会的需要。正确地完成上述内容，规范完整地撰写出论文设计第二章 设计内容21数据库设计数据库设计是利用现有的数据库管理系统为具体的应用对象构造适合的数据库模式，建立数据库及其应用系统，使之能有效地收集、存储、操作、和管理数据，满足各类用户的应用需求211需求分析1 功能需求(1) 基本功能需求系统能正确的对用户身份进行辨识，从数据库中提取登录密码并验证身份真实性。系统能准确的显示数据库中记录的各类数据。系统应能将用户在系统中录入的各类信息传送到数据库中并储存。系统应具备错误处理功能，出现错误的时候能够清楚地返回相应错误提示。系统数据库之间能有效地相互关联。(2) 用户界面需求用户界面应简洁明快，各功能按钮明显，位置摆放合理。字体大小适中，风格统一规范，界面美观。(3) 性能需求系统灵活性：管理员编写人员、商品等信息都将在系统中进行编号处理，保障了每一条信息的单一性，同时也对数据的读取提供了方便。服务员所生成的订单有着单一的帐单号并准确无误存储在数据库中。系统应能准确地将管理员提交和修改的信息写入数据库，而且能够及时地更新。数据库中的各项表之间有着很好的相互关联，并能及时显示。系统灵活性：管理员编写人员、商品等信息都将在系统中进行编号处理，保障了每一条信息的单一性，同时也对数据的读取提供了方便。服务员所生成的订单有着单一的帐单号并准确无误存储在数据库中。系统应能准确地将管理员提交和修改的信息写入数据库，而且能够及时地更新。数据库中的各项表之间有着很好的相互关联，并能及时显示。(4) 系统易用性：系统界面简明，明细清楚，实用简单。 酒店在正常的运营中需要对客房资源、顾客信息、结算信息进行管理，利用宾馆管理信息系统及时了解各个环节中信息的变更，有利于提高管理效率。开放性的、应用系统可灵活伸缩的、面向最终用户的现代TIMS（旅游信息管理系统）的服务性系统，不断满足酒店业务需求、市场环境的拓展和管理模式的变化应用酒店管理系统通过节省大量的人力物力，增加酒店的服务项目，提高酒店的服务档次，减少管理上的漏洞，从整体上提高酒店的经济效益。如完善的预订功能可防止有房不能租或满房重订的情况出现，可随时提供准确的房间使用和预订情况，从而提高客房出租率。正确控制房价，可以给予客人最优惠的房价，从而减少管理漏洞，提高客房收入。22数据流程图 任何一个数据库系统的开发都是针对确定的业务流程的。酒店客房管理系统的业务流程图如下：图2.1酒店入住管理系统的业务流程图根据基本的业务分析结果，可进一步画出数据流程图，从而更至关的反映出各类信息的传递过程，酒店入住管理系统的数据流程图具体实现目标如下图：S1.4S1.1S1.3S1.5S1.6S1.7S1.4S1.8S1.4S1.9.S1.10S1.11S1.14S1.13S1.12S1.2顾客D1登录信息D2权限信息D3客房信息P1.1 登陆P1.4 预定信息P1.8 操作员管理P1.2 判定权限P1.3客房信息登陆D9客户消费信息P1.6 账单管理D10操作员信息D11工作记录 D4房间信息P1.7 结账处理P1.6 入住信息P1.5 查房信息D7备份信息D6退宿信息D5入住登记D8账单信息管理员员图2.2酒店入住管理系统的数据流程图23数据字典数据字典是各类数据描述的集合，它是进行详细的数据收集和数据分析后所获得的主要成果。(1) 数据项。数据项是不可再分的数据单位。(2) 数据结构。数据结构反映了数据之间的组合关系。一个数据结构可以由若干个数据项组成，也可以由若干个数据结构组成，或由若干数据项和数据结构混合组成。(3) 数据流。数据流是数据结构在系统内传输的路径。(4) 数据存储。数据存储是数据及其结构停留或保存的地方，也是数据流的来源和去向之一。24外贸进出口进出货管理系统业务流程分析本系统的设计的数据项和数据结构如下：用户登录信息：包括的数据项有用户名、登录密码，用户类型；客房基本信息：包括的数据项有客房编号、客房类别、单价、备注、住客姓名、入住时间、退房时间；房间预订基本信息：包括的数据项有客户姓名、性别、证件类型、证件编号、联系电话、备注；房间入住基本信息：包括的数据项有空房编号、空房类型、单价、客户姓名、性别、证件类型、证件编号、联系电话、备注；数据项名称数据项含义说明主键数据类型长度取值范围账单编号入住时的编号是int4a000-x999客房编号房间位置无int4a000-x999消费内容其他无nvarchar50中、外文消费金额客户消费无float8a000-x999消费时间客户消费时间无datetime8a000-x999预订单号客户订单编号是int4a000-x999客房类型无无nvarchar50中、外文入住时间客户入住时间无datetime8a000-x999客房价格无无float8a000-x999单据状态无无nvarchar20中、外文预收金额无无money8a000-x999应收金额无无money8a000-x999退宿时间无无smalldatetin4a000-x999日期提醒提醒到期时间无smalldatetin4a000-x999备注其他信息无nvarchar200中、外文24数据结构定义(1) 数据结构名称：房间预定 含义说明：数据库中用来存储客户预定的信息数据结构组成：预定单号+客房类型+入住时间客房编号+预定人+联系电话(2) 数据结构名称：结账退缩数据结构名称：结账退宿数据结构组成：账单编号+客户编号+消费内容+消费金额+消费时间+备注 (3) 数据流：数据流名称：预定登记简要说明：客户预先登记入住单数据流来源：房间信息管理模块数据流去向：P1.4数据结构：预订单号+客户类型+入住时间+离店时间+客房编号+客房价格(4) 数据流名称：结账登记简要说明：客户退宿结账记录数据流来源：入住登记管理模块数据流去向：P1.7数据结构：账单编号+客房编号+消费内容+消费金额+消费时间+备注241概念设计概念结构设计师E-R方法分析与设计，概念结构设计是整个数据库设计的关键。将使用实体-联系E-R模型来描述系统的概念结构，以及它们之间对的关系，为后面的逻辑结构设计打下基础。实体包含各种具体实际信息，通过相互间的作用形成数据的流动。部分实体属性如图所示：账单包括账单编号，客房编号，消费内容，消费金额，消费时间，备注，如图2.3所示：账单消费时间消费金额备注账单编号客房编号消费内容图2.3账单ER图预订单包括客房编号、客房类型、预订单号、预定人、入住时间、备注、单据状态、客房价格等。如图2.4所示：预订单单据状态客房价格房间类型预定单号备注预定人入住时间客房编号图2.4预定信息 ER图总体E-R图如下所示： 111111nnnnnn管理员入住单入住单历预订单顾客管理管理管理客房信息管理账单服务管理图2.5酒店入住信息 ER图2.5数据库的设计Access作为微软OFFICE以其简单易用而受到许多用户的欢迎，综合考虑，为了节约系统开发时间等因素，本系统数据库采用ACCESS。管理员表如下图：图2.6管理系统的密码及账号客房信息表：图2.7客房信息表住宿登记表：图2.8住宿登记表第三章 主要功能酒店客房管理系统”主要由修改密码、公告管理、最新资讯、客户管理、客房资料、房间管理，包括如下模块：修改密码：只有超级管理员具有这个权限，修改、删除、添加管理员名密码。公告管理：发布酒店的公告，只有超级管理员具有这个权限。最新资讯：发布酒店的最新活动，只有超级管理员具有这个权限。客户管理：根据客户提供的订单号，查询客户的住房信息，并可以退房，为了防止客户忘记订单号，用户只要提供身份证号就可以查询。客房资料：系统的核心部分，可以看到房间分类、创建房间分类、修改房间分类，查看某一类房间详情、创建此类房间号，为了方便客户开房，把功能放在详情里。房间管理：根据输入的房间号查询此房间的情况。第四章：主要模块介绍4.1管理员登陆管理员登录界面，需要输入正确的管理员名、密码、验证码，可以根据管理员名判断管理员的权限。登录界面如下图：图4.1权限代码：If Adodc1.Recordset.RecordCount = 0 Then MsgBox 请先设置操作员密码和权限！, , 系统提示 Load Main Main.Show Unload Me Else Text1.SetFocus End If密码输入信息及提示：Static itimes As Integer Main.StatusBar1.Panels(4).text = Text1.text 赋值给main.StatusBar1.Panels(4).Text 验证操作员及密码 Adodc1.RecordSource = select * from tb_user where 操作员= + Text1.text + Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then 如果记录数大于零 验证密码 If Text2.text = Adodc1.Recordset.Fields(密码) Then Load Main Main.Show Unload Me Else If Text2.text Adodc1.Recordset.Fields(密码) Then MsgBox 密码错误,请重新输入！, vbCritical, 系统提示 itimes = itimes + 1 Text2.text = Text2.SetFocus End If End If Else MsgBox 操作员不存在,请重新输入！, vbCritical, 系统提示 itimes = itimes + 1 Text1.text = Text2.text = Text1.SetFocus End If If itimes = 3 Then 错误3次，退出系统 MyMsg = MsgBox(输入错误,请向系统管理员查询！, vbCritical, 系统提示) If MyMsg = vbOK Then EndEnd If4.2登录后的界面图输入密码后进入如下图的登录界面：图4.2第五章 系统的详细设计5.1系统的管理系统的管理分为：(1) 住宿管理：住宿登记、追加押金、调房登记、退宿结账。(2) 客房管理：客房设置、客房查询、房态查看。(3) 挂账管理：挂账查询、挂账结款。(4) 查询统计：住宿统计、退宿统计、宿费提醒。(5) 日结： 登记预收报表、客房销售报表、客房销售统计。(6) 服务： 洗衣服务、取衣服务。(7) 系统设置：操作员设置、密码设置、重新登录、设置主窗口图像、初始化、权限设置。(8) 系统维护：系统备份、数据恢复。5.2住宿登记住宿登记如下图：图4.3命令菜单登记代码如下： 查询空闲房间信息 Adodc1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False Adodc1.RecordSource = select * from tb_kf where 房态=空房 查询客房数据表 Adodc1.Refresh Adodc2.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False Adodc2.RecordSource = select * from tb_djb order by 凭证号码 按凭证号码排序数据 Adodc2.Refresh If Not Adodc2.Recordset.EOF Then Adodc2.Recordset.MoveLast 移动记录集到最后一条记录 If lsph.text = Then bh.text = Fdate & d & Format(1, #000) 当lsph值为空为凭证号码文本框赋值 If lsph.text Then 当lsph值不空时 y1.text = Month(Fdate) 把当前月份赋给y1 y2.text = Month(Left(lsph.text, 10) 把lsph中的月份赋给y2 If y1.text = y2.text Then 如果y1文本框中内容与y2相同 bh.text = Fdate & d & Format(Val(Right(lsph.text, 3) + 1, #000) 为凭证号码文本框赋值 Text1.text = Val(Right(lsph.text, 3) + 1 text1中存储lsph文本框中后三位数 End If If y1.text y2.text Then 如果y1文本框中内容与y2不同 bh.text = Fdate & d & Format(1, #000) 为凭证号码文本框赋值 End If End If 清空数据 For i = 0 To 6 ZSDJ(i).text = ZSDJ(i).Enabled = True Next i ZSDJ(8).text = : ZSDJ(10).text = : ZSDJ(11).text = : Combo3.text = 设置控件有效或无效 Comok.Enabled = True: Comdj.Enabled = False: Comprint.Enabled = False: ZSDJ(8).Enabled = True ZSDJ(10).Enabled = True: ZSDJ(11).Enabled = True: Combo3.Enabled = True: Combo1.Enabled = True Combo2.Enabled = True: ZSDJ(0).SetFocus ZSDJ(0)获得焦点 Adodc3.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False Adodc3.RecordSource = select * from tb_kf where 房态 = 空房 Adodc3.Refresh Combo3.Clear If Adodc3.Recordset.RecordCount 0 Then For i = 1 To Adodc3.Recordset.RecordCount Combo3.AddItem Adodc3.Recordset.Fields(房间号).Value Adodc3.Recordset.MoveNext Next i确定按钮代码：If ZSDJ(0) = Or Combo3 = Then MsgBox 请输入完整信息, , 系统提示 Else 查寻登记表中信息 Adodc2.RecordSource = select * from tb_djb where 房间号 = & Combo3.text & and 标志 like 1 Adodc2.Refresh If Adodc2.Recordset.RecordCount = 0 Then Adodc2.Recordset.AddNew 将记录保存在tb_djb中 If bh.text Then Adodc2.Recordset.Fields(凭证号码) = bh.text If ZSDJ(0).text Then Adodc2.Recordset.Fields(姓名) = ZSDJ(0).text If Combo1.text Then Adodc2.Recordset.Fields(证件名称) = Combo1.text If ZSDJ(1).text Then Adodc2.Recordset.Fields(证件号码) = ZSDJ(1).text If ZSDJ(2).text Then Adodc2.Recordset.Fields(详细地址) = ZSDJ(2).text If ZSDJ(3).text Then Adodc2.Recordset.Fields(住宿事由) = ZSDJ(3).text If Combo3.text Then Adodc2.Recordset.Fields(房间号) = Val(Combo3.text) If ZSDJ(4).text Then Adodc2.Recordset.Fields(客房类型) = ZSDJ(4).text If DTP1.Value Then Adodc2.Recordset.Fields(住宿日期) = DTP1.Value If tim1.Value Then Adodc2.Recordset.Fields(住宿时间) = tim1.Value If ZSDJ(5).text Then Adodc2.Recordset.Fields(客房价格) = Val(ZSDJ(5).text) If ZSDJ(6).text Then Adodc2.Recordset.Fields(住宿天数) = ZSDJ(6).text If ZSDJ(8).text Then Adodc2.Recordset.Fields(折扣) = ZSDJ(8).text If ZSDJ(7).text Then Adodc2.Recordset.Fields(宿费) = ZSDJ(7).text If Combo2.text Then Adodc2.Recordset.Fields(结款方式) = Combo2.text If ZSDJ(9).text Then Adodc2.Recordset.Fields(应收宿费) = ZSDJ(9).text If ZSDJ(10).text Then Adodc2.Recordset.Fields(预收金额) = Val(ZSDJ(10).text) If DTP2.Value Then Adodc2.Recordset.Fields(提醒日期) = DTP2.Value If TIM2.Value Then Adodc2.Recordset.Fields(提醒时间) = TIM2.Value If DTP3.Value Then Adodc2.Recordset.Fields(退宿日期) = DTP3.Value If tim3.Value Then Adodc2.Recordset.Fields(退宿时间) = tim3.Value If ZSDJ(11).text Then Adodc2.Recordset.Fields(备注) = ZSDJ(11).text Adodc2.Recordset.Fields(日期) = Fdate “日期”保存为当前系统日期 Adodc2.Recordset.Fields(时间) = Ftime “时间”保存为当前系统时间 Adodc2.Recordset.Fields(BZ) = Left(Fdate, 4) & Right(Left(Fdate, 7), 2) & Right(Fdate, 2) & Left(Ftime, 2) & Left(Right(Ftime, 5), 2) 计算“BZ”的值 Adodc2.Recordset.Fields(标志) = 1 “标志”设置为“1” 更新记录 Adodc2.Recordset.Update Adodc2.Refresh 添加住宿预收信息 adocon.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False adoRs.Open select * from tb_djys, adocon, adOpenKeyset, adLockOptimistic 打开tb_djys表 adoRs.AddNew If bh.text Then adoRs.Fields(凭证号码) = bh.text If ZSDJ(0).text Then adoRs.Fields(姓名) = ZSDJ(0).text If Combo1.text Then adoRs.Fields(证件名称) = Combo1.text If ZSDJ(1).text Then adoRs.Fields(证件号码) = ZSDJ(1).text If ZSDJ(2).text Then adoRs.Fields(详细地址) = ZSDJ(2).text If ZSDJ(3).text Then adoRs.Fields(住宿事由) = ZSDJ(3).text If ZSDJ(4).text Then adoRs.Fields(客房类型) = ZSDJ(4).text If Combo3.text Then adoRs.Fields(房间号) = Val(Combo3.text) If ZSDJ(5).text Then adoRs.Fields(客房价格) = Val(ZSDJ(5).text) If DTP1.Value Then adoRs.Fields(住宿日期) = DTP1.Value If tim1.Value Then adoRs.Fields(住宿时间) = tim1.Value If ZSDJ(6).text Then adoRs.Fields(住宿天数) = ZSDJ(6).text If Combo2.text Then adoRs.Fields(结款方式) = Combo2.text If ZSDJ(8).text Then adoRs.Fields(折扣) = ZSDJ(8).text If ZSDJ(7).text Then adoRs.Fields(宿费) = ZSDJ(7).text If ZSDJ(9).text Then adoRs.Fields(应收宿费) = ZSDJ(9).text If ZSDJ(10).text Then adoRs.Fields(预收金额) = Val(ZSDJ(10).text) If DTP2.Value Then adoRs.Fields(提醒日期) = DTP2.Value If TIM2.Value Then adoRs.Fields(提醒时间) = TIM2.Value If DTP3.Value Then adoRs.Fields(退宿日期) = DTP3.Value If tim3.Value Then adoRs.Fields(退宿时间) = tim3.Value If ZSDJ(11).text Then adoRs.Fields(备注) = ZSDJ(11).text adoRs.Fields(日期) = Fdate adoRs.Fields(时间) = Ftime adoRs.Fields(BZ) = Left(Fdate, 4) & Right(Left(Fdate, 7), 2) & Right(Fdate, 2) & Left(Ftime, 2) & Left(Right(Ftime, 5), 2) adoRs.Fields(标志) = 1 更新记录 adoRs.Update 更新房间状态 adocon.Close Adodc1.RecordSource = select * from tb_kf where 房间号 like + Combo3.text + If Combo3.text Then Adodc1.Recordset.Fields(房态) = 入住 Adodc1.Recordset.Update 设置控件有效或无效 For i = 0 To 6 ZSDJ(i).Enabled = False Next i ZSDJ(8).Enabled = False: ZSDJ(10).Enabled = False: ZSDJ(11).Enabled = False Combo3.Enabled = False: Combo1.Enabled = False End If Comok.Enabled = False: Comprint.Enabled = True: Comdj.Enabled = True Comprint.SetFocus5.3住宿查询住宿查询运行后的界面如下：图5.4退出命令菜单的代码如下：Private Sub Command1_Click() Unload Me Main.Enabled = TrueEnd Sub挂账查询的界面：图5.5代码如下：Private Sub Form_Load() 自动识别数据库路径 Adodc1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False Adodc1.RecordSource = select * from tb_gzmx Adodc1.Refresh Set DataGrid1.DataSource = Adodc1 Adodc2.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & DB_KFGL.mdb;Persist Security Info=False Adodc2.RecordSource = select distinct 挂账单位 from tb_gzmx Adodc2.Refresh If Adodc2.Recordset.RecordCount 0 Then For i = 1 To Adodc2.Recordset.RecordCount Combo1.AddItem Adodc2.Recordset.Fields(挂账单位).Value Adodc2.Recordset.MoveNext Next i End IfEnd Sub5.4操作员的管理(1) 输入操作员的代号和密码：如下图图5.6命令“确定”代码如下：Private Sub Command1_Click() 修改操作员密码Adodc1.RecordSource = select * from tb_qxsz where 操作员= + Text1.text + Adodc1.Refresh If Adodc1.Recordset.RecordCount 0 Then ma.text = Adodc1.Recordset.Fields(密码) Else