酒店客房管理信息系统设计-VB毕业设计

1、1 酒店客房管理信息系统酒店客房管理信息系统 摘摘 要要 本文主要介绍了 酒店客房管理信息系统的 开发过程.论文详尽的 论述了 从需求分析,系统分析,概要设计,详 细设计,以及测试与调试的 整个开发过程.总结了 开发过程中的 经验及本系统今后的 改进方向. 关关 键键 字字: :酒店客房管理信息系统; 功能; VisualBasic 6.0 ABSTRACT This thesis introduced the develop 米 ent process of the guest roo 米 米 anage 米 ent infor 米 ation syste 米. The thesis dis

2、cussed in details analytical fro 米 the need , syste 米 analysis, essentials design, detailed design , and test and the whole develop 米 ent process that adjust to try , tallied up to develop the i 米 prove 米 ent direction process afterti 米 e. KEY WORDS:The guest roo 米 米 anage 米 ent infor 米 ation; funct

3、ion; visualBasic 6.0 2 目目 录录 摘摘 要要 1 ABSTRACT1 目目 录录 2 一、引言一、引言 3 (一) 项目开发背景3 (二) 项目开发目标3 (三) 项目开发的 意义3 (四) 项目开发方法概述3 二、系统分析二、系统分析 3 (一) 可行性分析3 1. 管理上的 可行性3 2. 技术上的 可行性3 3经济上的 可行性3 (二) 组织结构分析4 (三) 功能需求分析4 (四) 业务流程分析5 (五) 数据流程分析6 (一) 系统模块设计7 (二) 系统流程设计7 (三) 数据库设计8 1数据库需求分析8 2数据库结构设计8 (四) 运行环境选择10 1软件

4、支撑环境10 2硬件支撑环境10 四、系统实施四、系统实施 10 (一) 创建工程10 (二) 添加模块10 (三) 系统模块的 设计10 五、系统运行五、系统运行 12 (一) 系统登录12 (二) 房客管理13 (三) 客房管理18 (四) 消费管理19 (五) 报表管理20 (六) 系统管理21 (七) 系统信息22 六、结束语六、结束语 23 参考文献参考文献 24 3 一、引言 (一) 项目开发背景 经济的 快速发展,人们的 生活水平和消费意识的 提高,促进了 旅游业的 发展.酒店行业将面临 着机遇和挑战.面对快速发展的 信息产业带来的 影响.将电脑技术和电脑服务引入酒店管理成为一种

5、 趋势.众多酒店企业中,中小 型酒店企业由于他们的 先天条件,使他们不能投入大量的 资金进行这项 必须的 改革.因此开发一套简单,实用的 中小 型酒店客房管理信息系统是十分有必要的 . (二) 项目开发目标 建立酒店客房管理信息系统,采用计算机对客房信息进行管理,进一步提高酒店的 经济效益和现代 化水平.帮助酒店工作人员提高工作效率,实现客房信息管理工作流程的 系统化,规范化和自动化. (三) 项目开发的 意义 现在我国的 中小 型酒店客房管理水平普遍不高,有的 还停留在纸介质的 基础上,这种管理手段 已不能适应时代的 发展,因此它浪费了 许多人力和物力.在当今信息时代这种传统的 管理方法必然

6、被 计算机为基础的 信息管理系统所代替.如果本系统能被中小 型酒店企业采用,将会改变以前靠手工管 理客房信息的 状况,可以树立良好的 酒店形象,提高工作效率. (四) 项目开发方法概述 酒店客房管理信息系统采用的 是原型法的 开发方法.本着开发人员对用户需求的 的 理解,通过 简单的 系统分析,系统设计,快速实现一个原型系统,然后通过反复修改来实现管理信息系统. 二、系统分析 (一) 可行性分析 1. 管理上的 可行性 在传统的 酒店客房管理中,管理人员不得不花费大量的 时间来处理顾客投诉,例如错误查询、烦 琐的 登记和结帐手续、旅客费用计算错误、空余客房资料不能及时提供等,从而影响酒店的 经

7、济效益.因 此酒店的 管理人员迫切的 需要一套酒店客房管理信息系统对日常信息进行处理和维护. 历史经验的 积累使酒店行业现有的 管理制度和管理方法比较科学,规章制度比较齐全,原始数据比较 正确.这些为系统的 建设提供了 有效的 制度保障. 2. 技术上的 可行性 本管理信息系统将采用技术成熟的 VB6.0 做为前台开发工具.后台数据库采用微软公司的 Access 数据库,它的 灵活性,安全性,和易用性为数据库编程提供了 良好的 条件.因此,系统的 软件开发平台 已成熟可行.硬件方面,科技的 飞速发展使硬件的 更新速度越来越快,容量越来越大,可靠性越来越高, 价格越来越低,其硬件平台完全能满足此

8、系统的 需要. 3经济上的 可行性 本系统由作者自主开发,免费使用.操作人员只需简单培训即可上岗.管理和维护比较简单,除了 必 要的 设备投资外,后期只需少量资金就可确保运转.因此对于中小 型酒店在经济上完全可以接受. 本系统的 使用能大大提高员工工作效率,加速资金周转、降低各项成本及改善服务质量.能够取得良好 的 经济效益. 综上所述,本系统在管理上,在技术上和经济上是完全可行的 ,并且投入少,见效快.因此系统的 开发完 全可行的 . 4 (二) 组织结构分析 中小 型酒店企业的 组织结构如下图所示: (三) 功能需求分析 本系统主要有以下功能要求: 1用户登录模块,主要用于用户的 登录.用

9、户权限分为管理员和普通用户.当用户输入用户名和密 码后经过确认,才能进入酒店客房管理信息系统,并拥有相应的 权限.如果不是用户,拒绝进入. 2房客管理模块,该模块是本系统的 核心所在.主要用于用户对房客及其业务的 情况进行管理, 其中包括: 预定管理模块,主要包括预定信息的 登记,查看,删除等基本操作. 接待管理模块,主要用于客户入住信息的 登记,查看,修改,删除等基本操作. 结帐管理模块,主要用于用户退房操作. 换房管理模块,主要用于入住用户的 换房操作. 押金管理模块,主要用于对入住客户押金的 补交,查看等基本操作. 3客房管理模块,该模块主要用于对客房的 编辑操作和查看状态操作.客房的

10、编辑操作主要有客 房的 添加,修改,删除等基本操作. 4消费管理模块,该模块主要用于对客人在入住期间的 消费进行入帐操作,包括消费入帐,话费入 帐,餐费入帐等操作. 5审查管理模块,主要用于该酒店管理者对酒店的 基本数据信息进行查看,以便制定策略.包括客 房状态报表查看,客人入住信息报表查看,历史客人报表查看等等. 图 1 中小型酒店组织结构图 总 台 送餐服务部 食品采购部 洗衣房 礼宾部 房务中心 酒店总经理 前厅部客房部餐饮部 餐 厅 楼层服务 总机 财务部保安部 5 (四) 业务流程分析 酒店客房业务的 基本流程主要包括: 客房的 预定,客人通过电话或者其他途径向酒店进行客房预定,接待

11、人员查询客房状态表后确定有 空房则接受预定,预定成功后发给客人预定凭证,客房状态表作出相应的 变化. 客房的 登记,分为预定入住和散客登记 如果客人已经预定房间,则根据预定凭证进行预定入住操作,发给客人房卡,客房状态由“预定”变 为“入住”. 如果客人没有预定房间,接待人员查询客房状态表后,有空房则进行客房登记操作,发给客人房卡, 客房状态由“空房”变为“入住”. 客人换房,如果客人对入住的 客房条件不满意,则可进行客人换房操作.接待人员将客人的 房间进 行更换,并更换客人房卡,客房状态也进行相应的 调整. 客房消费,客人入住期间在酒店进行了 消费,如:购买商品,就餐,打电话.就要进行消费入帐

12、操作. 包括:消费入帐,餐费入帐,话费入帐. 补交押金,如果客人的 押金太少,则要补交押金.客人交纳押金,接待人员开具押金凭证. 夜审管理.酒店的 管理人员要对酒店的 基本信息进行了 解则可以进行夜审管理,包括:客房状态 报表的 查看,客人入住信息的 查看,历史客人报表查看. 客人退房,客人退房时,接待人员根据客人的 房卡,进行退房登记.计算客人入住期间的 房费,餐费,话 费,各种消费和押金总额.对客人收取费用或者退回押金.客人信息转存到历史客人表中.客房状态由 “入住”转为“空房”. 预订管理 餐费管理 话费管理 押金管理 客房查看 酒店客房管理系统 房客管理客房管理消费管理 消费管理 客房

13、编辑 接待管理 结帐管理 换房管理 审查管理 图 2 功能需求结构图 入住报表管理 客房状态报表 系统管理 历史客人报表 6 (五) 数据流程分析 本系统的 后台数据库将作为整个酒店的 数据流通中心,将各个部门的 数据信息连通起来,具体流程如 下图所示: 餐饮部 信息信息 客房状态信息 客人就餐消费 客人入住信息 前台接待 客房部 财务部 酒店客房 MIS 客人押金消费 汇总 图 4 数据流程图 房卡 客人入住报表 历史客人表 房卡 押金凭证 房费帐单,房卡 消费帐单,押金凭证 客人换房 客房消费 补交押金 客房预定 客人 预定凭证 总台接待 客房编辑 客房状态表 客人入住表 夜审管理 客房状

14、态报表 话费,餐费,其他消费帐单 客人退房 离店客人报表 图 3 业务流程图 7 三、系统设计 (一) 系统模块设计 根据上一章的 分析,可以设计出系统的 总体功能模块图,如图五所示. 可以看到,本系统划分为六个功能模块,房客管理模块用于对客人及其业务情况进行管理,客房管理 模块主要用于客房状态的 查看和客房的 编辑.消费管理模块主要用于对客人在店消费进行入帐管理. 报表管理模块提供给酒店管理者用来查看酒店的 基本信息,系统维护模块用来管理系统用户.系统信息 模块用来查看本系统的 版权等信息. (二) 系统流程设计 系统流程就是用户在使用系统时的 工作过程.本系统是多类型用户管理信息系统,每一

15、类用户的 工作权限有所区别.多用户系统的 工作流程都是从用户登录模块开始的 ,对用户的 身份进行认证.身 份认证可以分为以下两个过程: 确认用户是否是有效的 系统用户. 确定用户的 类型. 第一个过程决定用户能否进入系统.第二个过程根据用户的 类型决定用户的 操作权限. 酒店客房管理信息系统 房 客 管 理 客 房 管 理 消 费 管 理 报 表 管 理 系 统 维 护 系 统 信 息 在 房 客 人 表 补 交 押 金 预 定 入 住 预 定 房 间 客 人 换 房 退 房 登 记 钟 点 房 登 记 客 房 登 记 客 房 编 辑 客 房 状 态 消 费 入 帐 餐 费 入 帐 话 费 入

16、 帐 客 房 入 住 表 客 房 信 息 表 用 户 添 加 更 改 密 码 数 据 初 始 化 用 户 查 看 系 统 介 绍 版 权 信 息 图 5 酒店客房管理系统功能模块示意图 8 本系统的 流程分析如图六所示. (三) 数据库设计 现在我们已经对酒店客房管理信息系统的 功能,模块划分和系统流程有了 比较全面的 认识,本节 将介绍系统的 数据库设计 1数据库需求分析 针对酒店客房管理信息系统的 需求,通过对酒店客房管理工作过程的 内容和数据流程分析,设计 如下所示的 数据项和数据结构: 客房基本信息,包括的 数据项有:客房号码,客房标准,客房位置,客房状态,单价,容纳人数,等. 预定基

17、本信息,包括的 数据项有:客房房号,客人姓名,身份证号码,身份证地址,预定时间,操作 员等. 入住客户基本信息,包括客房房号,客人姓名,身份证号码,身份证地址,从何处来,到何处去,住宿 原因,入住时间,操作员等. 结算信息,包括的 数据项有:客房号码,客户姓名,身份证号码,客房单价,折扣,入住时间,结算时 间,备注等. 系统用户信息,包括的 数据项有 :用户名,用户密码,用户权限. 有了 上面的 数据结构,数据项和数据流程,我们就能进行下面的 数据库设计. 2数据库结构设计 数据库包含以下 5 张表:系统用户表,客房状态表,客房预定表,客人入住表,历史客人表. 表 1 系统用户表 编号字段名称

18、数据类型说明 1 用户名文本,长度为 50用户的 登录名, 必填字段 2 密码文本,长度 40密码, 必填字段 3 权限文本,长度 40用户的 权限, 必填字段 表 2 客房状态表 管理自己的用户信息 管理自己和普通用户的用户信息 房客管理 客房管理 消费管理 夜审管理 读取用户类型 是 退出系统 失败 3 次 否 开始 用户登录 失败 重试 成功 普通用户 管理员 图 6 系统流程设计图 9 编号字段名称数据类型说明 1 房号数字,整数客房的 房号 2 类别文本,长度为 50客房的 类别 3 楼层文本,长度 20客房所在的 楼层 4 状态文本,长度 50客房的 状态 5 单价数字,整数客房的

19、 单价 6 容纳人数数字,整数客房容纳的 人数 表 3 客房预定表 编号字段名称数据类型说明 1 房号数字,整数预定客房的 房号 2 姓名文本,长度 50预定客户的 姓名 3 类别文本,长度 50预定客房的 类别 4 标准价数字,整数预定客房的 标准价 5 证件号码文本,长度 50预定客户的 证件号码 6 押金数字,整数预定客户交纳的 押金 7 联系电话文本,长度 50预定客户的 联系电话 8 操作员文本,长度 20预定操作的 操作员 9 摘要文本,长度 100预定操作的 摘要 表 4 客人入住表 编号字段名称数据类型说明 1 房号数字,整数客人入住的 房号 2 客人姓名文本,长度 50入住客

20、人的 姓名 3 标准价数字,整数客人入住客房的 价格 4 押金数字,整数客人交纳的 押金 5 类别文本,长度 50客人入住客房的 类别 6 证件名称文本,长度 50客人的 证件名称 7 证件号码文本,长度 50客人的 证件号码 8 证件地址文本,长度 50客人的 证件地址 9 从何处来文本,长度 50客人的 来源 10 到何处去文本,长度 50客人将要去的 地方 11 住宿原因备注客人住宿的 原因 12 操作员文本,长度 50客房登记的 操作员 13 入住日期日期型客人入住的 日期 14 入住时间时间型客人入住的 时间 15 店内消费数字型,整数客人在店内消费的 金额 16 餐费数字型,整数客

21、人在店内的 餐费金额 17 话费数字型,整数客人在店内的 话费金额 表 5 历史客人表 编号字段名称数据类型说明 1 客人姓名文本,长度 50历史客人的 姓名 2 证件号码数字,整数历史客人的 证件号码 3 证件地址文本,长度 50历史客人的 证件地址 4 最后入住日期日期型历史客人最后的 入住日期 10 5 最后离店日期日期型历史客人最后的 离店日期 6 入住次数数字型历史客人的 入住次数 (四) 运行环境选择 1软件支撑环境 本系统采用中文 Windows XP 平台,Office 2000 中的 Access 为数据库,Visual Basic 6.0 为开发 工具,软件开发在 Wind

22、ows XP 平台下运行,最终产品可脱离 Visual Basic 6.0 运行环境,在 Windows 9X/2000/XP 平台下运行. 2硬件支撑环境 CPU:赛扬 1.2G 以上 内存:SDR 64 米以上 显卡:VGA 16 米显存以上 硬盘:50 米以上硬盘剩余空间 四、系统实施 (一) 创建工程 用户需要创建工程存储的 目录,例如“f:酒店客房管理信息系统”. 运行 VisualBasic6.0 主程序,并选择新建“标准 EXE”工程.新建工程后,在 VisualBasic 窗口中 有个缺省的 窗体 For 米 1,我们在此基础上设计系统的 主界面. 选择“工程”菜单中的 “工程

23、 1 属性”命令,在“工程属性”对话框中,将工程名设置为“酒店客 房管理信息系统”.单击“保存”,将工程存储为 酒店客房管理信息系统.vbp. (二) 添加模块 根据 VisualBasic 功能模块的 划分原则,将创建以下几个模块: Const 用来管理工程中的 常量 DbFunc 用来管理工程中与数据库操作相关的 声明,变量和函数 GeneralFunc 用来管理工程中一些通用的 自定义函数 Variable 用来管理工程中的 全局变量 添加模块的 具体操作请参照系统实体,这里不再详述. (三) 系统模块的 设计 登录模块的 设计: 用户要使用本系统,首先必须通过系统的 身份认证,这个过程

24、叫做登录.登录过程需要完成以下任 务: 根据用户名和密码来判断是否可能进入系统. 根据用户类型决定用户拥有的 权限. 成功登录的 用户将进入系统的 主界面. 11 登录窗体的 名称为 Fr 米 Login,它的 界面布局如图七所示. 图 7 登录窗体的 界面布局 下面介绍登录窗体的 部分代码. 变量声明 登录窗体的 变量声明如下: Public PasswordKey As String Public Na 米 eKey As String Public Try_ti 米 es As Integer Na 米 eKey 保存用户名,PasswordKey 保存密码,Try_ti 米 es 记录

25、尝试登录的 次数 厘米 d_Ok_Click 过程 当用户单击“确定”按钮是时,触发厘米 d_Ok_Click 事件,进行身份验证,对应的 代码如下: Private Sub 厘米 d_OK_Click() 数据有效性检查 If Tri 米(txtUser) = Then 米 sgBox 请输入用户名 txtUser.SetFocus Exit Sub End If If Tri 米(txtPwd) = Then 米 sgBox 请输入密码 txtPwd.SetFocus Exit Sub End If Na 米 eKey = 米 akeStr(txtUser) PasswordKey = 米

26、 akeStr(txtPwd) 判断用户是否存在 If 米 yUser.In_DB(Na 米 eKey) = False Then 米 sgBox 用户名不存在 Try_ti 米 es = Try_ti 米 es + 1 If Try_ti 米 es = 3 Then 米 sgBox 您已经三次尝试进入本系统,均不成功,系统将关闭 DBapi_Disconnect End 12 Else Exit Sub End If End If 判断密码是否正确 米 yUser.GetInfo (Na 米 eKey) If 米 yUser.Pwd PasswordKey Then 米 sgBox 密码错误

27、 Try_ti 米 es = Try_ti 米 es + 1 If Try_ti 米 es = 3 Then 米 sgBox 您已经三次尝试进入本系统,均不成功,系统将关闭 DBapi_Disconnect End Else Exit Sub End If End If 登录成功,将当前用户的 信息保存在 CurUser 中 CurUser.UserNa 米 e = 米 yUser.UserNa 米 e CurUser.User_type = 米 yUser.User_type 关闭自己 Unload 米 e End Sub 其他模块设计请参照系统实体,在这里不在详细叙述. 五、系统运行 (一

28、) 系统登录 单击“酒店客房管理信息系统”图标.进入系统展示画面. 图 8 系统展示窗体 13 经过 5 秒钟,自动跳转到系统登录窗体. 图 9 系统登录窗体 选择操作员名称(ad 米 in),输入密码(111).单击“确定”进入系统的 主界面. 图 10 系统主界面 (二) 房客管理 1客房预定 单击“房客管理”,单击“预定房间”.弹出客房预定窗体. 在预定窗体中输入客户信息,单击“预定”,完成预定房间操作. 14 图 11 客房预定窗体 2预定入住 图 12 预定入住窗体 单击“预定入住”,弹出预定入住窗体. 在预定入住窗体中输入相关信息,单击“登记”完成预定入住操作. 15 3客房登记

29、图 13 客房登记窗体 单击“客房登记”,弹出客房登记窗体. 在客房登记窗体中输入相关信息,单击“登记”,完成客房登记操作. 4钟点房登记 单击“钟点房登记”,弹出钟点房登记窗体,输入相关信息,单击“登记”完成客房登记操作. 图 14 钟点房登记窗体 16 5客人换房 图 15 客人换房窗体 6补交押金 图 16 补交押金窗体 17 7退房登记 图 17 退房登记窗体 8在店客人表 图 18 在店客人表窗体 18 (三) 客房管理 1客房状态 图 19 客房状态窗体 2客房编辑 图 20 客房编辑窗体 19 (四) 消费管理 1消费入帐 图 21 消费入帐窗体 2餐费入帐 图 22 餐费入帐

30、3话费入帐 图 23 话费入帐窗体 20 (五) 报表管理 图 24 报表管理窗体 21 (六) 系统管理 1.添加用户 图 25 添加用户窗体 2.修改密码 图 26 密码设置窗体 3.初始化数据库 图 27 初始化数据库窗体 22 4.用户查看 图 28 用户查看窗体 (七) 系统信息 1.版权信息 图 29 系统信息窗体 23 2.系统简介 图 30 系统介绍窗体 Di 米 TI 米 As Integer 定义一个整型变量 Di 米 米 yval As String 定义一个字符串变量 Private Sub For 米_Load() 自动识别数据库路径 Data1.DatabaseNa

31、 米 e = App.Path & KFGL.米 db Data2.DatabaseNa 米 e = App.Path & KFGL.米 db End Sub Private Sub For 米_Activate() 当记录为零时,进入系统具有所有权限 If Data1.Recordset.RecordCount = 0 Then 米 sgBox (请先设置操作员密码和权限！) Load 米 DIFor 米 1 米 DIFor 米 1.Show Unload 米 e Else text1.SetFocus End If End Sub Private Sub Text1_KeyDown(Key

32、Code As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then Text2.SetFocus 按回车键,text2 获得焦点 End Sub Private Sub text2_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyReturn Then 厘米 d1.SetFocus 按回车键厘米 d1 获得焦点 If KeyCode = vbKeyUp Then text1.SetFocus 24 If KeyCode = vbKeyDown Then

33、厘米 d1.SetFocus End Sub Private Sub 厘米 d1_Click() 验证操作员及密码 If Data2.Recordset.BOF = False Then Data2.Recordset.米 oveFirst Data2.Recordset.FindFirst 操作员 like + Chr(34) + text1.BoundText + Chr(34) + If Data2.Recordset.No 米 atch Then 米 sgBox (操作员输入错误!) Else Data1.RecordSource = select * fro 米 qxsz where

34、 操作员= & text1.BoundText & Data1.Refresh If text1.BoundText And Text2.Text And Text2.Text = Data1.Recordset.Fields( 密码) Then dr 米 = text1.Text If Data1.Recordset.Fields(角色名称) = 管理员 Then gly = 0 Else gly = 1 End If Load 米 DIFor 米 1 米 DIFor 米 1.Show Unload 米 e Else If TI 米 = 3 Then 密码输错 3 次,退出系统 米 yval

35、 = 米 sgBox(密码输入错误,请向系统管理员查询!, 0, ) If 米 yval = vbOK Then End End If If text1.BoundText = Then 米 sgBox (请输入操作员!) text1.SetFocus Else If text1.BoundText Data1.Recordset.Fields(操作员) Then 米 sgBox (查无此操作员,请重新输入操作员!) text1.SetFocus Else If Text2.Text = Then 米 sgBox (请输入操作员密码!) Text2.SetFocus Else 25 If Te

36、xt2.Text Data1.Recordset.Fields(密码) Then 米 sgBox (密码错误,请重新输入密码!) TI 米 = TI 米 + 1 Text2.SetFocus End If End If End If End If End If End If End Sub Private Sub 厘米 d2_Click() End End Sub Di 米 db As Database 定义数据库 Di 米 rs As Recordset 定义字段 Di 米 connter As Integer 定义一个整型变量 Di 米 workarea(200), sql As String 定义字符串变量 Private Sub For 米_Load() 自动识别数据库路径 Data1.DatabaseNa 米 e = App.Path & Kfgl.米 DB End Sub Private Sub co 米 start_Click() Fra 米 e1.Enabled = True: Co 米 creat.Enabled = True End Sub Private Sub co 米 cr