数据库课程设计酒店管理信息系统
数据库课程设计__宾馆客房信息管理系统
一、設計內容與設計要求1.設計內容:資料庫系統原理的課程設計要求學生綜合利用本課程的有關知識,在教師的指導下,利用特定的資料庫設計環境,針對具體的問題,完成從系統的需求分析、資料庫的概念設計、資料庫的邏輯設計,到資料庫實現等設計過程,最終實現一個較為完整的反映應用需求的資料庫系統。
因此,在設計中,要求學生應該全面考慮各個設計環節以及它們之間的相互聯繫。
下麵是各個設計階段的具體內容。
⒈系統需求分析需求分析是資料庫系統設計的一個重要的環節。
本階段應該對整個應用情況作全面的、詳細的調查,確定特定資料庫應用環境下的設計目標,收集該應用環境下針對系統設計所需要的基礎數據以及對這些數據的具體存儲要求,從而確定用戶的需求。
用戶對數據庫的需求包括:⑴處理需求。
即用戶要完成什麼處理功能等。
學生在設計中應根據具體的課題要求確定系統應該實現的功能,一些基本的功能通常是必須具備的,如用戶的管理與維護,基本數據的維護,靈活的資訊查詢等。
⑵資訊需求。
即在資料庫中需要存儲哪些數據。
學生應該根據具體的課題,認真分析有關的要求,確定本設計的資訊需求。
⑶安全性和完整性功能。
實踐中這是一個需要與用戶不斷交流才能逐步確定的需求。
本課程設計要求學生在自己的設計中能反映出基本的安全性和完整性功能。
本階段的設計結果(即系統需求分析)應該在課程設計報告中進行詳細描述,畫出系統的數據流圖,寫出較為詳細的數據字典,作為本課程設計的驗收依據之一。
⒉資料庫的概念設計資料庫的概念設計是在需求分析的基礎上,利用與用戶雙方都能理解的形式,設計出資料庫的概念模型。
本課程設計要求學生採用E-R方法進行資料庫的概念設計。
本設計階段可分為:● 數據抽象。
即根據需求分析的結果,抽取出與本課程設計相關的特性。
設計局部概念模式。
運用E-R方法,設計出系統的各個局部ER模型。
● 設計全局概念模式。
通過對局部E-R模型的操作,解決各個E-R模型關於對象定義不一致問題,以及對各個E-R模型進行合併優化等,最終形成資料庫的全局概念模式。
酒店预订管理系统--数据库课程设计
酒店预订管理系统--数据库课程设计介绍
本文档旨在设计一个酒店预订管理系统,该系统将使用数据库来存储和管理酒店预订信息。
系统将实现以下功能:
- 客户信息管理:包括客户姓名、联系方式、住宿历史等。
- 酒店房间管理:包括房间类型、价格、房间状态等。
- 预订管理:客户可以预订酒店房间,并记录预订状态、预订日期等。
- 入住管理:当客户到达并入住时,将记录入住日期和房间状态。
- 结账管理:客户退房后,系统将自动结算费用并生成账单。
数据库设计
本系统将使用关系型数据库来存储数据。
下面是系统的数据库设计:
数据表
客户表(Customers)
房间表(Rooms)
预订表(Reservations)
入住表(Checkins)
账单表(Bills)
数据库关系
系统的数据库关系如下:
- Customers表与Reservations表之间是一对多关系,一个客户
可以有多个预订。
- Rooms表与Reservations表之间是一对多关系,一个房间可以有多个预订。
- Reservations表与Checkins表之间是一对一关系,一个预订只有一个入住记录。
- Reservations表与Bills表之间是一对一关系,一个预订只有
一个账单。
总结
本文档介绍了一个酒店预订管理系统的数据库课程设计。
通过
这个系统,我们可以实现客户信息管理、房间管理、预订管理、入
住管理和结账管理等功能。
通过合理的数据库设计和表之间的关系,我们可以实现数据的存储和管理,为酒店提供高效的预订管理服务。
酒店管理信息系统课程设计报告
酒店管理信息系统课程设计报告一、引言酒店管理信息系统是一种集成了计算机技术、网络技术和信息管理技术的系统,旨在帮助酒店提高管理效率、提升服务质量。
本课程设计旨在通过构建一个完整的酒店管理信息系统,让学生掌握酒店管理信息系统的设计方法和实现技巧。
二、需求分析1. 功能需求(1)前台管理:包括客房预订、入住登记、结算等功能。
(2)后台管理:包括房间管理、员工管理、财务管理等功能。
(3)报表统计:包括销售报表、客房利用率报表等统计功能。
2. 性能需求(1)系统响应速度快,界面友好。
(2)数据安全可靠,具有备份和恢复功能。
(3)支持多用户并发操作。
三、系统设计1. 系统架构设计本系统采用B/S架构,即浏览器/服务器架构。
前端采用HTML+CSS+JavaScript进行开发,后端采用Java语言进行开发。
2. 数据库设计本系统数据库采用MySQL数据库,共设计了以下表:(1)客户表:存储客户信息。
(2)员工表:存储员工信息。
(3)房间表:存储房间信息。
(4)订单表:存储客房订单信息。
(5)结算表:存储客房结算信息。
3. 功能模块设计(1)前台管理模块前台管理模块包括客房预订、入住登记、结算等功能。
客户可以通过网站进行在线预订,并在酒店到达后进行入住登记和结算。
系统会自动计算费用并生成结算单。
(2)后台管理模块后台管理模块包括房间管理、员工管理、财务管理等功能。
管理员可以对酒店的各种资源进行管理,包括房间的添加、删除和修改,员工的添加、删除和修改,以及财务报表的生成和查询等。
(3)报表统计模块报表统计模块包括销售报表、客房利用率报表等统计功能。
管理员可以通过系统生成各种财务报告,并对酒店运营情况进行分析和评估。
四、系统实现本系统采用Java语言开发,采用SpringMVC框架进行开发。
前端采用HTML+CSS+JavaScript技术,使用jQuery库进行开发。
数据库采用MySQL数据库,并使用MyBatis框架进行数据访问层设计。
数据库课程设计酒店管理信息系统
酒店管理信息系统系统平台: Windows 2000数据库服务器: MicrosoftSQL Server 2000开发工具: Visual Basic 6.0系统开发人员:⒈编写目地酒店在正常地运营中需要对客房资源、顾客信息、结算信息进行管理 , 利用宾馆管理信息系统及时了解各个环节中信息地变更, 有利于提高管理效率 . b5E2RGbCAP⒉系统功能分析系统开发地总体任务是实现宾馆各种信息地系统化、规范化和自动化.主要完成功能:●有关客房标准地制定、标准信息地输入 , 包括标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视机、电话以及单独卫生间等 . p1EanqFDPw●客房标准信息地修改、查询等.●客房基本信息地输入 , 包括客房编号、客房类型、客房位置、客房单价、备注等 .●客房基本信息地查询、修改 , 包括客房编号、客房类型、客房位置、客房单价、备注等 .●剩余客房信息地查询等 .●订房信息地输入 , 包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等 . DXDiTa9E3d●订房信息地修改和查询, 包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等 . RTCrpUDGiT●结算信息地输入 , 包括客房编号、客房种类、位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结算日期、备注信息等 . 5PCzVD7HxA●结算信息地修改和查询 , 包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结日期、备注信息等 . jLBHrnAILg⒊系统功能模块设计按结构化程序设计思想 , 分析得出如下系统功能模块图宾馆管理信息系统结订客算房房系信信信统息息息管管管管理理理理剩结结结订订订余设设算算算房房房客置置密用信信信信信信房客客码户息息息息息息信房房管管查修添查修添息信标理理询改加询改加查息准询客客客客客房房房房房信信信标标息息息准准查修添修添询改加改加xHAQX74J0X图Ⅰ系统功能模块图⒋数据库设计数据库设计步骤:●数据库需求分析●数据库概念结构设计●数据库逻辑结构设计①数据库需求分析分析调查有关宾馆管理信息需求地基础上得本系统所处理地数据流程客房标准设置客房登记基本信息输入基本信息录入客房信息管理顾客登记订房信息管理订房信息管理客房信息返回结算信息输入结算信息管理LDAYtRyKfE图Ⅱ 宾馆管理信息系统数据流程图针对一般宾馆管理信息系统地需求, 通过对宾馆管理过程地内容和流程分析,设计如下面所示地数据项和数据结构:Zzz6ZB2Ltk●客房标准信息 , 包括地数据项有:标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视、电话、单独卫生间等 . dvzfvkwMI1●客房信息 , 包括地数据项有:客房编号、客房种类、客房位置、客房单价、备注等 .●订房信息 , 包括地数据项有:订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、备注等 . rqyn14ZNXI●结算信息 , 包括地数据项有:订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、结算时间、备注等 . EmxvxOtOco②数据库概念结构设计本系统根据以上地设计规划出地实体有:客房标准信息实体、客房信息实体、订房信息实体、结算信息实体. 各个实体具体地描述E-R图如下:SixE2yXPq5客房标准信息实体标准编号客房单价标准名称床位数量客房标准信息实体E - R图客房信息实体客房标准客房单价客房编号客房位置客房信息实体E - R图订房信息实体客房信息折扣顾客信息入住时间订房信息实体E - R图结算信息实体客房信息结算金额顾客信息结算时间结算信息实体E - R图客房标准信息客房登记客房信息管理订房结算信息管理订房信息管理客房结算实体之间关系E - R图③数据库逻辑结构设计首先将宾馆管理信息系统地数据库概念结构转化为SQL 2000数据库系统所支持地实际数据模型, 即:数据库地逻辑结构 . 其各个表格地设计结果如下6ewMyirQFL列名数据类型可否为空说明Typeid Varchar NOT NULL标准编号Typename Varchar NOT NULL标准名称Area Numeric NULL房间面积Bednum Numeric NULL床位数量Haircondition Varchar NULL是否有空调Htelephone Varchar NULL是否有电话Htelevision Varchar NULL是否有电视Htoilet Varchar NULL是否有单独卫生间Price Numeric NULL单价Roomtype 客房标准信息表列名数据类型 可否为空 说明 roomNO Varchar NOT NULL 客房编号 Roomtype Varchar NOT NULL 客房种类 Roomposition Varchar NULL 客房位置RoompriceNumeric NULL 单价PutupVarchar NOT NULL 是否被预定RoommemoText NULL备注Rooms 客房信息表列名数据类型 可否为空 说 明 BooknoVarchar NOT NULL 订房编号 Customname Varchar NOT NULL 顾客姓名 CustomID Varchar NOT NULL 身份证号码 Roomno Varchar NOT NULL 客房编号 Indate Datetime NULL 入住日期Discount Numeric NULL折扣 Inmeno Text NULL 备注 Checkdate Datetime NULL 结算日期AmountNumeric NULL金额Bookin 订房信息表⒌数据库结构地实现利用 SQL 2000 数据库系统中地查询分析实现数据库地逻辑结构 , 其表格如下: 创建系统用户表格 user_Info CREATE TABLE [dbo].[user_Info1]([user_ID][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL, kavU42VRUs [user_PWD] [char] (10> COLLATE Chinese_PRC_CI_AS NULL, y6v3ALoS89 [user_Des] [char](10> COLLATE Chinese_PRC_CI_AS NULL M2ub6vSTnP > ON [PRIMARY]创建客房标准信息表格 roomtype CREATE TABLE [dbo].[roomtype]([typeid][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL, [typename][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL, [area][numeric](5,0> NULL,0YujCfmUCweUts8ZQVRd [bednum][numeric](2,0> NULL, [haircondition][char](2> COLLATE Chinese_PRC_CI_ASNULL,sQsAEJkW5T[htelephone][char](2> COLLATE Chinese_PRC_CI_AS NULL, [htelevision][char](2> COLLATE Chinese_PRC_CI_AS NULL,[htoilet][char](2> COLLATE Chinese_PRC_CI_AS NULL, [price][numeric](10,2>NULL> ON [PRIMARY]GMsIasNXkATIrRGchYzg创建客房信息表格 roomsCREATE TABLE [dbo].[rooms]([roomNO][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL, 7EqZcWLZNX [roomtype][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL,lzq7IGf02E [roomposition][char](20> COLLATE Chinese_PRC_CI_AS NULL,zvpgeqJ1hk [roomprice][numeric](10,2> NULL,[putup][char](2> COLLATE Chinese_PRC_CI_AS NOT NULL, NrpoJac3v1[roommemo][text] COLLATE Chinese_PRC_CI_AS NULL>ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]创建订房信息表 bookin CREATETABLE [dbo].[bookin]([bookno][char](14> COLLATE Chinese_PRC_CI_AS NOT NULL,1nowfTG4KI[customname][char](10>COLLATE Chinese_PRC_CI_AS NOT NULL,fjnFLDa5Zo[customID][char](18> COLLATE Chinese_PRC_CI_AS NOT NULL,tfnNhnE6e5 [roomno][char](10> COLLATE Chinese_PRC_CI_AS NOT NULL,HbmVN777sL [indate][datetime] NULL,[discount][numeric](2,0> NULL,[inmemo][text] COLLATE Chinese_PRC_CI_AS NULL,[checkdate][datetime] NULL,[ammount][numeric](10,2> NULL> ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]⒍宾馆管理信息系统具体程序实现⑴创建公用模块Module1.bas添加公共数据操作函数 , 用以执行各种 SQL 语句 . 添加函数 ExecuteSQL, 代码如下:Public Function ExecuteSQL(ByValSQL As String,MsgString AsString>_ As ADODB.Recordset V7l4jRB8Hs‘执行 SQL语句 , 并返回记录集对象Dim cnn As ADODB.ConnectionDim rst As ADODB.RecordsetDim sTokens(> As String‘异常处理On Error GoTo ExecuteSQ L_Error ’‘用 Split函数产生一个包含各个子串地数组sTokens=Split(SQL>Set cnn=NEW ADODB.Connection‘打开连接cnn.Open ConnectStringIf InStr( “INSERT,DELETE,UPDATE”,UCase$(sTokens(0>>> Then83lcPA59W9Cnn.Execute SQLMsgString=sTokens(0>& ”query successful”ElseSet rst=NEW ADODO.Recordsetrst.Open Trim$(SQL>,cnn,adOpenKeyset,adLockOptimisticmZkklkzaaP rst.MoveLastget RecordCount‘返回记录集对象Set ExecuteSQL=rstMsgString= ”查询到” &rst.RecordCount& ”条记录”End IfExecuteSQL_Exit:Set rst=NothingSet cnn=NothingExit FunctionExecuteSQL_Error:MsgString= ”查询错误 : ”&Err.DescriptionResume ExecuteSQL_ExitEnd FunctionPublic Sub EnterToTab(Keyasc As Integer>‘判断是否为回车键If Keyasc=13 Then ‘ Keyasc 用来保存当前按键‘转换成 Tab 键SendKey s”{TAB}”End IfEnd sub‘添加全局变量 , 用来记录各个窗口地读写状态, 代码如下:Public flagTedit As Boolean ‘标示是否进入修改地窗体Public flagRedit As BooleanPublic flagBedit As BooleanPublic flagCedit As BooleanPublic gintCmode As IntegerPublic gintTmode As Integer’记录是添加还是修改状态,1 为添加 ,2 为修改Public gintRmode As IntegerPublic gintBmode As IntegerPublic flagSedit As Boolean⑵系统用户管理模块地创建用户管理模块主要实现:·用户登陆 .·添加用户 .·修改用户具体客房标准添加代码:Private Sub Form_Load(>‘载入窗体后,判断所处状态Dim intCount As IntegerDim MsgText As StringDim i As IntegerIf gintTmode=1 Then‘判断是否属于添加状态Me.Caption=Me.Caption& ”添加”For i=0 To 3Combo1(i>.AddItem”否”Combo1(i>.AddItem”是”Combo1(i>.ListIndex=0Next iElseIf gintTmode=2 Then‘判断是否处于修改状态Setmrc=ExecuteSql(txtSQL,MsgText>If mrc.EOF=false ThenWith mrcFor intCount=0 To 3txtItem(intCount>=.Fields(intCount>Next intCounttxtItem(4>=.Fileds(8>For i=0 To 3Combo1(i>.Additem ”否”Combo1(i>.Additem ”是”Combo1(i>.ListIndex=0Next iEnd WithtxtItem(0>.Enabled=FalseEnd IfMe.Caption=Me.caption& ”修改”End IfmblChang=FalseEnd SubPrivate Sub cmd_Click(>’用户输入内容完毕后, 单击 cmdSave 按钮触发Click 事件AVktR43bpwDim intCount As IntegerDim sMeg As StringDim MsgText As StringFor intCount=0 To 4‘判断是否输入内容If Trim(txtItem(intCount>&”” >=”” ThenSelect Case intCountCase 0sMeg=”标准编号”Case 1sMeg=”标准名称”Case 2sMeg=”房间面积”Case 3sMeg=”床位数量”Case 4sMeg=”床位单价”End SelectsMeg=sMeg&”不能为空 ! ”MsgBox sMeg,vbOkOnly+vbExclamation, ”警告”txtItem(intCount>.SetFocusExit SubEnd ifNext intCount ‘判断输入内容是否为数字 ForintCount=2 To 4If Not IsNumeric(Trim(txtItem(intCount>>> ThenSelect Case intCountCase 2sMeg=”房间面积”Case 3sMeg=”床位数量”Case 4sMeg=”床位单价”End SelectsMeg=sMeg&”请输入数字 ! ”MsgBox sMeg,vbOKOnly+vbExclamation, ”警告”txtItem(intCount>.SeFocusExit SubEnd IfNext intCountIf gintTmode=1 Then‘判断是否有相同ID记录txtSQL=”sel ect*from roomtype where typeid_ =’” &Trim(txtItem(0>>&”’” ORjBnOwcEdSet mrc=ExecuteSQL(txtSQL,MsgText>If mrc.EOF=False ThenMsgBox“已经存在此标准编号地记录! ”,vbOKOnly+vbExclamation, ”警告”txtItem(0>.SetFocusExit SubEnd IfMrc.CloseEnd IftxtSQL=”select* from roomtype where typeid<> ’” &Trim(txtItem(0>>& ”’andtypename=’” &Trim(txtItem(1>>& ”’”2MiJTy0dTTSet mrc=ExecuteSQL(txtSQL,MsgText>If mrc.EOF=False ThenMsgBox”已经存在相同客房标准地记录! ”,vbOKOnly+vbExclamation,“警告”txtItem(1>.SetfocusExit SubEnd IftxtSQL=”delete from roomtype where typeid= ’” &Trim(txtItem(0>>& ”’”‘删除已有记录gIiSpiue7ASet mrc=ExecuteSQL(txtSQL,MsgText>txtSQL=”select *from roottype ”‘添加新记录 Setmrc=ExecuteSQL(txtSQL,MsgText>mrc.AddNewFor intCount=0 To 3mrc.Fields(intCount>=Trim(txtItem(intCount>>Next intCountFor intCount=0 To 3mrc.Fields(intCount+4>=Trim(Combo1(intCount>>Next intCountmrc.Fields(8>=Trim(txtItem(4>>mrc.Update‘更新数据库mrc.Closeif gintTmode=1 Then‘判断是否属于添加状态MsgBox “添加纪录成功 ! ”,vbOKOnly+vbExclamtion, “添加记录”For intCount=0 To 4txtItem(intCount>= ”” ‘清除已经输入地内容Next intCountFor intCount=0 To 3Combo1(intCount>.ListIndex=0Next intCountmblChange=False’判断是否打开窗口if flagTedit ThenUnload frmRoomtypefrmRoomtype.txtSQL=“select *from roomtype”frmRoomtype.ShowEnd IfElseIf gintTmode=2 Then‘判断是否处于修改状态Unload MeIf flagTedit ThenUnload frmRoomtypeEndIffrmRoomtype.txtSQL= ”select *from roomtype”frmRoomtype.ShowEnd IfEnd SubPrivate Sub txtItem_GotFocus(Index As Int eger>’文本框获得焦点时触发该事件 , 即自动选中输入地内容 , 便于修改uEh0U1YfmhtxtItem(Index>.SelStart=0txtItem(Index>.SelLength=Len(txtItem(Index>>End SubPrivate Sub cmdExit_Click(>’单击按钮cmdExit取消添加信息If mblChange And cmdSave.Enabled ThenIf MsgBox(“保存当前记录地变化吗?”,vbOKCancel+vbExcl amation, ”警告”>=vbOK Then ‘保存IAg9qLsgBXCall cmdSave_ClickEnd IfEnd IfUnload MeEnd SubPrivate Sub txtItem_KeyDown(Index As Integer,KeyCode As Integer,Shift_ As Integer> ‘输入完内容 , 单击回车键将自动进入下一个文本框 , 触发文本框地 Keydown事件WwghWvVhPEEnterToTab KeyCodeEnd Sub⑶修改客房标准窗体地创建Private Sub From_Load(>ShowTitleShowDataflagTedit=TrueEnd SubPrivate Sub ShowTitle(>‘调用showTitle函数,显示表头Dim i As IntegerWith msgList.Cols=10.TextMatrix(0,1>=”标准编号”.TextMatrix(0,2>=”标准名称”.TextMatrix(0,3>=”房间面积”.TextMatrix(0,4 >=”床位数量”.TextMatrix(0,5 >=”是否有空调”.TextMatrix(0,6 >=”是否有电话”.TextMatrix(0,7 >=”是否有电视”.TextMatrix(0,8 >=”是否有卫生间”.TextMatrix(0,9 >=”房间单价”.FixedRows=1‘固定表头For i=0 To 9‘设置各列地对齐方式.ColAlignment(i>=0Next i.FillStyle=flexFillRepeat‘表头项居中.Col=0.Row=0.RowSel=1.ColSel=.Cols-1.CellAlignment=4.ColWidth(0>=300‘设置单元大小.ColWidth(1>=1000.ColWidth(2>=2000.ColWidth(3>=2000.ColWidth(4>=1000.ColWidth(5>=1000.ColWidth(6>=1000.ColWidth(7>=1000.ColWidth(8>=1000.ColWidth(9>=1000.Row=1End WithEnd SubPrivate Sub ShowData(> ‘调用 showData 函数 , 显示记录列表Dim i As IntegerSet mrc=ExecuteSQL(txtSQL,MsgText>‘根据需要设置SQL 语句 , 显示需要地记录 asfpsfpi4kWith msgList.Rows=1Do While Not mrc.EOF.Rows=Rows+1For i=1 To mrc.Fields.CountSelect Case mrc.Fields(i-1>.TypeCase adDBDate.TextMatrix(.Rows-1,i>=Format(mrc.Fields(i-1>&”” , ”yyyy -mm-dd”>ooeyYZTjj1Case Else.TextMatrix(.Rows-1,i>=mrc.Fields(i-1>&””End SelectNext iMrc.MoveNextLoopEnd Withmrc.CloseEnd SubPrivate Sub msgList_MouseUp(Button As Integer,Shift As Integer,x As Single,y As Single>‘选择记录 , 然后单击鼠标右键 , 触发MouseUp事件BkeGuInkxIIf Button=2 And Shift=0 ThenPopupMenu fMainFrom.menuRoomtypeEnd IfEnd SubPrivate Sub menuModifyroomtype_Click(>Dim intCount As IntegerIf flagTedit Then‘判断是否打开记录窗体If frmRoomtype.msgList.Rows>1 ThenfintTmode=2‘设置为修改状态intCount=frmRoomtype.msgList.Row‘记下选择记录frmRoomtype1.txtSQL= ”select*from roomtype where typeid ’”&Trim(frmRoomtype.msgList.TextMatrix(intCount,1>>& ”’”PgdO0sRlMofrmRoomtype1.ShowElseCall menuAddroomtype_ClickEnd IfElsefrmRoomtype.txtSQL= ”select*from roomtype ”frmRoomtype.ShowEnd IfEnd SubPrivate Sub From_Resize(>‘窗体变化时,调整标签和表格位置,使标签处于窗体地最上方 , 而表格始终处于标签下方3cdXwckm15If Me.WindowState<>vbMinimized And fMainFrom.WindowState<>vbMinimizedThen‘边界处理h8c52WOngMIf Me.Scaleheight<10*lblTitle.Height ThenExit SubEnd IfIf Me.ScaleWidth<lblTitle.Width+lblTitle.Width/2Then v4bdyGiousExit SubEnd IflblTitle.Top=lblTitle.Height ‘控制控件地位置lblTitle.Left=(Me.Width-lblTitle.Width>/2msgList.Top=lblTitle.Top+lblTitle.Height+lblTitle.Height/2J0bm4qMpJ9msgList.Width=Me.ScaleWidth-200msgList.Left=Me.ScaleLeft+100msgList.Height=Me.ScaleHeight-msgList.Top-200End IfEnd Sub⑷删除客房标准Private Sub menuDeleteroomtype_Click(>Dim txtSQL As StringDim intCount As IntegerDim mrc As ADODB.RecordsetDim MsgText AsString If flagTedit Then‘判断是否打开记录窗体If frmRoomtype.msgList.Rows>1 ThenIf MsgBox(“真地要删除这么?”, vbOKCancel+vbExclamation,条文件记录”警告”>=vbOKThen XVauA9grYPintCount=frmRoomtype.msgList.RowtxtSQL=”delete from roomtype wheretypeid ’” &Trim(frmR oomtype.msgList.TextMatrix(intCount,1>>& ”’”bR9C6TJscwSet mrc=ExecuteSQL(txtSQL,MsgText>Unload frmRoomtype‘关闭记录窗体frmRoomtype.txtSQL= ”select*from roomtype”‘重新选择所有记录frmRoomtype.ShowEnd IfEnd IfEnd IfEnd Sub⑸客房信息管理模块地创建客房信息管理模块主要实现如下功能:·添加客房信息·修改客房信息·删除客房信息·查询客房信息具体实现代码如下:Private Sub From_Load(>‘载入窗体时,自动添加客房信息种类Dim sSql As StringDim intCount As IntegerDim MsgText As StringDim mrcc As ADODB.RecordsetIf gintRmode=1 Then ‘判断是否处于添加状态Me.Caption=me.Caption& “添加”txtSQL=”select DISTINCT typename from roomtype ”Set mrc=ExecuteSQL(txtSQL,MsgText> If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0>.AddItem Trim(mrc.Fields(0>>mrc.MoveNextLoopcboItem(0>.ListIndex=0Else‘显示记录内容MsgBox “请先进行客房标准设置 ! ”,vbOKOnly+vbExclamation, “警告”cmdSave.Enabled=FalseExit SubEnd Ifmrc.CloseElseIf gintRmode=2 Then‘判断是否处于修改状态Set mrcc=ExecuteSQL(txtSQL,MsgText>‘设置SQL 语句显示当前选择记录pN9LBDdtrdIf mrcc.EOF=False ThenWith mrcctxtItem(0>=.Fields(0>For intCount=1 To 2If Not IsNull(.Fields(intCount+1>>Then‘ 判断内容是否为空txtItem(intCount>=.Fields(intCount+1>End IfNext intCounttxtItem(3>=.Fields(5>txtSQL=”select DISTINCT typename fromroomtype ”Set mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0>.AddItem Trim(mrc.Fields(0>>mrc.MoveNextLoopcboItem(0>.ListIndex=0ElseMsgBox“ 请先进行客房标准设置! ”,vbOKOnly+vbExclamation, “警告”cmdSave.Enabled=FalseExit SubEnd Ifmrc.CloseEnd WithEnd Ifmrcc.CloseMe.Caption=Me.Caption&“修改”End IfmblChange=FalseEnd SubPrivate Sub cmdSave_Click(>‘单击保存按钮触发事件Dim intCount As IntegerDim sMeg As StringDim mrcc As ADODB.RecordsetDim Msgtext As StringFor intCount=0 To 3If Trim(TxtItem(intCount>&”” >=””ThenSelect Case intCountCase 0sMeg=“客房编号”Case 1sMeg=“客房位置”End SelectsMeg=sMeg&“不能为空!”MsgBox sMeg,vbOKOnly+vbExclamation,“警告”txtItem(intCount>.SetFocusExit SubEnd IfNext intCountIf gintRmode=1 Then‘判断是否有重复记录txtSQL=”select*from rooms where roomNO=‘ ”&Trim(txtItem(0>>&”’” DJ8T7nHuGTSet mrc=ExecuteSQL(txtSQL,msgText>If mrc.EOF=False ThenMsgBox“已经存在此客房编号地记录!” ,vbOKOnly+vbExclamation, “警告”txtItem(0>.SetFocusExit SubEnd Ifmrc.CloseEnd IfIf gintRmode=2 Then‘判断是否处于修改状态txtSQL=”delete from rooms where roomNO=‘ ”&Trim(txtItem(0>>&”’” QF81D7bvUASet mrc=ExecuteSQL(txtSQL,MsgText>End IftxtSQL=”select*from rooms ”‘再加入新记录Set mrc=ExecuteSQL(txtSQL,MsgText>mrc.AddNew‘为数据库对象添加记录mrc.Fields(0>=Trim(txtItem(0>>mrc.Fields(1>=Trim(txtItem(0>>For intCount=1 To 2If Trim(txtItem(intCount>& ”” >=”” Thenmrc.Fields(intCount+1>=NullElsemrc.Fields(intCount+1>=Trim(txtItem(intCount>>End IfNext intCountmrc.Fields(4>=””mrc.Fields(5>=Trim(txtItem(3>>mrc.Updatemrc.CloseIf gintRmode=1 ThenFor intCount=0 To 3txtItem(intCount>=””Next intCountmblChange=FalseIf flagRedit ThenUnload frmRoomfrmRoom.txtSQL=”select*from rooms ”‘重新显示数据frmRoom.ShowEnd IfElseIf gintRmode=2 ThenUnload MeIf flagRedit ThenUnload frmRoomEnd IffrmRoom.txtSQL=”select*from rooms”frmRoom.ShowEnd IfEnd Sub·修改客房信息Private Sub menuModifyroom_Click(>‘选择修改房间信息,触menuModifyroom 地 Click事件,程序判断为修改状态后 , 首先删除原有记录 , 然后把新内容加入到数据库中4B7a9QFw9hDim intCount As IntegerIf flagRedit Then‘判断记录窗体是否打开If frmRoom.msgList.Rows>1 Then‘判断客房信息列表内容是否为空gintRmode=2‘设置为修改状态intCount=frmRoom.msgList.Row‘纪录当前记录位置frmRoom1.txtSQL=”select*from rooms whereroomNO=’” &Trim(frmRoom.msgList.TextMatrix(intCount,1>>&”’” ix6iFA8xoXfrmRoom1.ShowElseCall menuAddroom_Click‘添加记录End IfElsefrmRoom.txtSQL=”select*from rooms”frmRoom.ShowEnd IfEnd Sub·删除客房信息Private Sub menuDeleteroom_Click(>Dim txtSQL As StringDim intCount As IntegerDim mrc As ADODB.RecordsetDim MsgText As StringIf flagTedit ThenIf frmRoom.msgList.Rows>1 Then ‘判断客房信息列表内容是否为空 If MsgBox( “真地要删除这条文件记录么?” ,vbOKCancel+vbExclamation,“警告” >=vbOK Then wt6qbkCyDEintCount=frmRoom.msgList.Row‘记载当前记录位置txtSQL=”delete from rooms where roomNO=‘” &Trim(frmRoom.msgList.TextMatrix(intCount,1>&”’”Kp5zH46zRkSet mrc=ExecuteSQL(txtSQL,MsgText>‘执行删除操作Unload frmRoomfrmRoom.txtSQL=”select*from rooms ”frmRoom.ShowEnd IfEnd IfEnd IfEnd Sub·查询客房信息Private Sub From_Load(>‘载入窗体时,将自动加入所有记录地入库时间Dim i As IntegerDim j As IntegerDim sSql As StringDim txtSQL As StringDim MsgText As StringDim mrc As ADODB.Recordsettx tSQL=”select DISTINCT typename from roomtype ” ‘初始化客房种类Yl4HdOAA61Set mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFCombo1.AddItem Trim(mrc.Fields(0>>Mrc.MoveNextLoopCombo1.ListIndex=0ElseMsgBox “请先进行客房标准设置! ”,vbOKOnly+vbExclamation, ”警告”Exit SubEnd Ifmrc.CloseEnd SubPrivate Sub cmdOK_Click(>‘设置完查询内容和方式后,单击cmdOk按钮查询Dim sQSql As StringIf chkItem(0>.Value=vbChecked ThensQSql=”roomNO=’”&Trim(txtItem(0>& ””>&”’”End IfIf chkItem(1>.Value=vbChecked ThenIf Trim(sQSql&”” >=”” ThensQSql=”roomtype=’” &Trim(Combo1&”” >&”’”ElsesQSql=sQSql&”and roomtype= ’” &Trim(Combo1&”” >&”’”End IfEnd IfIf Trim(sQSql>=”” ThenMsgBox “请设置查询条件!” ,vbOKOnly+vbExclamation, “警告” Exit SubElseIf flagRedit ThenUnload frmRoomEnd IffrmRoom.txtSQL=”select*from rooms where ”&sQSqlfrmRoom.ShowEnd IfMe.HideEnd Sub⑹订房信息管理模块地创建订房信息管理模块主要实现如下功能:·查询剩余客房信息·添加订房信息·修改订房信息·删除订房信息·查询订房库信息具体实现代码如下:Private Sub From_Load(> ‘载入窗体时 , 程序将自动加入客房种类和客房单价Dim txtSQL As StringDim MsgText As StringDim mrc As ADODB.RecordsettxtSQL=”select distinct typename from roomtype”‘选择所有客房种类 ch4PJx4BlISet mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFCombo1(0>.AddItem mrc.Fields(0>mrc.MoveNextLoopEnd Ifmrc.ClosetxtSQL=”select distinct price from roomtype”Set mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFCombo1(1>.AddItem mrc.Fields(0>Combo1(2>.AddItem mrc.Fields(0>mrc.MoveNextLoopEnd Ifmrc.CloseEnd SubPrivate Sub cmdOK_Click(>Dim sQSql As StringIf chkItem(0>.Value=vbChecked ThensQSql=”roomtype=’” &Trim(Combo1(0>&”” >&”’” End ifIf chkItem(1>.Value=vbChecked ThenIf Trim(sQSql&”” >=”” ThenIf Trim(Combo1(1>&”” ><>”” AndTrim(Combo1(2>&”” ><>””qd3YfhxCzoThensQSql=”roomprice<= ’” &Trim(Combo1(1>&”” >&Androomprice >=’” &Trim(Combo1(2>&”” >”’”E836L11DO5ElseIf Trim(Combo1(1>&”” >=”” AndTrim(Combo1(2>&”” ><>”” Then S42ehLvE3MsQSql=”roomprice >= ’” &Trim(Combo1(2>&”” >&”’”ElseIf Trim(Combo1(1>&”” ><>”” And Trim(Combo1(2>&””=”” Then501nNvZFissQSql=”roomprice<= ’” &Trim(Combo1(1>&”” >&”’”End IfElseIf Trim(Combo1(1>&”” ><>”” AndTrim(Combo1(2>&”” ><>”” Then jW1viftGw9sQSql=sQSql&”androomprice>= ’” &Trim(Combo1(1>&”” >&”’ androomprice>=’” &Trim(Combo1(2>&”” >&”’” xS0DOYWHLPElseIf Trim(Combo1(1>&”” >=”” AndTrim(Combo1(2>&”” ><>””Then LOZMkIqI0w sQSql=sQSql&”androomprice>=’” &Trim(Combo1(2>&”” >&”’” ZKZUQsUJedElseIf Trim(Combo1(1>&”” ><>”” AndTrim(Combo1(2>&”” >=”” Then dGY2mcoKtTsQSql=sQSql&”androomprice<= ’” &Trim(Combo1(1>&”” >&”’”rCYbSWRLIAEnd IfEnd IfIf Trim(sQSql>=”” ThenMsgBox“请设置查询条件 ! ”,vbOKOnly+vbExclamation, “警告”Exit SubElseIf flagRedit ThenUnload frmRoomEnd IffrmRoom.txtSQL=”select*from rooms where”&sQSql&”andputup ”<>’y’”FyXjoFlMWhfrmRoom.ShowflagSedit=TrueEnd IfMe.HideEnd SubPrivate Sub From_Load(>‘添加订房信息,载入窗体时把所有未预定地客房信息加入其中TuWrUpPObXDim sSql As StringDim intCount As IntegerDim MsgText As StringIf flagSedit Then‘判断打开方式Set mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenFor intCount=0 To 3cboItem(intCount>.AddItem mrc.Fields(intCount>cboItem(intCount>.ListIndex=0Next intCounttxtItem(5>=mrc.Fields(5>End Ifmrc.ClosetxtNo=GetRkno(>gintBmode=1ElseIf gintBmode=1 ThenMe.Caption=Me.Caption&“添加”txtSQL=”select DISTINCT roomNO from rooms whereputup<>’y’”7qWAq9jPqESet mrc=ExecuteSQL(txtSQL.MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0>.AddItem Trim(mrc.Fields(0>>mrc.MoveNextLoopElseMsgBox“请先进行客房登记!” ,vbOKOnly+vbExclamation,“警告”cmdSave.Enabled=FalseExit SubEnd Ifmrc.ClosetxtNo=GetRknoElseIf gintBmode=2 ThenSet mrc.ExecuteSQL(txtSQL,MsgText>If mrc.EOF ThenWith mrctxtNO=!booknoFor intCount=0 To 1If Not IsNull(.Fields(intCount+1>> ThentxtItem(intCount>=.Fields(intCount+1>End IfNext intCountcboItem(0>.AddItem !roomnocboItem(0>.ListIndex=0For intCount=2 To 4If Not IsNull(.Fields(intCount+2>> ThentxtItem(intCount>=.Fields(intCount+2>End IfNext intCountEnd WithEnd Ifmrc.CloseMe.Caption=Me.Caption&“修改”txtSQL=”select*from rooms where roomNO=’”&Trim(cboItem(0>>& ”’”llVIWTNQFkSet mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenFor intCount=1 To 3cboItem(intCount>.AddItem mrc.Fields(intCount>cboItem(intCount>.ListIndex=0Next intCounttxtItem(5>=mrc.Fields(5>End Ifmrc.CloseEnd IfEnd IfmblChange=FalseEnd SubPrivate Sub cmdSave_Click(>‘添加记录到数据库中Dim intCount As IntegerDim sMeg As StringDim mrcc As ADODB.RecordsetDim MsgText As StringFor intCount=0 To 3‘判断输入内容是否为空If Trim(txtItem(intCount>&”” >=””ThenSelect Case intCountCase 0sMeg=“顾客姓名”Case 1sMeg=“身份证号码”Case 2sMeg=“折扣”Case 3sMeg=“入住时间”End SelectsMeg=sMeg&“不能为空 ! ”MsgBox sMeg,vbOKOnly+vbExclamation, “警告”txtItem(intCount>.SetFocusExit SubEnd IfNext intCountFor intCount=0 To 3If Trim(vboItem(intCount>&”” >=”” ThenSelect Case intCountCase 0sMeg=“客房编号”Case 1sMeg=“客房种类”Case 2sMeg=“客房位置”Case 3sMeg=“客房单价”End SelectsMeg=sMeg&“不能为空!”MsgBox sMeg,vbOKOnly+vbExclamation,“警告”cboItem(intCount>.SetFocusExit SubEnd IfNext intCountIf IsDate(txtItem(2>> ThentxtItem(2>=Format(txtItem(2>,”yyyy -mm-dd”>ElseMsgBox“入库时间应输入日期(yyyy-mm-dd>! ”,vbOKOnly+vbExclamation,”警告” yhUQsDgRT1txtItem(2>.SetFocusExit SubEnd IfFor intCount=1 To 3 Step 2If Not IsNumeric(txtItem(intCount>> ThenMsgBox“请输入数字” ,vbOKOnly+vbExclamation, “警告”txtItem(intCount>.SetFocusExit SubEnd IfNext intCountIf gintBmode =2 Thenwhere txtS QL=”delete from bookingbookno=’” &Trim(txtNo>& ”’”MdUZYnKS8ISet mrcc=ExecuteSQL(txtSQL,MsgText>End IftxtSQL=”select*from booking”Set mrcc=ExecuteSQL(txtSQL,MsgText>mrcc.AddNewmrcc.Fields(0>=txtNOFor intCount=0 To 1mrcc.Fields(intCount+1>=txtItem(intText>Next intCountmrcc.Fields(3>=cboItem(0>For intCount=2 To 4mrcc.Fields(intCount+2>=txtItem(intCount>Next intCountmrcc.Fields(8>=0mrcc.Updatemrcc.ClosetxtSQL=”select*from rooms where roomNO=’”&Trim(vboItem(0>>& ”’”09T7t6eTnoSet mrcc=ExecuteSQL(txtSQL,MsgText>If Not mrcc.EOf Thenmrcc!putup= ”y”End Ifmrcc.Updatemrcc.CloseIf gintBmode=1 ThenMsgBox“添加订房信息成功 ! ”,vbOKOnly+vbExclamation, “添加订房消息”Unload MeIf flagBedit ThenUnload frmBookinEnd IffrmBookin.txtSQL= ”selectbookno,customname,customID,roomno,indate,discount,inmemo from booking whereamount=’0’”e5TfZQIUB5frmBookin.ShowElseMsgBox “修改订房信息成功 ! ”,vbOKOnly+vbExclamation, “修改订房信息”Unload MeIf flagBedit ThenUnload frmBookinEnd IffrmBookin.txtSQL= ”selectbookno,customname,customID,roomno,indate,discount,inmemo from booking where amount=’0’”s1SovAcVQMfrmBookin.ShowEnd IfEnd Sub⑺结算信息管理模块地创建结算信息管理模块主要实现如下功能:·添加结算信息·修改结算信息·查询结算信息具体实现代码如下:Private Sub From_Load(>‘窗体载入时,自动加入所有未结算客房信息Dim sSql As StringDim intCount As IntegerDim MsgText As StringIf gintCmode=1 Then ‘判断是否处于添加状态Me.Caption=Me.Caption& “添加”txtSQL=”select DISTINCT roomno from booking whereamount=’0’”‘初始化客房编号 , 选择所有未结算客房编号GXRw1kFW5s Set mrc=ExecuteSQL(txtSQL,MsgText>If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0>.AddItem Trim(mrc!roomno>mrc.MoveNextLoopElseMsgBox“没有顾客入住 ! ”,vbOKOnly+vbExclamation, cmdSave.Enabled=FalseExit SubEnd Ifmrc.CloseElseIf gintCmode=2 Then‘判断是否处于修改状态Set mrc=ExecuteSQL(txtSQL,MsgText>If mrc.EOF=False ThenWith mrctxtNo =mrc.Fields(0>For intCount=0 To 1txtItem(intCount>=.Fields(intCount+1>Next intCountcboItem(0>.AddItem.fields(3>cboItem(0>.ListIndex=0For intCount=2 To 3If Not IsNull(.Fields(intCount+2>> ThentxtItem(intCount>=.Fields(intCount+2>End IfNext intCounttxtItem(5>=.Fields(6>txtItem(4>=.Fields(7>End WithEnd Ifmrc.ClosetxtSQL=”select*from rooms “警告”whereroomNO=’” &cboItem(0>&”’”UTREx49Xj9 Set mrc=ExecuteSQL(txtSQL,MsgText>If mrc.EOF=False ThenWith mrcFor intCount=1 To 3cboItem(intCount>.AddItem.Fields(intCount>cboItem(intCount>.ListIndex=0Next intCountEnd WithEnd If。
数据库课程设计酒店管理系统必过版
数据库课程设计酒店管理系统必过版酒店管理系统是一个非常重要的工具,它可以帮助酒店管理人员对酒店的各种信息进行管理和监控。
在现代社会中,越来越多的酒店开始使用酒店管理系统来提高酒店的效率和服务质量。
因此,数据库课程设计酒店管理系统必过版对于学生来说,是一个非常重要的项目,它不仅可以提高学生的数据库设计能力,还可以让学生更好地了解酒店管理系统的运作原理。
本文将对数据库课程设计酒店管理系统必过版进行详细介绍。
一、需求分析在设计酒店管理系统之前,我们首先需要进行需求分析,明确系统需要满足哪些功能。
在酒店管理中,主要需要考虑的功能包括客房管理、预定管理、餐饮管理、会议室管理、员工管理、财务管理等。
因此,在设计酒店管理系统时,我们需要考虑以下几个方面的需求:1.客房管理:客房管理包括客房登记、客房订单管理、客房状态管理等。
2.预定管理:酒店需要提供在线预订服务,包括客房预订、餐饮预订、会议室预订等。
3.餐饮管理:餐饮管理主要包括餐厅管理、餐饮订单管理等。
4.会议室管理:会议室管理包括会议室预订、会议室安排等。
5.员工管理:员工管理包括员工信息管理、员工工资管理、员工考勤管理等。
6.财务管理:财务管理包括营收管理、支出管理、财务报表管理等。
二、数据库设计在明确了系统需要满足的功能之后,我们需要进行数据库设计。
数据库是整个酒店管理系统的核心部分,它负责存储和管理所有的数据信息。
在设计数据库时,我们需要考虑以下几个方面:1.数据表设计:我们需要设计各种数据表来存储不同的信息,如客房信息表、预定信息表、餐饮信息表、会议室信息表、员工信息表、财务信息表等。
2.数据关系设计:各个数据表之间可能存在着复杂的关系,如一张客房订单表与一张客房表之间可能存在着一对多的关系等。
3.数据安全设计:数据库中存储的信息涉及到个人隐私等重要信息,因此我们需要采取相应的措施来保护数据安全。
三、系统实现在数据库设计完成之后,我们需要进行系统的实现。
数据库原理酒店管理系统设计课程设计报告
数据库管理系统(DBMS)是提供数据存储、访问、定义和 管理功能的软件系统,如MySQL、Oracle等。
数据库设计原则
概念设计
根据需求分析结果,设计数据库的概念模 型,包括实体、属性、关系和约束等。
需求分析
在设计数据库之前,需要对酒店管 理系统的需求进行详细分析,包括 功能需求、数据需求和性能需求等
数据库设计
根据需求分析,设计酒店管 理系统数据库,包括客房、 客人、员工、预订等表,并 定义表之间的关系。
功能模块实现
按照系统设计,逐步实现各 个功能模块,包括客房管理 、客人管理、员工管理、预 订管理等。
界面设计与实现
设计简洁、直观的用户界面 ,并实现与后端的交互。
系统测试方法
黑盒测试
通过输入测试用例,检查系统输出是否符合预期 结果,验证系统功能的正确性。
实现财务报表生成 、财务分析等功能 。
前台接待模块
实现客人入住登记 、离店结算等功能 。
餐饮管理模块
实现餐厅预订、点 餐、结账等功能。
系统管理模块
实现用户管理、权 限管理、日志管理 等功能。
05
系统实现与测试
系统实现过程
系统架构搭建
采用B/S架构,前端使用 HTML、CSS、JavaScript等 技术,后端使用Java语言, 数据库采用MySQL。
。
A
B
C
D
物理设计
确定数据库的物理存储结构,包括数据的 存储方式、存储设备的选择和配置等。
逻辑设计
将概念模型转换为数据库的逻辑模型,包 括表、字段、索引和视图等数据库对象的 定义。
数据库在酒店管理系统中的作用
数据存储
数据库用于存储酒店管理系统中的各种数 据,如客人信息、房间信息、预订信息、
酒店管理系统的数据库设计
目录:一.概念结构设计二.数据字典三.E-R图四.数据库逻辑结构设计一.概念结构设计建立一个酒店前台管理系统,方便酒店的信息管理和部门管理。
该前台管理系统要求具备以下几个主要功能1.登记客人的基本信息,进行客房分配,建立客人账单和客人在店数据文件;2.计算客人的购物,餐饮消费;3.计算客人的总消费金额,以便结账处理;4.保留熟客的历史档案信息。
二.数据字典客 户 信 息项数据类型 长度 含义说明性别 字符型 20 身份标识 姓名 字符型10性别标识 年龄 整形10身份证号码 整形50身份验证联系方式 整形50联系方式入住日期 日期型8名称 编号 组成 数据量 存取频率房源信息D2房号,楼层,状态,已预定,已清理.....500 不定期客户在店 D3门卡号,姓名,性别,证件号,入住日期.....200 不定期客户消费D4项目编号,类型,项目名,价格,计量单位....1000 不定期房型类 D6类别,名称,普通价,优惠价.....30 固定价格表D8编号,名称,类别,细目,价格.....100 固定三.E-R 图1.入住单预付款操作员姓名结算方式入住天数门卡号2.客户消费项目编号门卡号项目名计量单位预付款金额3.房型表优惠价普通价类别名称长包价4.房源信息楼层状态已清理已预定房号5.客户在店门卡号性别入住日期姓名证件号电话6.总E-R 图入住单房源信息房型表客户在店客户消费分配对应选择门卡号预付款入住天数操作员姓名结算方式已入住已清理已预订状态房号楼层占用普通价类别长包价优惠价名称登记门卡号性别入住日期姓名证件号电话数量时间项目编码金额预付款计量单位项目名门卡号四.数据库逻辑结构设计客户在店(门卡号 ,证件号,姓名,性别,入住日期,电)话 .....顾客消费(项目编码,门卡号,项目名,金额,计量单位,预付款....)入住单(门卡号,姓名,预付款,结算方式,入住天数,操作员.....))房源信息(房号,楼层,状态,已预定,已清理.....)房型表(类别,名称,普通价,长包价,优惠价.....。
数据库设计_酒店管理系统
数据库设计_酒店管理系统酒店管理系统数据库设计是一个关键的环节,合理的数据库设计能够提高酒店管理系统的性能和效率。
一个高效的酒店管理系统数据库设计应该包含以下内容:一、酒店管理系统的实体分析酒店管理系统的实体包括:酒店、客房、员工、顾客、订单等。
通过对这些实体进行分析,可以确定每个实体的属性和关系。
1.酒店实体2.客房实体客房实体包含以下属性:客房ID、客房类型、客房价格、客房状态等。
客房与酒店之间是多对一的关系,即一个酒店可以有多个客房,但一个客房只属于一个酒店。
3.员工实体员工实体包含以下属性:员工ID、员工姓名、员工职位、员工工资等。
员工与酒店之间是多对一的关系,即一个酒店可以有多个员工,但一个员工只属于一个酒店。
4.顾客实体5.订单实体订单实体包含以下属性:订单ID、顾客ID、酒店ID、客房ID、订单状态等。
订单与顾客、酒店和客房之间是多对一的关系,即一个订单属于一个顾客、一个酒店和一个客房。
二、酒店管理系统的关系分析通过对实体之间的关系进行分析,可以确定各个实体之间的关系。
1.酒店与客房之间的关系一个酒店可以有多个客房,一个客房只属于一个酒店,这是一对多的关系。
酒店与客房之间通过酒店ID进行关联。
2.酒店与员工之间的关系一个酒店可以有多个员工,一个员工只属于一个酒店,这是一对多的关系。
酒店与员工之间通过酒店ID进行关联。
3.订单与顾客之间的关系一个订单属于一个顾客,一个顾客可以有多个订单,这是一对多的关系。
订单与顾客之间通过顾客ID进行关联。
4.订单与酒店之间的关系一个订单属于一个酒店,一个酒店可以有多个订单,这是一对多的关系。
订单与酒店之间通过酒店ID进行关联。
5.订单与客房之间的关系一个订单属于一个客房,一个客房可以有多个订单,这是一对多的关系。
订单与客房之间通过客房ID进行关联。
三、酒店管理系统的数据表设计根据以上的实体分析和关系分析,可以设计出数据库的数据表。
1.酒店表2.客房表字段:客房ID、客房类型、客房价格、客房状态、酒店ID等。
酒店管理数据库课程设计
酒店管理数据库课程设计一、课程目标知识目标:1. 理解数据库在酒店管理中的重要性,掌握数据库的基本概念和术语。
2. 学会使用数据库管理系统(如MySQL)进行基本的数据库操作,包括数据查询、插入、更新和删除。
3. 掌握数据库设计的原则和方法,能够根据酒店管理需求设计合理的数据库结构。
技能目标:1. 能够运用数据库管理系统进行酒店信息数据的存储、检索和管理。
2. 掌握SQL语言,能够编写简单的查询语句,满足酒店管理中的数据查询需求。
3. 能够运用数据库设计工具,绘制E-R图,为酒店管理系统的开发提供技术支持。
情感态度价值观目标:1. 培养学生对酒店管理专业的兴趣,激发他们主动探索数据库技术在酒店行业中应用的热情。
2. 培养学生的团队协作意识,使他们学会在数据库设计和操作过程中与他人沟通、合作。
3. 增强学生的信息意识,使他们认识到数据在酒店管理中的价值,养成良好的数据管理和保护意识。
本课程针对高年级学生,他们在前期的学习中已经掌握了计算机基础和酒店管理基本理论,具备一定的实际操作能力。
课程性质为理论与实践相结合,旨在通过实际操作,让学生将数据库知识应用于酒店管理领域。
教学要求注重培养学生的动手能力、分析问题和解决问题的能力,以便他们在未来工作中能够更好地应对酒店管理中的数据挑战。
通过本课程的学习,学生将具备酒店管理数据库设计与操作的基本能力,为从事相关工作奠定基础。
二、教学内容1. 数据库基本概念:介绍数据库的定义、发展历程、分类及其在酒店管理中的应用场景。
教材章节:第一章 数据库基础2. 数据库管理系统:学习MySQL数据库的安装、配置以及基本操作。
教材章节:第二章 数据库管理系统3. SQL语言:讲解SQL语言的语法,包括数据查询、插入、更新、删除等操作。
教材章节:第三章 SQL语言4. 数据库设计:介绍数据库设计原则、方法,学习如何绘制E-R图,以及如何将酒店管理需求转化为数据库结构。
教材章节:第四章 数据库设计5. 酒店管理数据库实例分析:通过实际案例,分析酒店管理数据库的设计与操作。
数据库课程设计宾馆客房信息管理系统
一、设计内容与设计要求1.设计内容:数据库系统原理的课程设计要求学生综合利用本课程的有关知识,在教师的指导下,利用特定的数据库设计环境,针对具体的问题,完成从系统的需求分析、数据库的概念设计、数据库的逻辑设计,到数据库实现等设计过程,最终实现一个较为完整的反映应用需求的数据库系统。
因此,在设计中,要求学生应该全面考虑各个设计环节以及它们之间的相互联系。
下面是各个设计阶段的具体内容。
⒈系统需求分析需求分析是数据库系统设计的一个重要的环节。
本阶段应该对整个应用情况作全面的、详细的调查,确定特定数据库应用环境下的设计目标,收集该应用环境下针对系统设计所需要的基础数据以及对这些数据的具体存储要求,从而确定用户的需求。
用户对数据库的需求包括:⑴处理需求。
即用户要完成什么处理功能等。
学生在设计中应根据具体的课题要求确定系统应该实现的功能,一些基本的功能通常是必须具备的,如用户的管理与维护,基本数据的维护,灵活的信息查询等。
⑵信息需求。
即在数据库中需要存储哪些数据。
学生应该根据具体的课题,认真分析有关的要求,确定本设计的信息需求。
⑶安全性和完整性功能。
实践中这是一个需要与用户不断交流才能逐步确定的需求。
本课程设计要求学生在自己的设计中能反映出基本的安全性和完整性功能。
本阶段的设计结果(即系统需求分析)应该在课程设计报告中进行详细描述,画出系统的数据流图,写出较为详细的数据字典,作为本课程设计的验收依据之一。
⒉数据库的概念设计数据库的概念设计是在需求分析的基础上,利用与用户双方都能理解的形式,设计出数据库的概念模型。
本课程设计要求学生采用E-R 方法进行数据库的概念设计。
本设计阶段可分为:• 数据抽象。
即根据需求分析的结果,抽取出与本课程设计相关的特性。
设计局部概念模式。
运用E-R 方法,设计出系统的各个局部ER 模型。
• 设计全局概念模式。
通过对局部E-R 模型的操作,解决各个E-R 模型关于对象定义不一致问题,以及对各个E-R 模型进行合并优化等,最终形成数据库的全局概念模式。
数据库课程设计(酒店管理系统)
数据库系统课程设计报告题目: 酒店管理系统课程代号: 0680036课程名称:数据库系统课程设计学号:姓名:班级:指导教师完成日期:2011年4月目录第一章引言第二章系统分析与设计2.1需求分析2.2结构设计2.3数据库设计第三章系统开发及实现3.1 创建主窗体3.2 创建子窗体3.3 建立公共模块第四章总结参考文献附录(附部分源代码)第一章引言酒店管理系统是现代服务行业不可缺少的一个组成环节。
酒店管理信息系统是一个由人、计算机和数据库组成的进行酒店经营管理的系统,通过对信息的收集、传递、整理、加工、维护和使用,提高管理水平和效率,从而实现酒店管理的自动化、规范化和人性化。
本文简要介绍了基于Microsoft和VB程序语言开发实现的酒店管理系统,着重阐述了该系统开发实现过程,从系统的需求分析、方案论证、模块设计、数据设计、详细设计到系统测试等各个环节都进行了较为详尽的分析和描述。
关键词:酒店管理系统、Access、数据库、VB第二章系统分析与设计2.1需求分析在进行一个项目的设计之前,首先要进行必要的需求分析。
酒店需要管理各种人员和入住信息,希望实现酒店的信息化管理,通过建立一个酒店管理系统来管理酒店的日常业务。
其完成功能如下:1、能够实现对客人的登记信息查询,包括逐个浏览,以及对客人资料的增加、删除和编辑操作。
2、能够的酒店人员值班情况进行管理。
3、管理人员也可以直接增加和删除用户信息。
系统功能模块图如图1所示。
图1 系统的功能模块图根据功能模块图设计划出的实体有散客入住实体、团队入住实体、投诉管理实体、值班管理实体。
散客入住实体E-R如图2所示。
团队入住实体E-R如图3所示投诉管理实体E-R图如图4所示值班管理实体E-R图如图5所示图2 散客入住实体E-R图图3 团队入住实体E-R图图4 投诉管理实体E-R图图5 值班管理实体E-R图2.2结构设计使用windows操作系统、开发维护系统即visual basic软件系统、一套数据库系统Access即可。
酒店管理系统数据库课程设计
酒店管理系统数据库课程设计1. 引言随着社会经济的发展,旅游业蓬勃发展,酒店行业也迅速兴起。
传统的手动管理方式已经不能满足酒店的日常运营需求,因此,开发一个高效、可靠的酒店管理系统是至关重要的。
酒店管理系统数据库课程设计旨在介绍如何设计和实现这样一个系统。
2. 系统需求分析2.1 功能需求•酒店客房管理:包括客房信息管理、价格设定、客房状态管理等功能。
•预订管理:允许客户在线预订客房,并能够根据客户需求进行自动匹配。
•入住管理:管理客户入住信息,包括登记、分配房间、入住、退房等操作。
•订单管理:处理客户预订和入住订单,包括生成订单、修改订单、取消订单等。
•财务管理:统计和管理客房收入、客户付款记录等财务信息。
•销售报表:生成各类报表,如入住率报表、销售额报表等,以帮助酒店管理者做出决策。
2.2 数据库需求•客户信息表:包括客户ID、姓名、性别、联系电话、证件号码等字段。
•客房信息表:包括客房ID、类型、价格、状态等字段。
•订单信息表:包括订单ID、客户ID、客房ID、入住日期、离店日期等字段。
•支付信息表:包括订单ID、支付方式、付款金额、付款日期等字段。
3. 数据库设计3.1 实体关系模型3.2 数据库表设计3.2.1 客户信息表字段名数据类型描述customer_id int 客户ID,主键name varchar 姓名gender varchar 性别phone varchar 联系电话id_number varchar 证件号码………3.2.2 客房信息表字段名数据类型描述room_id int 客房ID,主键type varchar 类型price decimal 价格status varchar 状态………3.2.3 订单信息表字段名数据类型描述order_id int 订单ID,主键customer_id int 客户ID,外键room_id int 客房ID,外键check_in date 入住日期check_out date 离店日期………3.2.4 支付信息表字段名数据类型描述payment_id int 支付ID,主键order_id int 订单ID,外键method varchar 支付方式amount decimal 付款金额date date 付款日期………4. 系统实现4.1 系统架构酒店管理系统采用客户端-服务器模式进行设计和实现。
数据库课程设计酒店管理系统新编
目录第一章需求分析1、系统功能分析随着我国市场经济的迅速发展和人民生活水平的不断提高,宾馆酒店业的竞争越来越激烈。
要想在竞争中取得优势,必须在经营管理中取得优势,必须在经营管理、产品服务等方面提高服务管理意识。
而对客房的经营起决定作用的是客房的管理。
如何利用先进的管理手段,提高客房的管理水平,是每一酒店管理者所面临的重要课题。
简单的服务标准已不是制胜的锦囊,只有管理做到最细微之处才能让顾客体会到酒店服务的高标准,高质量。
而准确、快捷、周全往往就是最基本的成功要素。
面对信息时代的挑战,利用技术手段提高企业管理无疑是一条行之有效的途径。
因此采用电脑管理业务、财务等诸多环节已成为推动宾馆酒店业快速发展的先决条件。
本系统利用信息技术提高宾馆酒店管理水平,主要是管理宾馆的日常业务。
希望通过本系统的开发,对宾馆的客房、客人、帐务及各种收费进行系统管理。
客房管理要实现客房预定、客房、追加押金、客人调房、房态设置等功能。
客人管理要实现宿费预警(住宿费超过押金时预警,提示前台要求客人补交押金)、客人挂帐、优惠结帐等功能,满足多种需求。
使用本系统可大幅度提高业务部门的工作效率。
根据该宾馆的具体情况,系统主要的功能包括:对客房信息、客房类型信息、员工信息的保存,增加,修改,删除,查询。
对客房预定、住宿登记、换房登记、调房登记、退房登记、结帐信息的保存,增加,修改,删除,查询。
对本单位定义、业务部门定义、操作员管理、权限设置。
2、系统功能模块设计根据需求功能分析,我们将设计以下三个功能模块。
基础设置:保存客房信息、客房类型信息、客户基本信息。
前台管理:保存客房预定、住宿登记、结帐信息。
房态管理:保存房屋状态信息。
功能模块图如图1-2-1所示图1-2-1第二章数据库设计1、E-R图酒店管理系统E-R图,涉及预订客户信息、客户信息、客房类型、客房信息四个实体,预订客户和客房之间存在预订联系,客房类型和客房存在属于联系,客房和客户存在入住联系。
数据库课程设计宾馆信息管理系统
数据库课程设计报告宾馆信息管理系统数据库课程设计报告-------宾馆信息管理系统计算机科学与技术学院 08 级电子商务专业一、系统开发平台题目:酒店信息管理预订系统开发语言:Java Eclipse /netbeans后台数据库管理系统:SQL Server 2000 操作系统:windows xp二、数据库规划2.1 任务陈述引言客房管理系统是典型的信息管理系统的一部份,而且是必不可少的一部份。
其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。
对于前者要求建立起简洁且资料一致性和完整性强、资料安全性好的数据库。
而对于后者则要求应用程序功能完备,易使用等特点。
酒店客房管理系统的内容对于经营的决策者和管理者来说都至关重要,所以客房管理系统、信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。
但一直以来人们使用传统人工的方式管理文件档案,这种管理方式存在着许多弊端,如:效率低、保密性差,容易出现差错等,且对于查询空房间及已定房间等极为不方便。
在当今时代,这些完全可以改用计算机来代替人的手工操作。
作为计算机及网络应用的一部分,使用计算机对客房信息进行管理,具有手工管理所无法比拟的优点。
例如:检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低等。
这些优点能够极大地提高客房经营管理的效率,也是企业的科学化、正规化管理,与世界接轨的重要条件。
且办事效率也是决定收入的一个关键因素。
因此,我选择的酒店客房管理系统设计,力求开发出一套界面友好,功能强大,使用简单的适用于各大、中、小规模的酒店客房的管理系统。
同时也是一款完全适合宾馆或旅馆酒店客房管理傻瓜式日常业务管理的软件。
酒店系统由前台和后台管理两个部分组成。
前台作为与前台服务员直接交互的可视化界面,由于使用方便,能将系统的各个功能提供给他们,以帮助服务员进行客房管理。
前台在考虑功能实现的同时,也考虑了操作的简洁和方便性,目的是让大多数客户能够轻松地享受电子商务给他们带来的便利。
数据库酒店管理系统课程设计
实验题目题目8:酒店管理系统数据库的设计与实现描述:设计一个酒店管理系统,实现下列功能:1.酒店客房信息维护(包括录入,修改和删除);2.客人信息维护(包括录入,修改和删除;)3.入住信息登记;酒店管理系统关系模式:房号(房间号,类型,状态,价格,位置,床位数)入住信息(房间号,证件号,姓名,性别,入住日期)退房信息(房间号,证件号,结算日期,应付金额)旅客(证件类型,证件号,姓名,性别,年龄,籍贯,现住址,职业)使用(物品号,证件号,姓名,使用日期,押金)物品(物品号,数量,价格,用途)E—-—R 图一:创建酒店管理系统数据库create database 酒店管理系统/* 创建酒店管理系统数据库*/ 二:创建客房信息表并添加数据create table 客房/* 创建客房信息表*/(房间号char(8)primary key,类型varchar(16)not null,状态char(8)not null,价格smallmoney not null,位置varchar(14)not null,床位数int check(床位数>0)not null)insert into 客房values(’101',’普通间','在使用',50,’三楼’,2)insert into 客房values('102','普通间’,'在使用',40,'三楼',1)insert into 客房values(’103',’空调间','未使用’,80,'三楼’,2)insert into 客房values(’104',’空调间’,’在使用’,60,'二楼',1)insert into 客房values('105’,’豪华间’,'在使用',200,'二楼',2)insert into 客房values('106','豪华间',’在使用’,180,’一楼',1)insert into 客房values(’107',’贵宾间','未使用’,300,’一楼’,1)insert into 客房values(’108',’贵宾间’,'在使用',400,'一楼’,2)所建的表为:101 普通间在使用50。
酒店管理系统数据库课程设计
酒店管理系统数据库课程设计一、引言随着旅游业的发展和人们生活水平的提高,酒店行业也日益繁荣。
酒店管理系统在其中起到了至关重要的作用。
本文将就酒店管理系统数据库课程设计进行详细阐述。
二、需求分析1.功能需求(1)客房预订:客户可以通过系统查询房间信息并进行预订。
(2)入住登记:客户到达酒店后进行登记入住,前台工作人员需要记录客户信息。
(3)结账退房:客户离开酒店时需要结账退房,前台工作人员需要计算费用并记录信息。
(4)库存管理:对于酒店内部物品的管理,如清洁用品、床上用品等。
(5)权限管理:根据工作职责划分不同的权限,保证系统安全性。
2.性能需求(1)响应速度:系统需要快速响应用户操作请求。
(2)可靠性:系统需要保证数据的准确性和完整性,同时避免数据丢失或损坏。
(3)易用性:界面简洁明了,操作简单易懂。
三、数据库设计1.实体关系模型设计根据需求分析中提到的功能需求,我们可以设计出如下实体关系模型:2.数据表设计(1)客户信息表:包含客户姓名、身份证号、电话等基本信息。
(2)房间信息表:包含房间号、房型、价格等基本信息。
(3)订单信息表:包含订单号、客户姓名、房间号、入住时间、离店时间等基本信息。
(4)消费记录表:包含消费编号、订单号、消费类型、金额等基本信息。
(5)库存管理表:包含物品名称、数量、单位等基本信息。
四、系统实现1.系统架构采用B/S架构,前端使用HTML+CSS+JavaScript,后端使用Java语言,数据库使用MySQL。
2.页面设计根据需求分析中提到的易用性需求,我们可以设计出简洁明了的页面。
如下图所示:3.代码实现(1)客房预订功能实现:用户输入预订日期和房型,系统查询可用房间并展示在页面上。
用户选择后提交订单即可完成预订。
(2)入住登记功能实现:前台工作人员输入客户身份证号和入住日期,系统自动生成订单并记录客户信息。
(3)结账退房功能实现:前台工作人员输入客户身份证号和离店日期,系统自动计算费用并生成消费记录。
C#数据库课程设计酒店管理系统
酒店管理系统学院:XXXXX专业:XXXXX班级:XXXXX学号:XXXXX姓名:XXXXX第一章绪论1.1 选题背景随着中国经济的腾飞,人民生活水平的不断进步,旅游已经成为当今人们生活、娱乐、休闲的一个主题。
旅游行业的日趋火爆,同时加速了宾馆行业的整体发展。
宾馆行业充满了激烈的市场竞争,在改革开放一来,我国的宾馆行业迅速发展,成为具有一定规模的第三产业,充满了广阔的市场前景和拥有良好的发展趋势。
在未使用计算机软件对宾馆客房采用传统的管理方式时,通常使用手工处理账务,存在去多现金流失的漏洞,且人工查房不能及时、准确的获得房间是否处于空闲或者被预定状态的信息。
相反的,如借助计算机系统,可是结账既准确又快速,并能在第一时间得知房间的状态信息。
因此,要想使宾馆的工作质量和效率提高,采用先进的计算机网络和通信技术改变酒店业务模式,实现酒店业务管理的自动化已经成为一种必然。
1.2研究现状国内的宾馆计算机管理系统于上世纪80年代初起步,到了80年代中后期,随着国外宾馆计算机系统和先进管理技术的大规模引进,进一步促进了我国宾馆管理技术的发展。
国内宾馆管理系统正是在充分吸收国外管理系统的精华,结合国内实际的情况下逐步发展成熟,到90年代初期形成了几个较成熟的软件系统,同时产生了许多专职从事宾馆计算机管理系统的公司。
到了90年代中期,随着计算机在饭店中的普及应用,以及计算机技术的不断发展,宾馆计算机系统的发展到了一个新的时期,新的系统平台、新的软件功能、新的系统特点及发展方向不断涌现。
国内最早的宾馆管理软件仅简单运用于前台接待、排房、结帐、查询等基本服务,发展至今,较为成熟的宾馆管理系统已具备前台管理、餐饮娱乐管理、客户管理、财务管理、物业管理等多项管理功能。
综上所述我国宾馆管理软件的功能发展有如下几大趋势:(1). 软件产品集成化(2). 操作界面人性化(3). 注重客户关系管理(4). 从数据处理型向决策型发展(5). 系统开放化(6). 增值产品/服务功能增加(7). 支持电子商务(8).宾馆集团型管理软件1.3项目意义随着世界经济全球化进程的加快,在这个信息“爆炸”的电子商务时代,掌握了信息技术的主动权,便率先拥有了商机。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
《数据库》课程设计课题酒店管理系统班级0904学号34姓名罗浩成绩2010年10 月30 日酒店管理信息系统⒈编写目的酒店在正常的运营中需要对客房资源、顾客信息、结算信息进行管理,利用宾馆管理信息系统及时了解各个环节中信息的变更,有利于提高管理效率。
⒉系统功能分析系统开发的总体任务是实现宾馆各种信息的系统化、规范化和自动化。
主要完成功能:●有关客房标准的制定、标准信息的输入,包括标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视机、电话以及单独卫生间等。
●客房标准信息的修改、查询等。
●客房基本信息的输入,包括客房编号、客房类型、客房位置、客房单价、备注等。
●客房基本信息的查询、修改,包括客房编号、客房类型、客房位置、客房单价、备注等。
●剩余客房信息的查询等。
●订房信息的输入,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等。
●订房信息的修改和查询,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、备注信息等。
●结算信息的输入,包括客房编号、客房种类、位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结算日期、备注信息等。
●结算信息的修改和查询,包括客房编号、客房种类、客房位置、客房单价、顾客姓名、顾客身份证号码、入住日期、折扣、结日期、备注信息等。
⒊系统功能模块设计按结构化程序设计思想,分析得出如下系统功能模块图图Ⅰ系统功能模块图⒋数据库设计数据库设计步骤:●数据库需求分析●数据库概念结构设计●数据库逻辑结构设计①数据库需求分析分析调查有关宾馆管理信息需求的基础上得本系统所处理的数据流程图Ⅱ宾馆管理信息系统数据流程图针对一般宾馆管理信息系统的需求,通过对宾馆管理过程的内容和流程分析,设计如下面所示的数据项和数据结构:●客房标准信息,包括的数据项有:标准编号、标准名称、房间面积、床位数量、住房单价、是否有空调、电视、电话、单独卫生间等。
●客房信息,包括的数据项有:客房编号、客房种类、客房位置、客房单价、备注等。
●订房信息,包括的数据项有:订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、备注等。
●结算信息,包括的数据项有:订房编号、客房编号、客房种类、客房位置、客房备注信息、顾客姓名、顾客身份证号码、入住时间、折扣、结算时间、备注等。
②数据库概念结构设计本系统根据以上的设计规划出的实体有:客房标准信息实体、客房信息实体、订房信息实体、结算信息实体。
各个实体具体的描述E-R图如下:客房标准信息实体E-R图客房信息实体E-R图订房信息实体E-R图结算信息实体E-R图实体之间关系E-R图③数据库逻辑结构设计首先将宾馆管理信息系统的数据库概念结构转化为SQL 2000数据库系统所支⒌数据库结构的实现利用SQL 2000数据库系统中的查询分析实现数据库的逻辑结构,其表格如下:创建系统用户表格 user_InfoCREATE TABLE [dbo].[user_Info1]([user_ID][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[user_PWD] [char] (10) COLLATE Chinese_PRC_CI_AS NULL,[user_Des] [char](10) COLLATE Chinese_PRC_CI_AS NULL) ON [PRIMARY]创建客房标准信息表格roomtypeCREATE TABLE [dbo].[roomtype]([typeid][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[typename][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[area][numeric](5,0) NULL,[bednum][numeric](2,0) NULL,[haircondition][char](2) COLLATE Chinese_PRC_CI_AS NULL,[htelephone][char](2) COLLATE Chinese_PRC_CI_AS NULL,[htelevision][char](2) COLLATE Chinese_PRC_CI_AS NULL,[htoilet][char](2) COLLATE Chinese_PRC_CI_AS NULL,[price][numeric](10,2)NULL) ON [PRIMARY]创建客房信息表格roomsCREATE TABLE [dbo].[rooms]([roomNO][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[roomtype][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[roomposition][char](20) COLLATE Chinese_PRC_CI_AS NULL,[roomprice][numeric](10,2) NULL,[putup][char](2) COLLATE Chinese_PRC_CI_AS NOT NULL,[roommemo][text] COLLATE Chinese_PRC_CI_AS NULL) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]创建订房信息表bookinCREATE TABLE [dbo].[bookin]([bookno][char](14) COLLATE Chinese_PRC_CI_AS NOT NULL,[customname][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[customID][char](18) COLLATE Chinese_PRC_CI_AS NOT NULL,[roomno][char](10) COLLATE Chinese_PRC_CI_AS NOT NULL,[indate][datetime] NULL,[discount][numeric](2,0) NULL,[inmemo][text] COLLATE Chinese_PRC_CI_AS NULL,[checkdate][datetime] NULL,[ammount][numeric](10,2) NULL) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]⒍宾馆管理信息系统具体程序实现客房信息管理模块的创建客房信息管理模块主要实现如下功能:·添加客房信息·修改客房信息·删除客房信息·查询客房信息具体实现代码如下:Private Sub From_Load()‘载入窗体时,自动添加客房信息种类Dim sSql As StringDim intCount As IntegerDim MsgText As StringDim mrcc As ADODB.RecordsetIf gintRmode=1 Then ‘判断是否处于添加状态Me.Caption=me.Caption&“添加”txtSQL=”select DISTINCT typename from roomtype”Set mrc=ExecuteSQL(txtSQL,MsgText)If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0).AddItem Trim(mrc.Fields(0))mrc.MoveNextLoopcboItem(0).ListIndex=0‘显示记录内容ElseMsgBox “请先进行客房标准设置!”,vbOKOnly+vbExclamation,“警告”cmdSave.Enabled=FalseExit SubEnd Ifmrc.CloseElseIf gintRmode=2 Then ‘判断是否处于修改状态Set mrcc=ExecuteSQL(txtSQL,MsgText)‘设置SQL语句显示当前选择记录If mrcc.EOF=False ThenWith mrcctxtItem(0)=.Fields(0)For intCount=1 To 2If Not IsNull(.Fields(intCount+1))Then‘判断内容是否为空txtItem(intCount)=.Fields(intCount+1)End IfNext intCounttxtItem(3)=.Fields(5)txtSQL=”select DISTINCT typename from roomtype” Set mrc=ExecuteSQL(txtSQL,MsgText)If Not mrc.EOF ThenDo While Not mrc.EOFcboItem(0).AddItem Trim(mrc.Fields(0))mrc.MoveNextLoopcboItem(0).ListIndex=0ElseMsgBox“请先进行客房标准设置!”,vbOKOnly+vbExclamation,“警告” cmdSave.Enabled=FalseExit SubEnd Ifmrc.CloseEnd WithEnd Ifmrcc.CloseMe.Caption=Me.Caption&“修改”End IfmblChange=FalseEnd SubPrivate Sub cmdSave_Click()‘单击保存按钮触发事件Dim intCount As IntegerDim sMeg As StringDim mrcc As ADODB.RecordsetDim Msgtext As StringFor intCount=0 To 3If Trim(TxtItem(intCount)&””)=”” ThenSelect Case intCountCase 0sMeg=“客房编号”Case 1sMeg=“客房位置”End SelectsMeg=sMeg&“不能为空!”MsgBox sMeg,vbOKOnly+vbExclamation,“警告”txtItem(intCount).SetFocusExit SubEnd IfNext intCountIf gintRmode=1 Then‘判断是否有重复记录txtSQL=”select * from rooms where roomNO=‘”&Trim(txtItem(0))&”’”Set mrc=ExecuteSQL(txtSQL,msgText)If mrc.EOF=False ThenMsgBox “已经存在此客房编号的记录!”,vbOKOnly+vbExclamation,“警告”txtItem(0).SetFocusExit SubEnd Ifmrc.CloseEnd IfIf gintRmode=2 Then ‘判断是否处于修改状态txtSQL=”delete from rooms where roomNO=‘”&Trim(txtItem(0))&”’” Set mrc=ExecuteSQL(txtSQL,MsgText)End IftxtSQL=”select*from rooms”‘再加入新记录Set mrc=ExecuteSQL(txtSQL,MsgText)mrc.AddNew‘为数据库对象添加记录mrc.Fields(0)=Trim(txtItem(0))mrc.Fields(1)=Trim(txtItem(0))For intCount=1 To 2If Trim(txtItem(intCount)&””)=”” Thenmrc.Fields(intCount+1)=NullElsemrc.Fields(intCount+1)=Trim(txtItem(intCount))End IfNext intCountmrc.Fields(4)=””mrc.Fields(5)=Trim(txtItem(3))mrc.Updatemrc.CloseIf gintRmode=1 ThenFor intCount=0 To 3txtItem(intCount)=””Next intCountmblChange=FalseIf flagRedit ThenUnload frmRoomfrmRoom.txtSQL=”select*from rooms”‘重新显示数据frmRoom.ShowEnd IfElseIf gintRmode=2 ThenUnload MeIf flagRedit ThenUnload frmRoomEnd IffrmRoom.txtSQL=”select*from rooms”frmRoom.ShowEnd IfEnd Sub·修改客房信息Private Sub menuModifyroom_Click()‘选择修改房间信息,触menuModifyroom的Click事件,程序判断为修改状态后,首先删除原有记录,然后把新内容加入到数据库中Dim intCount As IntegerIf flagRedit Then ‘判断记录窗体是否打开If frmRoom.msgList.Rows>1 Then‘判断客房信息列表内容是否为空gintRmode=2‘设置为修改状态intCount=frmRoom.msgList.Row‘纪录当前记录位置frmRoom1.txtSQL=”select*from rooms where roomNO=’”&Trim(frmRoom.msgList.TextMatrix(intCount,1))&”’”frmRoom1.ShowElseCall menuAddroom_Click‘添加记录End IfElsefrmRoom.txtSQL=”select*from rooms”frmRoom.ShowEnd IfEnd Sub·删除客房信息Private Sub menuDeleteroom_Click()Dim txtSQL As StringDim intCount As IntegerDim mrc As ADODB.RecordsetDim MsgText As StringIf flagTedit ThenIf frmRoom.msgList.Rows>1 Then‘判断客房信息列表内容是否为空 If MsgBox(“真的要删除这条文件记录么?”,vbOKCancel+vbExclamation,“警告”)=vbOK ThenintCount=frmRoom.msgList.Row‘记载当前记录位置txtSQL=”delete from rooms where roomNO=‘”&Trim(frmRoom.msgList.TextMatrix(intCount,1)&”’”Set mrc=ExecuteSQL(txtSQL,MsgText)‘执行删除操作Unload frmRoomfrmRoom.txtSQL=”select*from rooms”frmRoom.ShowEnd IfEnd IfEnd IfEnd Sub·查询客房信息Private Sub From_Load()‘载入窗体时,将自动加入所有记录的入库时间Dim i As IntegerDim j As IntegerDim sSql As StringDim txtSQL As StringDim MsgText As StringDim mrc As ADODB.RecordsettxtSQL=”select DISTINCT typename from roomtype”‘初始化客房种类Set mrc=ExecuteSQL(txtSQL,MsgText)If Not mrc.EOF ThenDo While Not mrc.EOFCombo1.AddItem Trim(mrc.Fields(0))Mrc.MoveNextLoopCombo1.ListIndex=0ElseMsgBox “请先进行客房标准设置!”,vbOKOnly+vbExclamation,”警告” Exit SubEnd Ifmrc.CloseEnd SubPrivate Sub cmdOK_Click()‘设置完查询内容和方式后,单击cmdOk按钮查询 Dim sQSql As StringIf chkItem(0).Value=vbChecked ThensQSql=”roomNO=’”&Trim(txtItem(0)&””)&”’”End IfIf chkItem(1).Value=vbChecked ThenIf Trim(sQSql&””)=”” ThensQSql=”roomtype=’”&Trim(Combo1&””)&”’”ElseEnd IfEnd IfIf Trim(sQSql)=”” ThenMsgBox “请设置查询条件!”,vbOKOnly+vbExclamation,“警告”Exit SubElseIf flagRedit ThenUnload frmRoomEnd IffrmRoom.txtSQL=”select*from rooms where”&sQSqlfrmRoom.ShowEnd IfMe.HideEnd Sub7.小结对于本次课程设计主要从三方面,即知识、技能和态度,学生采用自我评估方式来检查自己,这样可以产生这种日常性的,内省方式的自我评估,以检查自己的学习进度和成绩,改进学习方法和增强学习自信心。