客房标准管理系统毕业设计方案范例.doc

客房管理系统学 院专 业班 级学 号姓 名指引教师教师职称年月日摘要【摘要】随着改革开放步伐加快，国内服务业获得了巨大发展。而宾馆是国内改革开放过程中起步最早、开拓发展最快、收效最为明显、市场化限度高服务行业之一。而随着信息科技发展，老式管理模式逐渐被信息化及数字化管理模式所取代，如何得用先进管理手段，提 高宾馆管理水平，已成为宾馆行业当务之急。面对信息时代机遇和挑战，得用科技手段提高公司管理无疑是一条行之有效途径。客房管理系统开发充分运用了信息技术提高了宾馆客房管理水平、服务水平。系统实现了客房预定、住宿登记、宿费提示、追加押金、调房登记、退房结帐、挂帐、查询记录等功能。其中宿费提示可以在住宿费超过押金时预警，提示前台要客人补交押金，该功能可明显提高对住宿人员住宿有效管理。将动态实时住宿登记、客房调节、销售报表、追加押金等有机地联系在一起，对宾馆客房进行全方位管理。【核心词】客房管理系统目录摘要2目录30 引言11 需求分析12 总体设计12.1 项目规划12.2 系统功能构造12.3 设计目的23 系统设计23.1 开发及运营环境24 重要功能模块设计24.1 程序主界面设计24.2 系统登录界面设计34.3 客房信息设计54.4 退宿结帐设计124.5 住宿查询设计18附录A 参照文献20附录B 数据表21附录C 文献架构250 引言随着国内经济迅速发展，人们生活水平有了明显提高，假日经济和旅游经济已经成为人们消费热点。各地也把旅游也当作本地经济发展重要支柱之一，从而增进了宾馆酒店业发展。同步，随着宾馆酒店越来越多，人们规定越来越高，宾馆酒店竞争也越来越激烈。如何在激烈竞争中生存发展，是每个宾馆酒店必要面临问题。对宾馆经营状况起决定作用是宾馆服务管理水平。如何运用先进管理手段，提高宾馆管理水平，已成为宾馆酒店也发展当务之急。客房管理系统开发可以协助系统管理员完毕寻常客人入住及客人退房信息管理及查询等工作，大大提高了工作效率。虽然计算机管理并不是宾馆管理走向成功核心元素，但它可以最大限度地发挥精确、快捷、高效等作用，对宾馆服务管理提供有力支持。1 需求分析依照该宾馆详细状况，系统重要功能涉及：l 前台管理：“客房预定”、“住宿登记”、“调房登记”、“追加押金”、“退房结帐”。l 客房管理：“客房查询”、“房态查看”。l 查询记录：“预定房查询”、“住宿查询”、“退宿查询”、“宿费提示”。l 挂帐管理：“挂帐管理”、“客人结帐”。l 基本信息设立：“客房信息”、“客房类型信息”、“员工信息”、“挂帐单位信息”。l 系统初始化：“本单位定义”、“业务部门定义”、“操作员管理”、“权限设立”。系统维护：“系统初始化”、“数据备份”、“数据恢复”。2 总体设计2.1 项目规划客房管理系统重要是针对中小型宾馆、酒店开发客房管理系统，系统由前台管理、客房管理、查询记录、挂帐管理、基本信息设立、系统初始化、系统维护和协助等几种功能模块构成，规划系统功能模块如下：q 前台管理前台管理：客房预定、住宿登记、调房登记、追加押金、退宿结帐和退出。q 客房管理客房管理：客房查询和房态查看。q 查询记录查询记录：预定房查询、住宿查询、退宿查询、宿费提示。q 挂帐管理挂帐管理：挂帐查询和客人结帐。q 基本信息设立基本信息设立：客房信息、客房类型信息、员工信息和帐挂单位信息。q 系统初始化系统初始化：本单位定义、业务某些定义、操作员管理和权限设立。q 系统维护系统维护：系统初始化、数据备份和数据恢复。q 协助协助：协助和关于本软件2某些。2.2 系统功能构造本系统共分7大某些、24个完整功能模块。系统构造图如图1所示。图1 客房管理系统构造图2.3 设计目的本系统重要是针对中小型宾馆、酒店开发客房管理系统，重要实现可如下目的：q 界面设计美观和谐。q 操作员可以随时修改自己口令，并且不同操作员设立不同操作权限，以增强系统安全性。q 数据保密性强，为每个顾客设立相应权限级别。q 信息查询灵活、以便、快捷，数据存储安全可靠。q 可以实现数据备份和数据恢复，保证数据安全。q 系统运营稳定，安全可靠。3 系统设计3.1 开发及运营环境系统开发平台：Microsoft Visual FoxPro 6.0。运营平台：Windows XP/ Windows / Windows 。辨别率：最佳效果1024768像素2 数据库设计。1数据库概要阐明数据库在一种管理系统中占居非常重要地位，数据库构造设计好坏将直接影响系统效率和实现效果。本系统采用是Visual FoxPro自带数据库，数据库文献名为Roommanage。2重要数据表构造数据库中数据表请参见附录B。4 重要功能模块设计4.1 程序主界面设计程序启动后，在系统登录界面验证操作员密码后，将进入主程序界面。通过主程序界面可以执行相应权限操作，并且通过选取主界面菜单，来调用相应程序并进行相应操作。主程序界面如图2所示。图2 程序主界面1表单设计（1）创立一种原则项目，名称为客房管理系统，在该项目中添加一种新表单，名称为Fdesktop。（2）在表单中插入名称为VcxmainToolBar类，在类中添加Command控件、Image控件。2代码设计在“客房预定”按钮Click事件中添加如下代码：do form kfglformkfyd在“住宿登记”按钮Click事件中添加如下代码：do form kfglformzsdj在“退宿结帐”按钮Click事件中添加如下代码：do form kfglformtsjz在“住宿查询”按钮Click事件中添加如下代码：do form kfglformzsquery在“客房查询”按钮Click事件中添加如下代码：do form kfglformkfquery在“房态查看”按钮Click事件中添加如下代码：do form kfglformfangtaiquery在“宿费提示”按钮Click事件中添加如下代码：do form kfglformsftx在“客房信息”按钮Click事件中添加如下代码：do form kfglformkfmanage依照顾客使用权限，设立按钮与否有效。在vcxmain1类Init事件中添加如下代码：if purview4 or pqtgl=.f. this.parent.vcxmain1.kfyd.enabled=.f. this.parent.vcxmain1.zsdj.enabled=.f. this.parent.vcxmain1.tsjz.enabled=.f.else this.parent.vcxmain1.kfyd.enabled=.t. this.parent.vcxmain1.zsdj.enabled=.t. this.parent.vcxmain1.tsjz.enabled=.t.endifif purview4 OR pcxtj=.f. this.parent.vcxmain1.zscx.enabled=.f. this.parent.vcxmain1.sftx.enabled=.f.else this.parent.vcxmain1.zscx.enabled=.t. this.parent.vcxmain1.sftx.enabled=.t.endifif purview4 OR pkfgl=.f. this.parent.vcxmain1.kfcx.enabled=.f. this.parent.vcxmain1.ftck.enabled=.f. else this.parent.vcxmain1.kfcx.enabled=.t. this.parent.vcxmain1.ftck.enabled=.t.endifif purview4 OR pjcinfo=.f. this.parent.vcxmain1.kfinfo.enabled=.f.else this.parent.vcxmain1.kfinfo.enabled=.t.endif在 vcxmain1类“退出”按钮Click事件中添加如下代码：quit4.2 系统登录界面设计顾客进入系统前，必要通过系统登录进入主程序界面，系统登录界面重要用于确认顾客身份及使用权限，并且可对系统信息起到保密作用。系统登录界面如图3所示。图3 系统登录界面运营成果1表单设计（1）在客房管理系统项目中，添加一种新表单，名称为Admin。（2）在表单中添加Combo控件、Text控件、Label控件、Command控件、Image控件。（3）重要控件属性如表1所示。表1 重要控件重要属性及值控件名属性值Combo1RowSourceRowSourceTypetabpurview.操作员姓名6-字段Text1PasswordChar*2代码设计定义全局变量cn，manager，cn存储输入操作员或密码次数，当cn不不大于3时，将自动退出系统。manager存储操作员姓名，在系统中应用到操作员姓名时，系统自动添加。在表单Init事件中添加如下代码：public cn ,manager &定义全局变量cn=0 &给全局变量赋初值在表单Resize事件中添加依照顾客选取操作员所拥有权限级别为全局变量赋值代码。purview=val(alltrim(tabpurview.权限级别)pqtgl=tabpurview.前台管理pkfgl=tabpurview.客房管理pcxtj=tabpurview.查询记录pgzgl=tabpurview.挂帐管理pjcinfo=tabpurview.基本信息设立psyscsh=tabpurview.系统初始化psyswh=tabpurview.系统维护在“拟定”按钮Click事件中添加如下代码实现判断操作员和密码与否对的功能。如果操作员或密码不对的，将提示重新输入，三次后仍不对的，系统将自动退出。public manager &定义全局变量manager=alltrim(bo1.value)use kfgldatabasetabpurview &打开数据表cname=alltrim(thisform.Combo1.value)ppassword=alltrim(thisform.text1.value)set order to 操作员姓名 &指定操作员姓名为控制索引if empty(操作员姓名) thisform.resize &执行表单Resize事件 manager=alltrim(bo1.displayvalue)store .t.to pqtgl,pkfgl,pcxtj,pgzgl,pjcinfo,psyscsh,psyswh do form formfdesktop &调入表单 thisform.releaseelse seek cname &迅速查询set exact on &设立字符精准比较 if alltrim(tabpurview.操作员姓名)!=cname cn=cn+1cMessagetitle=系统登录cMessagetext=操作员错误，请重新输入！nDialogtype=4+32nanswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)do case case nanswer=6 &选取“是”时操作 bo1.value= bo1.setfocus case nanswer=7 &选取“否”时操作messagebox(不要乱来！,48，系统登录)thisform.release &释放表单endcaseif cn=3thisform.releaseendifelseif alltrim(tabpurview.密码)!=ppasswordcn=cn+1cmessagetitle=系统登录cmessagetext=密码错误，请重新输入！ndialogtype=4+32nanswer=messagebox(cmessagetext,ndialogtype,cmessagetitle)do case case nanswer=6 &当顾客单击“是”按钮 thisform.text1.value= thisform.text1.setfocus case nanswer=7 messagebox(不要乱来！,48，系统登录) thisform.release endcase if cn=3 thisform.release endif else thisform.resize &执行表单Resize事件 manager=alltrim(bo1.displayvalue) do form formfdesktop thisform.release endif endif endifset exact off &设立字符非精准比较在“取消”按钮Click事件中添加如下代码：cmessagetitle=系统登录cmessagetext=真想要退出吗？nDialogtype=4+32nanswer=messagebox(cMessagetext,nDialogtype,cMessagetitle)if nanswer=6 thisform.release &释放表单endif4.3 客房信息设计顾客进入系统后，单击主菜单基本信息设立下客房信息子菜单选项，进入客房信息界面时可以通过查询条件查询客房基本信息，并以文本框和列表两种方式显示客房信息。客房信息表单运营成果如图4所示。图4 客房管理表单运营成果1表单设计（1）在客房管理系统项目中，添加一种新表单，名称为Kfmanage。（2）在表单中添加Label控件、Combo控件、Text控件、Edit控件、Command控件、Commandgroup控件、PageFrame控件和Grid控件。（3）重要控件属性如表2所示。表2 重要控件重要属性及值控件名属性值Combo1DisplayValueRowSourceRowSourceType房间号房间号,房间类型,房态1-值Combo2RowSourceRowSourceTypeStyleAll,like,=,1-值2-下拉列表框2代码设计在表单Load事件中添加如下代码：public cx,l &定义全局变量cx=0l=.f.在表单Resize事件中添加如下代码：thisform.pageframe1.page1.text1.value=tabkfinfo.房间号 &赋值给Text1等bo1.value=tabkfinfo.房间类型thisform.pageframe1.page1.text3.value=tabkfinfo.价格bo2.value=tabkfinfo.房态thisform.pageframe1.page1.text5.value=tabkfinfo.营业时间thisform.pageframe1.page1.text6.value=tabkfinfo.备注thisform.pageframe1.page1.text7.value=tabkfinfo.使用设立thisform.pageframe1.page1.edit1.value=tabkfinfo.配备L是全局变量，当L为.T.或.F.时，这个值会集体赋给有关控件Enabled属性。这种写法其实将Init事件当成一种设有关控件与否有效函数。在表单Init事件中添加如下代码：store l to bo1.enabled=l bo2.enabled=lthisform.pageframe1.page1.text5.enabled=lthisform.pageframe1.page1.text6.enabled=lthisform.pageframe1.page1.text7.enabled=lthisform.pageframe1.page1.edit1.enabled=l在combo2控件InteractiveChange事件中添加如下代码：if alltrim(bo2.value)=All thisform.text1.value= thisform.text1.enabled=.f.else thisform.text1.enabled=.t.endif在“查询”按钮Click事件中添加可以依照顾客选取条件查找记录代码。cx=0cif=alltrim(bo1.displayvalue)ccif=alltrim(bo2.displayvalue)ctext=alltrim(thisform.text1.value)if empty(ccif) messagebox(请输入查询条件！,48,操作失败！) bo2.setfocus &Combo2获得焦点else if empty(ctext) if ccif!=All messagebox(请输入查询条件！,48,操作失败！) thisform.text1.setfocus else select *； &选取所有字段 from roommanage!tabkfinfo； &指定查询数据库文献 order by tabkfinfo.房间号； &查询成果升序排序 into cursor lindeping thisform.pageframe1.page2.grid1.recordsource=lindeping &赋数据源 lkfnumber=lindeping.房间号 select tabkfinfo set order to 房间号 &指定控制索引文献 seek lkfnumber &迅速查询 thisform.resize &执行表单Resize事件 thisform.pageframe1.page1.text1.enabled=.f. thisform.pageframe1.page1.text3.enabled=.f. l=.f. thisform.init &执行表单Init事件 mandgroup2.enabled=.t. endif else if bo2.displayvalue=like MySQL=cif+ +ccif+ +%+ctext+% else MySQL=cif+ +ccif+ +alltrim(thisform.text1.value)+ endif select * from roommanage!tabkfinfo where &MySQL.into cursor lindeping go top if eof() go bottom messagebox(客房不存在,48,信息窗口) mandgroup2.enabled=.f. mandgroup1.cmodify.enabled=.f. mandgroup1.cdel.enabled=.f. cx=1 else lkfnumber=lindeping.房间号 select tabkfinfo set order to 房间号 seek lkfnumber thisform.resize &执行表单Resize事件 thisform.pageframe1.page1.text1.enabled=.f. thisform.pageframe1.page1.text3.enabled=.f. l=.f. thisform.init &执行表单Init事件 mandgroup2.enabled=.t. endif thisform.pageframe1.page2.grid1.recordsource=lindeping endifendifmand1.setfocusthisform.refresh在页框控件Init事件中添加如下代码：thisform.pageframe1.page1.text1.enabled=.f.thisform.pageframe1.page1.text3.enabled=.f.l=.f.thisform.init &执行表单Init事件thisform.resize &执行表单Resize事件 在“客房基本信息”选项卡Activate事件中添加如下代码：mandgroup1.csave.enabled=.f.mandgroup1.ccancel.enabled=.f.mandgroup1.cadd.enabled=.t.mandgroup1.cexit.enabled=.t.mandgroup1.cmodify.enabled=.t.mandgroup1.cdel.enabled=.t.mandgroup2.enabled=.t.在“客房基本信息列表”选项卡Activate事件中添加如下代码：mandgroup1.csave.enabled=.f.mandgroup1.ccancel.enabled=.f.mandgroup1.cadd.enabled=.f.mandgroup1.cmodify.enabled=.f.mandgroup1.cdel.enabled=.f.mandgroup1.cexit.enabled=.t.mandgroup2.enabled=.f.thisform.refresh在edit1控件KeyPress事件中添加如下代码：if nKeycode=3 mandgroup1.csave.setfocusendif在Combo1控件Interactivechange事件中添加如下代码：kftype=alltrim(bo1.displayvalue)select *;from roommanage!tabkflx;where 客房类型=kftype;order by tabkflx.类型编号;into cursor linshithisform.pageframe1.page1.text3.value=linshi.价格在“|”按钮Click事件中添加如下代码：go top &把记录指针定位到第一条记录mand1.enabled=.f.mand2.enabled=.f.if cx=1 mand3.enabled=.f. mand4.enabled=.f. mandgroup1.cmodify.enabled=.f. mandgroup1.cdel.enabled=.f.else mand3.enabled=.t. mand4.enabled=.t.endifthisform.resize &执行表单Resize事件 thisform.refresh在“”按钮Click事件中添加如下代码：if eof() messagebox(已经是最后一条记录,48,管理窗口) skip-1 &记录指针向上移一条记录 thisform.resize &执行表单Resize事件 mand1.enabled=.f. mand2.enabled=.f. mand3.enabled=.f. mand4.enabled=.f. mandgroup1.cmodify.enabled=.f. mandgroup1.cdel.enabled=.f.else skip &将把记录指针向下移一条记录 thisform.resize &执行表单Resize事件 if eof() messagebox(已经是最后一条记录,48,管理窗口) skip-1 &记录指针向上移一条记录 thisform.resize &执行表单Resize事件 mand3.enabled=.f. mand4.enabled=.f. else mand3.enabled=.t. mand4.enabled=.t. endif mand1.enabled=.t. mand2.enabled=.t.endifthisform.refresh在“|”按钮Click事件中添加如下代码：mand3.enabled=.f.mand4.enabled=.f.go bottom &记录指针移动到最后一条记录if cx=1 mand1.enabled=.f. mand2.enabled=.f. mandgroup1.cmodify.enabled=.f. mandgroup1.cdel.enabled=.f.else mand1.enabled=.t. mand2.enabled=.t.endifthisform.resize &执行表单Resize事件 thisform.refresh在“添加”按钮Click事件中添加如下代码：thisform.pageframe1.page1.text1.enabled=.t. &设立控件有效thisform.pageframe1.page1.text3.enabled=.f.l=.t.thisform.init &执行表单Init事件*清空各文本框bo1.value=thisform.pageframe1.page1.text3.value=0bo2.value=thisform.pageframe1.page1.text5.value=/:thisform.pageframe1.page1.text6.value=thisform.pageframe1.page1.text7.value=thisform.pageframe1.page1.edit1.value=thisform.pageframe1.page1.text1.value=thisform.pageframe1.page1.text1.setfocus &Text1获得焦点mandgroup1.cmodify.enabled=.f.mandgroup1.cdel.enabled=.f.mandgroup1.cexit.enabled=.t.mandgroup1.ccancel.enabled=.t.mandgroup1.csave.enabled=.t.mandgroup1.cadd.enabled=.f.thisform.pageframe1.page2.enabled=.f.mandgroup2.enabled=.f.mand1.enabled=.f.单击“保存”按钮，在客房信息表“Tabkfinfo”中查