酒店管理信息系统课程设计.doc

管理信息系统课程设计报告管理信息系统课程设计报告 目录 第 1 章 现行系统概述 .1 第 2 章 系统分析 .1 2.1 需求分析 1 2.1.1 系统功能需求之管理员.2 2.1.2 系统功能需求之用户.2 2.2 可行性研究 3 2.2.1 技术可行性.3 2.2.2 经济可行性3 2.2.3 法律上的可行性.3 2.3 系统开发方法的选择 4 2.4 数据结构 4 第 3 章 系统设计 .5 3.1 总体设计结构 5 3.2 代码设计 6 第四部分 系统实施过程及其流程图 12 4.1 基础信息设置 .12 4.2 客房前台管理 .13 4.3 查询统计管理 .15 4.4 挂账管理 .16 4.5 系统初始设计 .16 4.6 系统维护 .16 第 5 章 系统使用说明 16 管理信息系统课程设计 1 第 1 章 现行系统概述 随着社会经济的发展，人们对生活质量的要求越来越高，作为服务之一的宾馆业也在 不断的完善服务体制。它是集餐饮、住宿、娱乐于一体的立体化服务体系，其中顾客可 以随意消费并统一结账；宾馆管理者可及时了解宾馆的全部运营情况及经营走势，找出 运转成本，作为经营决策的依据。只有运用先进的科学管理手段，利用计算机管理系统 才能更好实现这一管理模式。 宾馆客房管理信息系统是用来收集、处理、存贮和传播客房、顾客、结算信息，以 信息管理为核心的计算机应用系统。利用宾馆客房管理信息系统中合理的数据库结构来 保存数据信息，及时了解各个环节中信息的变更，通过有效的程序结构来支持各种数据 操作的执行，以提高管理效率，实现宾馆服务的系统化、规范化、自动化。通过该项目 的开发与使用，可实现以下功能： （1）：快速实现客人入住登记和账务处理，减少客人住店及离店时的等待时间 （2）：准确实现客人预订入住的要求，实现有效及有保障的前台系统作业 （3）：快速响应住宿客人的有关项目查询要求 （4）：实现入住、消费、结账一条龙服务，方便客人在店内的各类消费要求 第 2 章 系统分析 2.1 需求分析 电子计算机科学的飞速发展，给酒店计算机应用带来了蓬勃生机，出现了酒店计算 机管理信息系统、安全保卫系统、电子门锁系统、酒店信息服务系统、客房电脑保险系 统以及计算机娱乐系统。计算机在酒店中的应用，已深入到酒店的各个部门，特别在信 息处理领域，计算机已成为最重要的工具。在酒店现代管理理论中，酒店管理信息系统 管理信息系统课程设计 2 已成为酒店现代科学管理的重要内容，是酒店经营必不可缺少的现代科学工具。近年来， 随着我国改革开放的发展，国内的酒店服务业得到了日新月异的发展。现代酒店作为一 体化的接待场所，是一个旅游城市的窗口，也可以说是一个小型社会。作为一种以服务 为主的无烟工业，世界各国对此行业的重视程度并不亚于其它工业。我设计的酒店管理 系统主要是针对酒店各种信息的管理以实现对酒店的管理 2.1.1 系统功能需求之管理员 1.对客房信息进行查询、更新、删除，添加客房信息； 2、对客房类型信息进行查询、更新、删除，添加客房类型； 3、对用顾客入住信息进行查询、更新、删除，添加顾客入住离开信息； 4、对客户留言的管理。 2.1.2 系统功能需求之用户 利用本系统用户在注册或登录后可实现： 1、客房远程网上预订， 使客户不在当地也可以订购酒店的客房； 2、利用本系统可查询、掌握全酒店客房的运营状况； 3、利用本系统 可发布酒店相关信息， 让客户了解酒店的服务理念； 4、 提高酒店的知名度； 5、 利用本系统实现客户意见反馈，客户通过留言板对酒店服务提出意见，拉近了酒店 和客户之间的距离； 6、 增加客户的回头率。 管理信息系统课程设计 3 2.2 可行性研究 2.2.1 技术可行性 此次信息系统开发是对我们所学的管理信息系统的实践,我们在微机室完成系统开发。 我们小组可以选定两三台计算机或者用自己的笔记本进行开发，建立系统开发环境，主 要是安装 access 机，小组成员之间可以通过一起讨论，协调开发工作，解决开发工作 中出现的问题。 就技术力量来说，该学期，我们小组各成员已经学习了管理信息系统，并且对网络 技术和操作系统也有系统的了解，有些成员熟悉计算机原理，能解决常见的硬件故障和 硬件选择。目前，教材管理信息系统已得到了大量应用，有许多可供参考的成功系统。 从技术角度考虑，此信息系统开发可行。 2.2.2 经济可行性 目标系统开发需求比较低，加上具有成熟的软硬件环境，所以在软硬件的支出上十 分有限。而且，目标系统并不是十分的复杂，开发的周期较短，人员经济支出有限。当 系统开发完实际运行后，将很大程度上提高计算机的功能，在为使用者带来便利的同时， 也为系统的进一步推广创造了条件。这带来的经济回报将远超过支出，并且最重要的一 点是该软件的开发可以给我们对系统的开发有个全面的认识。从经济角度考虑，此信息 系统开发可行。 2.2.3 法律上的可行性 整个系统由于是自行开发，自行使用，所以系统本身不存在法律上的版权争议信息 系统规划 在需求分析的基础上，我们提出了教材管理系统的总体结构方案，并根据发展战略 和总体结构方案，确定了系统的开发次序及时间安排。 管理信息系统课程设计 4 2.3 系统开发方法的选择 本次课程设计我们选择结构化开发方法，即用系统工程的思想和工程化的方法，按 照用户至上的原则，自顶向下整体分析与设计和自底向上逐步实施的系统开发过程。是 组织、管理和控制信息系统开发过程的一种基本框架。 其基本思想：在系统分析时，采用自顶向下、逐层分解，由抽象到具体的逐步认识 问题的过程；在系统设计的时候，先考虑系统整体的优化，再考虑局部的优化问题；在 系统实施的时候，则坚持自底向上，先局部后整体，通过标准化模块的连接形成完整的 系统。 2.4 数据结构 本程序定义了五个结构体：date，easy，easy*create，easy*head，ptr 分别用于存放日期与 时间信息，房间入住状态，当日时间，住房费用信息 1、定义入住信息结构体 struct easy int number; int price; struct date past; char name8,id18; int x; struct easy *next; 其中各字段意义如下： int number; 表示房号 int price; 表示价格 struct date past; 表示入住日期和时间 管理信息系统课程设计 5 char name8,id18; 表示等级客户姓名和地址 int x;表示房间入住状态 第 3 章 系统设计 3.1 总体设计结构 该管理系统适用于各类中小型酒店的客房资源和客户信息的管理，实现了酒店的信 息化管理，该系统主要包括基础信息设置、客房前台管理、查询统计管理、挂账管理、 系统初始设计、系统维护等功能。 功能结构图 3-1 3.2 代码设计 private sub form_current() on error goto err_form_current 管理信息系统课程设计 6 把子窗体中当前记录值赋予主窗体对应的文本框内 forms!职员资料管理!职员 id = me!职员 id forms!职员资料管理!姓名 = me!姓名 forms!职员资料管理!职位 = me!职位 forms!职员资料管理!性别 = me!性别 forms!职员资料管理!籍贯 = me!籍贯 forms!职员资料管理!年龄 = me!年龄 forms!职员资料管理!民族 = me!民族 forms!职员资料管理!健康状况 = me!健康状况 forms!职员资料管理!身份证号 = me!身份证号 forms!职员资料管理!婚姻状况 = me!婚姻状况 forms!职员资料管理!家庭地址 = me!家庭地址 forms!职员资料管理!家庭电话 = me!家庭电话 forms!职员资料管理!备注 = me!备注 exit_form_current: exit sub err_form_current: msgbox err.description resume exit_form_current end sub option compare database private sub 查询_click() on error goto err_查询_click me!入住记录查询 子窗体.requery exit_查询_click: exit sub err_查询_click: msgbox err.description 管理信息系统课程设计 7 resume exit_查询_click end sub private sub 关闭_click() on error goto err_关闭_click docmd.close exit_关闭_click: exit sub err_关闭_click: msgbox err.description resume exit_关闭_click end sub option compare database private sub 新添会员_click() on error goto err_新添会员_click 为窗体中“会员 id”等文本框控件设置初值 me!会员 id = year(now) & month(now) & day(now) & _ hour(now) & minute(now) & second(now) me!会员姓名 = null me!会员级别 = “一级“ me!会员折扣 = 9.5 me!累计消费 = 0 me!操作人员 = null me!身份证 id = null me!所在单位 = null me!入会日期 = now me!备注 = null exit_新添会员_click: exit sub err_新添会员_click: 管理信息系统课程设计 8 msgbox err.description resume exit_新添会员_click end sub private sub 保存会员_click() on error goto err_保存会员_click dim i as integer dim stemp as string dim rs as adodb.recordset set rs = new adodb.recordset 为打开数据表“查询语句”字符变量赋值 stemp = “select * from 会员资料“ 打开“会员资料”数据表 rs.open stemp, currentproject.connection, adopenkeyset, adlockoptimistic 判断“会员 id”等文本框是否为空 if isnull(me!会员 id) = true then 弹出提示“会员 id”文本框不可以为空信息 msgbox “请输入“会员 id”，它不可以为空!“, vbokonly, “输入“会员 id”“ 把光标置于“会员 id”文本框内 me!会员 id.setfocus 退出子过程 exit sub elseif isnull(me!会员姓名) = true then msgbox “请输入“会员姓名”，它不可以为空!“, vbokonly, “输入“会员姓名”“ me!会员姓名.setfocus exit sub elseif isnull(me!身份证 id) = true then msgbox “请输入“身份证 id”，它不可以为空!“, vbokonly, “输入“身份证 id”“ me!身份证 id.setfocus exit sub 管理信息系统课程设计 9 elseif isnull(me!入会日期) = true then msgbox “请输入“入会日期”，它不可以为空!“, vbokonly, “输入“入会日期”“ me!入会日期.setfocus exit sub elseif isnull(me!会员级别) = true then msgbox “请输入“会员级别”，它不可以为空!“, vbokonly, “输入“会员级别”“ me!会员级别.setfocus exit sub elseif isnull(me!会员折扣) = true then msgbox “请输入“会员折扣”，它不可以为空!“, vbokonly, “输入“会员折扣”“ me!会员折扣.setfocus exit sub elseif isnull(me!累计消费) = true then msgbox “请输入“累计消费”，它不可以为空!“, vbokonly, “输入“累计消费”“ me!累计消费.setfocus exit sub elseif isnull(me!操作人员) = true then msgbox “请输入“操作人员”，它不可以为空!“, vbokonly, “输入“操作人员”“ me!操作人员.setfocus exit sub else 循环判断该编号的会员是否存在 if rs.recordcount 0 then rs.movefirst for i = 1 to rs.recordcount 如果存在，弹出信息并退出子过程 if rs(“会员 id“) = me!会员 id then msgbox “该编号的会员已经存在，请核实!“, vbcritical, “记录已经存在“ exit sub else 管理信息系统课程设计 10 rs.movenext end if next i end if end if 为保存会员资料“查询语句”字符变量赋值 stemp = “insert into 会员资料 “ stemp = stemp & “( 会员 id,会员姓名,会员折扣,累计消费,会员级别,“ stemp = stemp & “操作人员,身份证 id,入会日期,所在单位,备注)“ stemp = stemp & “values (“ & me!会员 id & “,“ & me!会员姓名 & “,“ stemp = stemp & “ & me!会员折扣 & “,“ & me!累计消费 & “,“ stemp = stemp & “ & me!会员级别 & “,“ & me!操作人员 & “,“ stemp = stemp & “ & me!身份证 id & “,“ & me!入会日期 & “,“ stemp = stemp & “ & me!所在单位 & “,“ & me!备注 & “)“ 使用 docmd 对象的 runsql 方法执行查询 docmd.runsql stemp 刷新“会员资料管理 子窗体”子窗体 me!会员资料管理 子窗体.requery 释放系统为 rs 数据集分配的空间 set rs = nothing exit_保存会员_click: 释放系统为 rs 数据集分配的空间 set rs = nothing exit sub err_保存会员_click: msgbox err.description resume exit_保存会员_click end sub 管理信息系统课程设计 11 private sub 修改会员_click() on error goto err_修改会员_click dim i as integer dim stemp as string dim rs as adodb.recordset set rs = new adodb.recordset 为打开数据表“查询语句”字符变量赋值 stemp = “select * from 会员资料“ 打开“会员资料”数据表 rs.open stemp, currentproject.connection, adopenkeyset, adlockoptimistic 判断“会员 id”等文本框是否为空 if isnull(me!会员 id) = true then 弹出提示“会员 id”文本框不可以为空信息 msgbox “请输入“会员 id”，它不可以为空!“, vbokonly, “输入“会员 id”“ 把光标置于“会员 id”文本框内 me!会员 id.setfocus exit sub elseif isnull(me!会员姓名) = true then msgbox “请输入“会员姓名”，它不可以为空!“, vbokonly, “输入“会员姓名” “ me!会员姓名.setfocus exit sub elseif isnull(me!身份证 id) = true then msgbox “请输入“身份证 id”，它不可以为空!“, vbokonly, “输入“身份证 id”“ me!身份证 id.setfocus exit sub elseif isnull(me!入会日期) = true then 管理信息系统课程设计 12 msgbox “请输入“入会日期”，它不可以为空!“, vbokonly, “输入“入会日期” “ me!入会日期.setfocus 第四部分 系统实施过程及其流程图 4.1 基础信息设置 1、设置客房信息：对客房的基本信息进行增加、修改、删除。 2、设置员工信息：对员工的基本信息进行增加、修改、删除。 3、设置挂账单位：对挂账单位的基本信息进行增加、修改、删除。 管理信息系统课程设计 13 . 图 4-1 流程图 4.2 客房前台管理 1、客房预订：可以通过此窗口实现客房预订。 2、住宿登记:客人入住宾馆登记信息，退宿一天前进行提醒。 3、宿费提醒：查询某日期的提醒信息或全部提醒信息。 管理信息系统课程设计 14 图 4-2 住宿登记、修改、查询程序流程图 4、退宿结帐：可以选择挂账、打折等多种方式，并可以在此增加其他消费项目的费 用。自动提取系统时间以及当前操作员，实现功能为客人的退房结账。在下拉菜单中选 择凭证号码，其他信息自动从数据库中提取，退宿编号为自动分配。在附加费处选择附 加费项目，然后在后面的单行编辑框中输入数目，提中显示对应的消费，并自动计算到 应收金额及退还金额中。下图为退宿结帐、查询程序流程图。 图 4-3 查询流程图 管理信息系统课程设计 15 开始 操作员登录 登录判断 退宿查