1浅谈客房管理系统摘要:21世纪是一个”知识经济”时代,信息爆炸是这个时代的特征。因此,信息时代对企业的信息管理和应用提出了更高的要求,这主要体现在两个方面:一是由于我们所处的这个世界已经成为知识信息的海洋,企业必须具备从企业环境中获取、处理和应用这些信息的能力;二是企业还必须具备管理和应用企业本身不断产生的反映企业状态的数据信息和描述管理活动的控制信息。毋庸讳言,VisualBasic是近年来发展最快的一种计算机语言,其简洁与实用性受到众多计算机用户和程序员的青睐。通过Microsoft的概念化,VisualBasic的创建者以一种广为人知的Basic语言为基础,并赋予这个语言方便地建立windows应用的能力,从而提供了开发各种企业系统所需的多任务和高性能。关键词:DatabaseDatabasenameRecordsourceRecordsetFieldConnectDatasourceDataDaoSelect系统设计的目的在现代的宾馆服务行业中,由于客流量巨增,传统的管理方法已经不适合现代社会的需要,因此客房管理系统是各大中小型宾馆所需要使用的一个管理系统。由于客房系统往往是一个大型的信息管理系统,他需要专业的开发人员才能完成复杂的功能,而且每一个宾馆的管理内容和服务方式均有所区别,本文只是制作了一个有一定代表意义的小型的客房管理系统。系统架构本系统是一个小型客房管理系统,适合2—5人左右非大量并发的数据库操作访问,采用桌面DBMSaccess作为底层平台,通过data进行连接访问,界面实现采用visualbasic开发,单机运行,数据库平台和程序可以运行windows操作系统上.数据库访问方法采用DAO对象访问ODBC或者直接访问.功能分析本系统为采用三层结构体系,以低层access数据库作为数据库系统,通过一个通用的数据访问接口层来统一操作,如果更改了数据源平台,只需前换该层即可,业务逻辑层是一些能够完成客房操作业务的接口,本系统逻辑层在数据查询结构结果返回方面,采用DAO访问技术,对数据集进行浏览,更新,删除等操作.系统功能设计2在本系统中,将实现如下一些功能:1.用户权限管理2.客户住宿管理3.客户退房管理4.客户综合查询管理本系统将基本实现小型标准客房管理的部分功能。数据库及数据表设计数据库设计是整个软件的重中之重,数据库设计包含了对系统实体划分,关键是逻辑设计和运行平台设计,通过对数据库设计可以清楚地划分软件中所有的实体和关系,也可以中抽象出系统的所有对象.在该数据库中,创建一个客户信息数据表,系统用户权限表,客房情况表。客房管理数据库的建立数据库是数据表的集合,系统开发首先应该开发一个数据库,用于存放系统中的数据表。在visualbasic集成开发环境中制作客房管理数据库的步骤如下:(1)启动vb应用系统,出现vb应用系统开发主界面。(2)在vb主菜单中单击外接程序|可视化数据管理器菜单项,出现可视化数据管理器界面。(3)单击文件|新建|Microsoftaccess(m)|version7.0mdb(7)菜单项,vb默认的数据库类型为Microsoftaccess数据库类型,它与Microsoftoffice2000的基本数据库类型一致,而且在Microsoftaccess数据库类型中,version7.0mdb为最新版本的数据库类型。选择该类型的数据库,数据库文件的扩展名为.mdb,在创建数据库时不必输入扩展名,可视化数据管理器将自动为数据库生成扩展名。(4)再单击菜单后出现文件保存对话框,在对话框中选择磁盘驱动器和文件夹名称,此处选择文件夹,并将数据库命名为客房管理数据库,随后将出现数据库窗口。客户信息数据表的创建数据库只是一个容器,它是数据表的集合。数据库一经创建,用户就可以在数据库中创建应用系统开发制作所需要的数据表。其步骤如下:(1)在可视化数据管理器中打开数据库(2)在数据管理器中选择数据库文件(3)右击数据库文件客房管理数据库,出现一个弹出式菜单(4)在弹出式菜单中单击新建表菜单项,出现数据表结构设计器对话框.数据表结构就是对一个数据表中的字段名称,类型,大小的定义,在数据表结构创建对话框中,不仅可以制定表的结构,还可以对数据表进行各种操作,如显示每一个字段的结构信息,增加或删除字段,建立索引,对每一字段进行有效性输入规则的定制等.在客房管理数据库中我们将创建”客房信息数据表”,其结构参数定义如下:3字段名称字段类型字段大小索引忽略空值房号singledefault惟一主索引No姓名Text20No性别Text2No年龄SingledefaultNo国籍Text20No身份证号Text50No客房级别Text20No用房天数SingledefaultNo住店日期Date/timedefaultNo离店日期Date/timedefaultNo系统用户权限表的设计与创建,在整个系统中,使用系统均要通过权限认证,他包括系统准入认证,权限修改认证等,因此需要创建一个用户权限表,其结构如下所示:字段名称字段类型字段大小索引忽略空值操作员Text20No密码single4关键No客房情况表的设计和创建他用于整个客房所有房间的信息,以及已经住宿的情况和未住宿的情况其结构如下表所示:字段名称字段类型字段大小索引忽略空值房号Singledefault惟一主索引No客房级别Text10No用房标志Text1No创建系统启动界面系统启动封面是一个应用系统开始的界面,通常是系统登录的界面进入该界面后,通过用户权限的认证,判断使用本程序的用户是是合法用户.然后进入系统主窗体。创建系统启动界面也就意味着创建系统的开始,本文采用数据工程的方法创建。创建的过程如下:1.启动vb应用系统,进入开发平台主界面2.在开发平台中,创建一个新的工程,此处创建数据工程3.在工程类型中选择数据工程4.单击打开按钮,出现一个数据工程,其中包括一个数据工程窗体,一个数据源环境和数据报表的设计器数据工程的关键在于使用数据源,创建数据源的方法如下:1.单击数据设计器/数据环境条目,出现一个数据环境中的连接界面2.右击连接条目connection1,出现一个弹出式菜单,单击属性,出现数据源驱动程序类型3.选择microsoftaccess,单击next按钮,出现数据库设置对话框,选择数据库4.单击确定按钮,成功引入数据源接下来,创建系统启动界面,在工程管理器中打开数据工程已经创建的第一个窗体form1保存该工程和该窗体接下来设计form14其制作过程如下:1.设置窗体的基本属性如表所示:属性项名属性设置内容Startuupposition2-屏幕中心Windowsstate2-maxmizedpicture图片文件2.在窗体中放置一个数据控件data1,该控件主要作为登录的系统用户权限表的数据源控件,设置他的基本属性如表所示:属性项名属性设置内容DatabasenameConnectaccessRecordsourceklvisibleFalse3.在窗体中放入两个按纽控件,分别设置其caption属性为登录和退出,并为这两个赋予过程代码,其过程代码如下:DimTIMAsInteger'定义一个整型变量DimmyvalAsString'定义一个字符串变量PrivateSubCommand1_Click()Data1.Recordset.CloseEndEndSubPrivateSubcombo1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=vbKeyReturnThenText2.SetFocus'按回车键,text2获得焦点EndIfEndSubPrivateSubForm_Activate()Data1.RefreshData1.Recordset.MoveLastIfData1.Recordset.RecordCount=0ThenMsgBox(请先设置操作员和密码的权限!!)From2.ShowUnloadMeData1.Recordset.CloseElseCombo1.SetFocusEndIf5EndSubPrivateSubForm_Load()Data1.DatabaseName=App.Path&\kl.mdbData1.RefreshEndSubPrivateSubtext2_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=vbKeyReturnThenCommand1.SetFocus'按回车键cmd1获得焦点IfKeyCode=vbKeyUpThencombol1.SetFocusIfKeyCode=vbKeyDownThenCommand1.SetFocusEndSubPrivateSubcommand2_Click()WithData1.RecordsetDimmmmm=.BookmarkIf.BOF=FalseThen.MoveFirstEndIfIfCombo1.Text=ThenMsgBox请输入用户名Combo1.SetFocusExitSubElse.FindFirst操作员like+Chr(34)+Combo1.Text+Chr(34)+If.NoMatchThenMsgBox(操作员输入错误,请重新输入!!).Bookmark=mmCombo1.SetFocusExitSubElseData1.RecordSource=select*fromklwhere操作员='&Combo1.Text&'Data1.RefreshIfText2.Text=ThenMsgBox(请输入用户密码!)Text2.SetFocusExitSubElsemm=.Bookmark.FindFirst密码like+Chr(34)+Text2.Text+Chr(34)+IfTIM2ThenMsgBox你无权使用本系统,请向系统管理员查询!End6ElseIf.NoMatchThenMsgBox(密码输入错误,请重新输入!!)TIM=TIM+1.Bookmark=mmText2.Text=Text2.SetFocusExitSubElseUnloadMeForm2.Show.CloseEndIfEndIfEndIfEndIfEndIfEndWithEndSub该代码首先用于判断用户权限,如果输入的用户和密码存在,则系统允许登录.创建系统主界面接下来,首先需要创建系统的主窗体,该窗体用于对其他功能模块的调用,其创建过程如下:1.启动VB应用程序,出现开发平台主窗口.2.新建立一个标准的EXE工程,并为其命名3.主窗体的基本属性设置及其基本结构和前面类似略在本窗体中,为了修饰窗体的效果,我们特别为它加载了一幅图片,作为窗体的背景.制作系统主菜单在VB集成开发环境中,制作一个菜单是比较简单的,其操作过程如下:1.右击主窗体form2,出现一个弹出式菜单2.在弹出式菜单中单击”菜单编辑器”菜单项,即进入菜单编辑器.在本文中我们将创建如下四个菜单.登记住房:用于调用客户住宿信息处理的信息窗体.退房间:用于调用客户情况窗体,如删除客户标记,编辑客户情况的记录等.客户查询:用于调用一个客户查询窗体,综合查询客户信息权限设置:用于用户修改设置退出系统:用于执行退出系统的功能.3.在窗体中放置一个statursbar用来显示系统的某些信息,本系统为日期和时间,可以提醒用户当天日期和时间,同时也可以为界面增色,其中statursbar的第一栏中显示日期,第二栏中显示时间.7菜单与命令按纽的功能是一致的.它主要用于对事务或行为动作的执行,因此同样需要他们编制过程代码.要为菜单编制过程代码,只需要在创建菜单之后,单击菜单条目,即出现他们的过程代码编辑器窗口,选择适当的过程类型,如CLICK过程.各个菜单的过程代码如下:程序代码:OptionExplicitPrivateDeclareFunctionPlaySound