酒店管理信息系統(tǒng)課程方案設(shè)計(jì)書(shū)1

1、管理信息系統(tǒng)課程設(shè)計(jì)報(bào)告設(shè)計(jì)選題：班 級(jí)：姓 名：胡偉學(xué) 號(hào):設(shè)計(jì)日期：2012年12月25日設(shè)計(jì)地點(diǎn)： 第1章現(xiàn)行系統(tǒng)概述隨著社會(huì)經(jīng)濟(jì)的發(fā)展，人們對(duì)生活質(zhì)量的要求越來(lái)越高，作為服務(wù)之一的賓館業(yè)也在 不斷的完善服務(wù)體制。它是集餐飲、住宿、娛樂(lè)于一體的立體化服務(wù)體系，其中顧客可以 隨意消費(fèi)并統(tǒng)一結(jié)賬；賓館管理者可及時(shí)了解賓館的全部運(yùn)營(yíng)情況及經(jīng)營(yíng)走勢(shì)，找出運(yùn)轉(zhuǎn) 成本，作為經(jīng)營(yíng)決策的依據(jù)。只有運(yùn)用先進(jìn)的科學(xué)管理手段，利用計(jì)算機(jī)管理系統(tǒng)才能更 好實(shí)現(xiàn)這一管理模式。矚慫潤(rùn)厲釤瘞睞櫪廡賴(lài)。賓館客房管理信息系統(tǒng)是用來(lái)收集、處理、存貯和傳播客房、顧客、結(jié)算信息，以信 息管理為核心的計(jì)算機(jī)應(yīng)用系統(tǒng)。利用賓館客房

2、管理信息系統(tǒng)中合理的數(shù)據(jù)庫(kù)結(jié)構(gòu)來(lái)保存 數(shù)據(jù)信息，及時(shí)了解各個(gè)環(huán)節(jié)中信息的變更，通過(guò)有效的程序結(jié)構(gòu)來(lái)支持各種數(shù)據(jù)操作的 執(zhí)行，以提高管理效率，實(shí)現(xiàn)賓館服務(wù)的系統(tǒng)化、規(guī)范化、自動(dòng)化。通過(guò)該項(xiàng)目的開(kāi)發(fā)與 使用，可實(shí)現(xiàn)以下功能：聞創(chuàng)溝燴鐺險(xiǎn)愛(ài)氌譴凈。（1）：快速實(shí)現(xiàn)客人入住登記和賬務(wù)處理，減少客人住店及離店時(shí)的等待時(shí)間（2）：準(zhǔn)確實(shí)現(xiàn)客人預(yù)訂入住的要求，實(shí)現(xiàn)有效及有保障的前臺(tái)系統(tǒng)作業(yè)（3）:快速響應(yīng)住宿客人的有關(guān)項(xiàng)目查詢(xún)要求（4）:實(shí)現(xiàn)入住、消費(fèi)、結(jié)賬一條龍服務(wù)，方便客人在店內(nèi)的各類(lèi)消費(fèi)要求第2章系統(tǒng)分析2.1需求分析電子計(jì)算機(jī)科學(xué)的飛速發(fā)展，給酒店計(jì)算機(jī)應(yīng)用帶來(lái)了蓬勃生機(jī)，出現(xiàn)了酒店計(jì)算機(jī) 管理信息

3、系統(tǒng)、安全保衛(wèi)系統(tǒng)、電子門(mén)鎖系統(tǒng)、酒店信息服務(wù)系統(tǒng)、客房電腦保險(xiǎn)系統(tǒng)以 及計(jì)算機(jī)娛樂(lè)系統(tǒng)。計(jì)算機(jī)在酒店中的應(yīng)用，已深入到酒店的各個(gè)部門(mén)，特別在信息處理 領(lǐng)域，計(jì)算機(jī)已成為最重要的工具。在酒店現(xiàn)代管理理論中，酒店管理信息系統(tǒng)已成為酒 店現(xiàn)代科學(xué)管理的重要內(nèi)容，是酒店經(jīng)營(yíng)必不可缺少的現(xiàn)代科學(xué)工具。近年來(lái)，隨著我國(guó) 改革開(kāi)放的發(fā)展，國(guó)內(nèi)的酒店服務(wù)業(yè)得到了日新月異的發(fā)展。現(xiàn)代酒店作為一體化的接待 場(chǎng)所，是一個(gè)旅游城市的窗口，也可以說(shuō)是一個(gè)小型社會(huì)。作為一種以服務(wù)為主的無(wú)煙工 業(yè)，世界各國(guó)對(duì)此行業(yè)的重視程度并不亞于其它工業(yè)。我設(shè)計(jì)的酒店管理系統(tǒng)主要是針對(duì) 酒店各種信息的管理以實(shí)現(xiàn)對(duì)酒店的管理 殘騖樓諍錈

4、瀨濟(jì)溆塹籟。系統(tǒng)功能需求之管理員1對(duì)客房信息進(jìn)行查詢(xún)、更新、刪除，添加客房信息；2、對(duì)客房類(lèi)型信息進(jìn)行查詢(xún)、更新、刪除，添加客房類(lèi)型；3、對(duì)用顧客入住信息進(jìn)行查詢(xún)、更新、刪除，添加顧客入住離開(kāi)信息；4、對(duì)客戶(hù)留言的管理。系統(tǒng)功能需求之用戶(hù)利用本系統(tǒng)用戶(hù)在注冊(cè)或登錄后可實(shí)現(xiàn)：1、 客房遠(yuǎn)程網(wǎng)上預(yù)訂，使客戶(hù)不在當(dāng)?shù)匾部梢杂嗁?gòu)酒店的客房；2、利用本系統(tǒng)可查詢(xún)、掌握全酒店客房的運(yùn)營(yíng)狀況；3、 利用本系統(tǒng) 可發(fā)布酒店相關(guān)信息，讓客戶(hù)了解酒店的服務(wù)理念；4、提高酒店的知名度；5、利用本系統(tǒng)實(shí)現(xiàn)客戶(hù)意見(jiàn)反饋，客戶(hù)通過(guò)留言板對(duì)酒店服務(wù)提出意見(jiàn)，拉近了酒店和客戶(hù)之間的距離；6、增加客戶(hù)的回頭率22可行性研究技術(shù)

5、可行性此次信息系統(tǒng)開(kāi)發(fā)是對(duì)我們所學(xué)的管理信息系統(tǒng)的實(shí)踐，我們?cè)谖C(jī)室完成系統(tǒng)開(kāi)發(fā) 我們小組可以選定兩三臺(tái)計(jì)算機(jī)或者用自己的筆記本進(jìn)行開(kāi)發(fā)，建立系統(tǒng)開(kāi)發(fā)環(huán)境，主要 是安裝ACCESS機(jī)，小組成員之間可以通過(guò)一起討論，協(xié)調(diào)開(kāi)發(fā)工作，解決開(kāi)發(fā)工作中出 現(xiàn)的問(wèn)題。釅錒極額閉鎮(zhèn)檜豬訣錐。就技術(shù)力量來(lái)說(shuō)，該學(xué)期，我們小組各成員已經(jīng)學(xué)習(xí)了管理信息系統(tǒng)，并且對(duì)網(wǎng)絡(luò)技 術(shù)和操作系統(tǒng)也有系統(tǒng)的了解，有些成員熟悉計(jì)算機(jī)原理，能解決常見(jiàn)的硬件故障和硬件 選擇。目前，教材管理信息系統(tǒng)已得到了大量應(yīng)用，有許多可供參考的成功系統(tǒng)。從技術(shù) 角度考慮，此信息系統(tǒng)開(kāi)發(fā)可行。彈貿(mào)攝爾霽斃攬磚鹵廡。經(jīng)濟(jì)可行性目標(biāo)系統(tǒng)開(kāi)發(fā)需求比較低，

6、加上具有成熟的軟硬件環(huán)境，所以在軟硬件的支出上十分 有限。而且，目標(biāo)系統(tǒng)并不是十分的復(fù)雜，開(kāi)發(fā)的周期較短，人員經(jīng)濟(jì)支出有限。當(dāng)系統(tǒng) 開(kāi)發(fā)完實(shí)際運(yùn)行后，將很大程度上提高計(jì)算機(jī)的功能，在為使用者帶來(lái)便利的同時(shí)，也為 系統(tǒng)的進(jìn)一步推廣創(chuàng)造了條件。這帶來(lái)的經(jīng)濟(jì)回報(bào)將遠(yuǎn)超過(guò)支出，并且最重要的一點(diǎn)是該 軟件的開(kāi)發(fā)可以給我們對(duì)系統(tǒng)的開(kāi)發(fā)有個(gè)全面的認(rèn)識(shí)。從經(jīng)濟(jì)角度考慮，此信息系統(tǒng)開(kāi)發(fā) 可行。謀蕎摶篋飆鐸懟類(lèi)蔣薔。法律上的可行性整個(gè)系統(tǒng)由于是自行開(kāi)發(fā)，自行使用，所以系統(tǒng)本身不存在法律上的版權(quán)爭(zhēng)議信息系 統(tǒng)規(guī)劃在需求分析的基礎(chǔ)上，我們提出了教材管理系統(tǒng)的總體結(jié)構(gòu)方案，并根據(jù)發(fā)展戰(zhàn)略和 總體結(jié)構(gòu)方案，確定了系統(tǒng)的開(kāi)

7、發(fā)次序及時(shí)間安排。廈礴懇蹣駢時(shí)盡繼價(jià)騷。2.3系統(tǒng)開(kāi)發(fā)方法的選擇本次課程設(shè)計(jì)我們選擇結(jié)構(gòu)化開(kāi)發(fā)方法，即用系統(tǒng)工程的思想和工程化的方法，按照用戶(hù)至上的原則，自頂向下整體分析與設(shè)計(jì)和自底向上逐步實(shí)施的系統(tǒng)開(kāi)發(fā)過(guò)程。是組織、管理和控制信息系統(tǒng)開(kāi)發(fā)過(guò)程的一種基本框架。煢楨廣鰳鯡選塊網(wǎng)羈淚。其基本思想：在系統(tǒng)分析時(shí)，采用自頂向下、逐層分解，由抽象到具體的逐步認(rèn)識(shí)問(wèn) 題的過(guò)程；在系統(tǒng)設(shè)計(jì)的時(shí)候，先考慮系統(tǒng)整體的優(yōu)化，再考慮局部的優(yōu)化問(wèn)題；在系統(tǒng) 實(shí)施的時(shí)候，則堅(jiān)持自底向上，先局部后整體，通過(guò)標(biāo)準(zhǔn)化模塊的連接形成完整的系統(tǒng)。 鵝婭盡損鵪慘歷蘢鴛賴(lài)。2.4數(shù)據(jù)結(jié)構(gòu)本程序定義了五個(gè)結(jié)構(gòu)體：date, easy,

8、 easy*create easy*heac| ptr分別用于存放日期與時(shí)間信息，房間入住狀態(tài)，當(dāng)日時(shí)間，住房費(fèi)用信息籟叢媽羥為贍債蟶練淨(jìng)。1、定義入住信息結(jié)構(gòu)體struct easyint nu mber;int price;struct date past;char n ame8,id18;int x;struct easy *n ext;其中各字段意義如下：int number;表示房號(hào) int price; 表示價(jià)格struct date past;表示入住日期和時(shí)間char name8,id18;表示等級(jí)客戶(hù)姓名和地址int x;表示房間入住狀態(tài)第3章系統(tǒng)設(shè)計(jì)3.1總體設(shè)計(jì)結(jié)構(gòu)該管理

9、系統(tǒng)適用于各類(lèi)中小型酒店的客房資源和客戶(hù)信息的管理，實(shí)現(xiàn)了酒店的信息 化管理，該系統(tǒng)主要包括基礎(chǔ)信息設(shè)置、客房前臺(tái)管理、查詢(xún)統(tǒng)計(jì)管理、掛賬管理、系統(tǒng) 初始設(shè)計(jì)、系統(tǒng)維護(hù)等功能。預(yù)頌圣鉉儐歲齦訝驊糴。賓館客唐管理系統(tǒng)功能結(jié)構(gòu)圖3-13.2代碼設(shè)計(jì)Private Sub Form_Curre nt()On Error GoTo Err_Form_Curre nt把子窗體中當(dāng)前記錄值賦予主窗體對(duì)應(yīng)的文本框內(nèi)Forms!職員資料管理!職員ID = Me!職員IDForms!職員資料管理!姓名=Me!姓名Forms!職員資料管理!職位=Me!職位Forms!職員資料管理!性別=Me!性別Forms!職員

10、資料管理!籍貫=Me!籍貫Forms!職員資料管理!年齡=Me!年齡Forms!職員資料管理!民族=Me!民族Forms!職員資料管理!健康狀況=Me!健康狀況Forms!職員資料管理!身份證號(hào)=Me!身份證號(hào)Forms!職員資料管理!婚姻狀況=Me!婚姻狀況Forms!職員資料管理!家庭地址=Me!家庭地址Forms!職員資料管理!家庭電話(huà)=Me!家庭電話(huà)Forms!職員資料管理!備注=Me!備注Exit_Form_Curre nt:Exit SubErr_Form_Curre nt:MsgBox Err.Descripti onResume Exit_Form_Curre ntEnd Su

11、bOpti on Compare DatabasePrivate Sub 查詢(xún) _Click()On Error GoTo Err_ 查詢(xún) _ClickMe!入住記錄查詢(xún)子窗體.RequeryExit_ 查詢(xún) _Click:Exit SubErr_ 查詢(xún) _Click:MsgBox Err.Descripti onResume Exit_S 詢(xún) _ClickEnd SubPrivate Sub 關(guān)閉 _Click()On Error GoTo Err_ 關(guān)閉 _ClickDoCmd.CloseExit_ 關(guān)閉 _Click:Exit SubErr_ 關(guān)閉 _Click:MsgBox Err.D

12、escripti onResume Exit_ 閉 _ClickEnd SubOpti on Compare DatabasePrivate Sub 新添會(huì)員 _Click()On Error GoTo Err_新添會(huì)員 _Click為窗體中“會(huì)員ID”等文本框控件設(shè)置初值Me!會(huì)員 ID = Year(Now) & Month(Now) & Day(Now) & _Hour(Now) & Minute(Now) & Second(Now)Me!會(huì)員姓名=NullMe!會(huì)員級(jí)別=一級(jí)Me!會(huì)員折扣=9.5Me!累計(jì)消費(fèi)=0Me!操作人員=NullMe!身份證 ID = NullMe!所在單位=

13、NullMe!入會(huì)日期=NowMe!備注=NullExit_新添會(huì)員_Click:Exit SubErr_新添會(huì)員_Click:MsgBox Err.Descripti onResume Exit_新添會(huì)員 _ClickEnd SubPrivate Sub 保存會(huì)員 _Click（）On Error GoTo Err_保存會(huì)員 _ClickDim i As In tegerDim STemp As Stri ngDim rs As ADODB.RecordsetSet rs = New ADODB.Recordset為打開(kāi)數(shù)據(jù)表“查詢(xún)語(yǔ)句”字符變量賦值STemp = Select * From

14、 會(huì)員資料打開(kāi)“會(huì)員資料”數(shù)據(jù)表rs.Ope n STemp, Curre ntProject.C onn ectio n, adOpe nKeyset, adLockOptimist i 滲釤嗆儼勻諤鱉 調(diào)硯錦。判斷“會(huì)員ID”等文本框是否為空If lsNull（Me! 會(huì)員 ID） = True Then彈出提示“會(huì)員ID”文本框不可以為空信息MsgBox 請(qǐng)輸入“會(huì)員ID”，它不可以為空!, vbOKOnly,輸入“會(huì)員ID”把光標(biāo)置于“會(huì)員ID ”文本框內(nèi)Me!會(huì)員 ID.SetFocus退出子過(guò)程Exit SubElseIf IsNull（Me!會(huì)員姓名）=True ThenMsgB

15、ox 請(qǐng)輸入“會(huì)員姓名”，它不可以為空!, vbOKOnly,輸入“會(huì)員姓名”Me!會(huì)員姓名.SetFocusExit SubElseIf IsNull（Me!身份證 ID） = True ThenMsgBox 請(qǐng)輸入“身份證ID”，它不可以為空!, vbOKOnly,輸入“身份證ID”Me!身份證 ID.SetFocusExit SubElseIf IsNull（Me!入會(huì)日期）=True ThenMsgBox 請(qǐng)輸入“入會(huì)日期”，它不可以為空Me!入會(huì)日期.SetFocus!, vbOK Only,II輸入“入會(huì)日期”Exit SubElseIf IsNull（Me!會(huì)員級(jí)另叮）=True

16、 ThenMsgBox 請(qǐng)輸入“會(huì)員級(jí)別”，它不可以為空!, vbOK Only,II輸入“會(huì)員級(jí)別”Me!會(huì)員級(jí)別.SetFocusExit SubElseIf IsNull（Me!會(huì)員折扣）=True ThenMsgBox 請(qǐng)輸入“會(huì)員折扣”，它不可以為空!, vbOK Only,II輸入“會(huì)員折扣”Me!會(huì)員折扣.SetFocusExit SubElseIf IsNull（Me!累計(jì)消費(fèi)）=True ThenMsgBox 請(qǐng)輸入“累計(jì)消費(fèi)”，它不可以為空!, vbOK Only,II輸入“累計(jì)消費(fèi)”Me!累計(jì)消費(fèi).SetFocusExit SubElseIf lsNull（Me!操作人員

17、）=True ThenMsgBox 請(qǐng)輸入“操作人員”，它不可以為空Me!操作人員.SetFocus!, vbOK Only,II輸入“操作人員”Exit SubElse循環(huán)判斷該編號(hào)的會(huì)員是否存在If rs.RecordCount 0 Thenrs.MoveFirstFor i = 1 To rs.RecordCo unt如果存在，彈出信息并退出子過(guò)程If rs（會(huì)員 ID） = Me!會(huì)員 ID ThenMsgBox 該編號(hào)的會(huì)員已經(jīng)存在，請(qǐng)核實(shí)!, vbCritical,記錄已經(jīng)存在Exit SubElsers.MoveNextEnd IfNext iEnd IfEnd If為保存會(huì)員資

18、料“查詢(xún)語(yǔ)句”字符變量賦值STemp = INSERT INTO 會(huì)員資料STemp = STemp & (會(huì)員ID,會(huì)員姓名，會(huì)員折扣，累計(jì)消費(fèi)，會(huì)員級(jí)別,STemp = STemp & 操作人員，身份證ID,入會(huì)日期，所在單位，備注)STemp = STemp & VALUES ( & Me!會(huì)員 ID & , & Me!會(huì)員姓名& ,鐃誅臥瀉噦圣騁貺頂廡。STemp =STemp & ”& Me!會(huì)員折扣& ,& Me!累計(jì)消費(fèi)& ,擁締鳳襪備訊顎輪爛薔。STemp =STemp & ”& Me!會(huì)員級(jí)別& ,& Me!操作人員& ,贓熱俁閫歲匱閶鄴鎵騷。STemp =STemp & ”

19、& Me!身份證ID & ,& Me!入會(huì)日期& ,壇搏鄉(xiāng)囂懺蔞鍥鈴氈淚。STemp =STemp & ”& Me!所在單位& ,& Me!備注& )蠟變黲癟報(bào)倀鉉錨鈰贅。使用DoCmd對(duì)象的Run SQL方法執(zhí)行查詢(xún)DoCmd.R un SQL STemp刷新“會(huì)員資料管理 子窗體”子窗體Me!會(huì)員資料管理 子窗體.Requery釋放系統(tǒng)為Rs數(shù)據(jù)集分配的空間Set rs = Nothi ngExit_保存會(huì)員_Click:釋放系統(tǒng)為Rs數(shù)據(jù)集分配的空間Set rs = Nothi ngExit SubErr_保存會(huì)員_Click:MsgBox Err.Descripti onResume

20、Exit_保存會(huì)員 _ClickEnd SubPrivate Sub 修改會(huì)員 _Click（）On Error GoTo Err_修改會(huì)員 _ClickDim i As In tegerDim STemp As Stri ngDim rs As ADODB.RecordsetSet rs = New ADODB.Recordset為打開(kāi)數(shù)據(jù)表“查詢(xún)語(yǔ)句”字符變量賦值STemp = Select * From 會(huì)員資料打開(kāi)“會(huì)員資料”數(shù)據(jù)表rs.Ope n STemp, Curre ntProject.C onn ectio n, adOpe nKeyset, adLockOptimisti

21、買(mǎi)鯛鴯譖曇膚遙 閆擷凄。判斷“會(huì)員ID”等文本框是否為空If lsNull（Me! 會(huì)員 ID） = True Then彈出提示“會(huì)員ID”文本框不可以為空信息MsgBox 請(qǐng)輸入“會(huì)員ID”，它不可以為空!, vbOKOnly,輸入“會(huì)員ID”把光標(biāo)置于“會(huì)員ID ”文本框內(nèi)Me!會(huì)員 ID.SetFocusExit SubElseIf IsNull（Me!會(huì)員姓名）=True ThenMsgBox 請(qǐng)輸入“會(huì)員姓名”，它不可以為空!, vbOKOnly,輸入“會(huì)員姓名”Me!會(huì)員姓名.SetFocusExit SubElseIf IsNull（Me!身份證 ID） = True ThenMsgBox 請(qǐng)輸入“身份證ID ”，它不可以為空!, vbOKOnly,輸入“身份證ID”IIMe!身份證 ID.SetFocusExit SubElseIf IsNull（Me!入會(huì)日期）=True ThenMsgBox 請(qǐng)輸入“入會(huì)日期”，它不可以為空!, vbOKOnly,輸入“入會(huì)日期”Me!入會(huì)日期.SetFocus第4章系統(tǒng)實(shí)施過(guò)程及其流程圖4.1基礎(chǔ)信息設(shè)置1、設(shè)置客房信息：對(duì)客房的基本信息進(jìn)行增加、修改、刪除。2、設(shè)置員工信息：對(duì)員工的基本信息進(jìn)行增加、修改、刪除。3、設(shè)置掛賬單位：對(duì)掛賬單位的基本信息進(jìn)行增加、修改、刪除系統(tǒng)初姑