宾馆管理信息系统论文.docx
- 文档编号:28658874
- 上传时间:2023-07-19
- 格式:DOCX
- 页数:10
- 大小:46.76KB
宾馆管理信息系统论文.docx
《宾馆管理信息系统论文.docx》由会员分享,可在线阅读,更多相关《宾馆管理信息系统论文.docx(10页珍藏版)》请在冰豆网上搜索。
宾馆管理信息系统论文
宾馆管理信息系统
慈溪高级职业中学徐云洁
搞要:
宾馆在正常的运营中需要对客房资源、顾客信息、结算信息进行管理,利用宾馆管理信息系统及时了解各个环节中信息的变更,有利于提高管理效率。
系统开发的总体任务是实现宾馆各种信息的系统化、规范化和自动化。
关键字:
SQL2000数据库、VisualBasic6.0、宾馆管理信息系统数据流程图、宾馆管理信息系统具体程序
系统平台:
Windows2000
数据库服务器:
MicrosoftSQLServer2000
开发工具:
VisualBasic6.0
⒈编写目的
宾馆在正常的运营中需要对客房资源、顾客信息、结算信息进行管理,利用宾馆管理信息系统及时了解各个环节中信息的变更,有利于提高管理效率。
⒉系统功能分析
系统开发的总体任务是实现宾馆各种信息的系统化、规范化和自动化。
主要完成功能:
●有关客房标准的制定、标准信息的输入,包括标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视机、电话以及单独卫生间等。
●客房标准信息的修改、查询等。
●客房基本信息的输入,包括客房编号、客房类型、客房位置、客房单价、备注等。
●客房基本信息的查询、修改,包括客房编号、客房类型、客房位置、客房单价、备注等。
●剩余客房信息的查询等。
●订房信息的输入,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等。
●订房信息的修改和查询,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等。
●结算信息的输入,包括客房编号、客房种类、位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结算日期、备注信息等。
●结算信息的修改和查询,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结日期、备注信息等。
⒊系统功能模块设计
按结构化程序设计思想,分析得出如下系统功能模块图
图Ⅰ系统功能模块图
⒋数据库设计
数据库设计步骤:
●数据库需求分析
●数据库概念结构设计
●数据库逻辑结构设计
①数据库需求分析
分析调查有关宾馆管理信息需求的基础上得本系统所处理的数据流程
图Ⅱ宾馆管理信息系统数据流程图
针对一般宾馆管理信息系统的需求,通过对宾馆管理过程的内容和流程分析,设计如下面所示的数据项和数据结构:
●客房标准信息,包括的数据项有:
标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视、电话、单独卫生间等。
●客房信息,包括的数据项有:
客房编号、客房种类、客房位置、客房单价、备注等。
●订房信息,包括的数据项有:
订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、备注等。
●结算信息,包括的数据项有:
订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、结算时间、备注等。
②数据库概念结构设计
本系统根据以上的设计规划出的实体有:
客房标准信息实体、客房信息实体、订房信息实体、结算信息实体。
各个实体具体的描述E-R图如下:
客房标准信息实体E-R图
客房信息实体E-R图
订房信息实体E-R图
结算信息实体E-R图
实体之间关系E-R图
5.宾馆管理信息系统具体程序实现
(1)系统用户管理模块的创建
用户管理模块主要实现:
·用户登陆。
·添加用户。
·修改用户
具体客房标准添加代码:
PrivateSubForm_Load()‘载入窗体后,判断所处状态
IfgintTmode=1Then‘判断是否属于添加状态
Me.Caption=Me.Caption&”添加”
Fori=0To3
Combo1(i).AddItem”否”
Combo1(i).AddItem”是”
Combo1(i).ListIndex=0
Nexti
ElseIfgintTmode=2Then‘判断是否处于修改状态
Setmrc=ExecuteSql(txtSQL,MsgText)
Me.Caption=Me.caption&”修改”
EndIf
NextintCount‘判断输入内容是否为数字
ForintCount=2To4
IfNotIsNumeric(Trim(txtItem(intCount)))Then
SelectCaseintCount
Case2
sMeg=”房间面积”
Case3
sMeg=”床位数量”
Case4
sMeg=”床位单价”
EndSelect
IfgintTmode=1Then‘判断是否有相同ID记录
txtSQL=”select*fromroomtypewheretypeid_=’”&Trim(txtItem(0))&”’”
Setmrc=ExecuteSQL(txtSQL,MsgText)
Ifmrc.EOF=FalseThen
MsgBox“已经存在此标准编号的记录!
”,vbOKOnly+vbExclamation,”警告”
txtSQL=”select*fromroomtypewheretypeid<>’”&Trim(txtItem(0))&”’andtypename=’”&Trim(txtItem
(1))&”’”
Setmrc=ExecuteSQL(txtSQL,MsgText)
Ifmrc.EOF=FalseThen
MsgBox”已经存在相同客房标准的记录!
”,vbOKOnly+vbExclamation,“警告”
txtItem
(1).Setfocus
ExitSub
EndIf
txtSQL=”deletefromroomtypewheretypeid=’”&Trim(txtItem(0))&”’”‘删除已有记录
Setmrc=ExecuteSQL(txtSQL,MsgText)
txtSQL=”select*fromroottype”‘添加新记录
ElseIfgintTmode=2Then‘判断是否处于修改状态
UnloadMe
IfflagTeditThen
UnloadfrmRoomtype
EndIf
frmRoomtype.txtSQL=”select*fromroomtype”
frmRoomtype.Show
EndIf
EndSub
PrivateSubtxtItem_GotFocus(IndexAsInteger)’文本框获得焦点时触发该事件,即自动选中输入的内容,便于修改
txtItem(Index).SelStart=0
txtItem(Index).SelLength=Len(txtItem(Index))
EndSub
PrivateSubcmdExit_Click()’单击按钮cmdExit取消添加信息
IfmblChangeAndcmdSave.EnabledThen
IfMsgBox(“保存当前记录的变化吗?
”,vbOKCancel+vbExclamation,”警告”)=vbOKThen‘保存
CallcmdSave_Click
EndIf
EndIf
UnloadMe
EndSub
PrivateSubtxtItem_KeyDown(IndexAsInteger,KeyCodeAsInteger,Shift_AsInteger)‘输入完内容,单击回车键将自动进入下一个文本框,触发文本框的Keydown事件
EnterToTabKeyCode
EndSub
(2)客房信息管理模块的创建
客房信息管理模块主要实现如下功能:
·添加客房信息
·修改客房信息
·删除客房信息
·查询客房信息
·添加订房信息
具体实现代码如下:
·添加客房信息
PrivateSubFrom_Load()‘载入窗体时,自动添加客房信息种类
DimsSqlAsString
DimintCountAsInteger
DimMsgTextAsString
DimmrccAsADODB.Recordset
·修改客房信息
PrivateSubmenuModifyroom_Click()‘选择修改房间信息,触menuModifyroom的Click事件,程序判断为修改状态后,首先删除原有记录,然后把新内容加入到数据库中
DimintCountAsInteger
·删除客房信息
PrivateSubmenuDeleteroom_Click()
DimtxtSQLAsString
DimintCountAsInteger
DimmrcAsADODB.Recordset
DimMsgTextAsString
附:
各模块视图
·用户登陆窗口
·添加客房信息
·查询客房信息
·查询剩余客房信息
·添加订房信息
·添加结算信息
酒店管理系统种类繁多,现在有很多星级酒店的系统管理软件不断开发出来,这套管理软件虽不能说界面有多漂亮,但本人觉得很实用,有的程序开发人员光顾开发的软件界面花俏,但对宾馆酒店实际需求了解不多,本人长期与宾馆酒店管理人员接触,家属本来就从事酒店各行业,所以深深觉得一套实用、出错率少的软件实在是宾馆迫切需要的,而且这套软件还要经得起实践的考验,在实际应用上,这套软件实用性还是不错的,当然,还有许多缺点,比如界面不够漂亮,程序比较老等,还有待不断提高,不断改进。
参考文献:
[1]赵洪德《电脑大学-VisualBasic6.0实例教学》2004年10月20日
[2]齐英杰《foxbase数据库管理系统》2003年1月12日
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 宾馆 管理信息系统 论文