1、一、引言 （一） 項目開發背景 經濟的快速發展，人們的生活水平和消費意識的提高，促進了旅游業的發展。酒店行業將 面臨著機遇和挑戰。面對快速發展的信息產業帶來的影響。將電腦技術和電腦服務引入酒店管 理成為一種趨勢。眾多酒店企業中，中小型酒店企業由于他們的先天條件，使他們不能投入大 量的資金進行這項必須的改革。因此開發一套簡單，實用的中小型酒店客房管理信息系統是十 分有必要的。 （二） 項目開發目標 建立酒店客房管理信息系統，采用計算機對客房信息進行管理，進一步提高酒店的經濟效 益和現代化水平。幫助酒店工作人員提高工作效率，實現客房信息管理工作流程的系統化，規 范化和自動化。 （三） 項目開發的意

2、義 現在我國的中小型酒店客房管理水平普遍不高，有的還停留在紙介質的基礎上，這種管理 手段已不能適應時代的發展，因此它浪費了許多人力和物力。在當今信息時代這種傳統的管理 方法必然被計算機為基礎的信息管理系統所代替。如果本系統能被中小型酒店企業采用，將會 改變以前靠手工管理客房信息的狀況，可以樹立良好的酒店形象，提高工作效率。 （四） 項目開發方法概述 酒店客房管理信息系統采用的是原型法的開發方法。本著開發人員對用戶需求的的理解， 通過簡單的系統分析，系統設計，快速實現一個原型系統，然后通過反復修改來實現管理信息 系統。 二、系統分析 （一） 可行性分析 1. 管理上的可行性 在傳統的酒店客房管理

3、中，管理人員不得不花費大量的時間來處理顧客投訴，例如錯誤查 詢、煩瑣的登記和結帳手續、旅客費用計算錯誤、空余客房資料不能及時提供等，從而影響酒 店的經濟效益。因此酒店的管理人員迫切的需要一套酒店客房管理信息系統對日常信息進行處 理和維護。 歷史經驗的積累使酒店行業現有的管理制度和管理方法比較科學，規章制度比較齊全，原 始數據比較正確。這些為系統的建設提供了有效的制度保障。 2. 技術上的可行性 本管理信息系統將采用技術成熟的 vb6.0 做為前臺開發工具。后臺數據庫采用微軟公司的 access 數據庫，它的靈活性，安全性，和易用性為數據庫編程提供了良好的條件。因此，系統 的軟件開發平臺已成熟可

4、行。硬件方面，科技的飛速發展使硬件的更新速度越來越快，容量越 來越大，可靠性越來越高，價格越來越低，其硬件平臺完全能滿足此系統的需要。 3經濟上的可行性 本系統由作者自主開發，免費使用。操作人員只需簡單培訓即可上崗。管理和維護比較簡 單，除了必要的設備投資外，后期只需少量資金就可確保運轉。因此對于中小型酒店在經濟上 完全可以接受。 本系統的使用能大大提高員工工作效率，加速資金周轉、降低各項成本及改善服務質量。 能夠取得良好的經濟效益。 綜上所述，本系統在管理上，在技術上和經濟上是完全可行的，并且投入少，見效快。因 此系統的開發完全可行的。 （二） 組織結構分析 中小型酒店企業的組織結構如下圖所

5、示： （三） 功能需求分析 本系統主要有以下功能要求： 1用戶登錄模塊，主要用于用戶的登錄。用戶權限分為管理員和普通用戶。當用戶輸入 用戶名和密碼后經過確認，才能進入酒店客房管理信息系統，并擁有相應的權限。如果不是用 戶，拒絕進入。 2房客管理模塊，該模塊是本系統的核心所在。主要用于用戶對房客及其業務的情況進 行管理，其中包括： 預定管理模塊，主要包括預定信息的登記，查看，刪除等基本操作。 接待管理模塊，主要用于客戶入住信息的登記，查看，修改，刪除等基本操作。 圖 1 中小型酒店組織結構圖 總 臺 送餐服務 部 食品采購 部 洗衣房 禮賓部 房務中心 酒店總經理 前廳部客房部餐飲部 餐 廳 樓

6、層服務 總機 財務部保安部 結帳管理模塊，主要用于用戶退房操作。 換房管理模塊，主要用于入住用戶的換房操作。 押金管理模塊，主要用于對入住客戶押金的補交，查看等基本操作。 3客房管理模塊，該模塊主要用于對客房的編輯操作和查看狀態操作。客房的編輯操作 主要有客房的添加，修改，刪除等基本操作。 4消費管理模塊，該模塊主要用于對客人在入住期間的消費進行入帳操作，包括消費入 帳，話費入帳，餐費入帳等操作。 5審查管理模塊，主要用于該酒店管理者對酒店的基本數據信息進行查看，以便制定策 略。包括客房狀態報表查看，客人入住信息報表查看，歷史客人報表查看等等。 （四） 業務流程分析 酒店客房業務的基本流程主要

7、包括： 客房的預定，客人通過電話或者其他途徑向酒店進行客房預定，接待人員查詢客房狀態表 后確定有空房則接受預定，預定成功后發給客人預定憑證，客房狀態表作出相應的變化。 客房的登記，分為預定入住和散客登記 如果客人已經預定房間，則根據預定憑證進行預定入住操作，發給客人房卡，客房狀態由 “預定”變為“入住” 。 如果客人沒有預定房間，接待人員查詢客房狀態表后，有空房則進行客房登記操作，發給 客人房卡，客房狀態由“空房”變為“入住” 。 客人換房，如果客人對入住的客房條件不滿意，則可進行客人換房操作。接待人員將客人 的房間進行更換，并更換客人房卡，客房狀態也進行相應的調整。 客房消費，客人入住期間在

8、酒店進行了消費，如：購買商品，就餐，打電話。就要進行消 費入帳操作。包括：消費入帳，餐費入帳，話費入帳。 補交押金，如果客人的押金太少，則要補交押金。客人交納押金，接待人員開具押金憑證。 夜審管理。酒店的管理人員要對酒店的基本信息進行了解則可以進行夜審管理，包括：客 預訂管理 餐費管理 話費管理 押金管理 客房查看 酒店客房管理系統 房客管理客房管理消費管理 消費管理 客房編輯 接待管理 結帳管理 換房管理 審查管理 圖 2 功能需求結構圖 入住報表管理 客房狀態報表 系統管理 歷史客人報表 房狀態報表的查看，客人入住信息的查看，歷史客人報表查看。 客人退房，客人退房時，接待人員根據客人的房卡

9、，進行退房登記。計算客人入住期間的 房費，餐費，話費，各種消費和押金總額。對客人收取費用或者退回押金。客人信息轉存到歷 史客人表中。客房狀態由“入住”轉為“空房” 。 （五） 數據流程分析 本系統的后臺數據庫將作為整個酒店的數據流通中心，將各個部門的數據信息連通起來， 具體流程如下圖所示： 房卡 客人入住報表 歷史客人表 房卡 押金憑證 房費帳單,房卡 消費帳單,押金憑證 客人換房 客房消費 補交押金 客房預定 客人 預定憑證 總臺接待 客房編輯 客房狀態表 客人入住表 夜審管理 客房狀態報表 話費,餐費,其他消費帳單 客人退房 離店客人報表 圖 3 業務流程圖 三、系統設計 （一） 系統模塊

10、設計 根據上一章的分析，可以設計出系統的總體功能模塊圖，如圖五所示。 餐飲部 客房狀態信息 客人就餐消費 客人入住信息 前臺接待 客房部 財務部 酒店客房 mis 客人押金消費 匯總 圖 4 數據流程圖 酒店客房管理信息系統 房 客 管 理 客 房 管 理 消 費 管 理 報 表 管 理 系 統 維 護 系 統 信 息 在 房 客 人 表 補 交 押 金 預 定 入 住 預 定 房 間 客 人 換 房 退 房 登 記 鐘 點 房 登 記 客 房 登 記 客 房 編 輯 客 房 狀 態 消 費 入 帳 餐 費 入 帳 話 費 入 帳 客 房 入 住 表 客 房 信 息 表 用 戶 添 加 更 改

11、 密 碼 數 據 初 始 化 用 戶 查 看 系 統 介 紹 版 權 信 息 圖 5 酒店客房管理系統功能模塊示意圖 可以看到，本系統劃分為六個功能模塊，房客管理模塊用于對客人及其業務情況進行管理， 客房管理模塊主要用于客房狀態的查看和客房的編輯。消費管理模塊主要用于對客人在店消費 進行入帳管理。報表管理模塊提供給酒店管理者用來查看酒店的基本信息，系統維護模塊用來 管理系統用戶。系統信息模塊用來查看本系統的版權等信息。 （二） 系統流程設計 系統流程就是用戶在使用系統時的工作過程。本系統是多類型用戶管理信息系統，每一類 用戶的工作權限有所區別。多用戶系統的工作流程都是從用戶登錄模塊開始的，對用

12、戶的身份 進行認證。身份認證可以分為以下兩個過程： 確認用戶是否是有效的系統用戶。 確定用戶的類型。 第一個過程決定用戶能否進入系統。第二個過程根據用戶的類型決定用戶的操作權限。 本系統的流程分析如圖六所示。 管理自己的用戶信息 管理自己和普通用戶的用戶信息 房客管理 客房管理 消費管理 夜審管理 讀取用戶類型 是 退出系統 失敗 3 次 否 開始 用戶登錄 失敗 重試 成功 普通用戶 管理員 圖 6 系統流程設計圖 （三） 數據庫設計 現在我們已經對酒店客房管理信息系統的功能，模塊劃分和系統流程有了比較全面的認識， 本節將介紹系統的數據庫設計 1數據庫需求分析 針對酒店客房管理信息系統的需求

13、，通過對酒店客房管理工作過程的內容和數據流程分析， 設計如下所示的數據項和數據結構： 客房基本信息，包括的數據項有：客房號碼，客房標準，客房位置，客房狀態，單價， 容納人數，等。 預定基本信息，包括的數據項有：客房房號，客人姓名，身份證號碼，身份證地址，預 定時間，操作員等。 入住客戶基本信息，包括客房房號，客人姓名，身份證號碼，身份證地址，從何處來， 到何處去，住宿原因，入住時間，操作員等。 結算信息，包括的數據項有：客房號碼，客戶姓名，身份證號碼，客房單價，折扣，入 住時間，結算時間，備注等。 系統用戶信息，包括的數據項有 ：用戶名，用戶密碼，用戶權限。 有了上面的數據結構，數據項和數據流

14、程，我們就能進行下面的數據庫設計。 2數據庫結構設計 數據庫包含以下 5 張表：系統用戶表，客房狀態表，客房預定表，客人入住表，歷史客人 表。 表 1 系統用戶表 編 號 字段名 稱 數據類型說明 1 用戶名 文本，長度為 50 用戶的登錄名， 必填字段 2 密碼文本，長度 40密碼， 必填字段 3 權限文本，長度 40用戶的權限， 必填字段 表 2 客房狀態表 編號字段名稱數據類型說明 1 房號數字，整數客房的房號 2 類別文本，長度為 50 客房的類別 3 樓層文本，長度 20 客房所在的樓 層4 狀態文本，長度 50 客房的狀態 5 單價數字，整數客房的單價 6 容納人數數字，整數客房容

15、納的人 數 表 3 客房預定表 編 號 字段名稱數據類型說明 1 房號數字，整數預定客房的房號 2 姓名 文本，長度 50 預定客戶的姓名 3 類別 文本，長度 50 預定客房的類別 4 標準價數字，整數預定客房的標準價 5 證件號碼 文本，長度 50 預定客戶的證件號碼 6 押金數字，整數預定客戶交納的押金 7 聯系電話 文本，長度 50 預定客戶的聯系電話 8 操作員 文本，長度 20 預定操作的操作員 9 摘要 文本，長度 100 預定操作的摘要 表 4 客人入住表 編 號 字段名 稱 數據類型說明 1 房號數字，整數客人入住的房號 2 客人姓 名 文本，長度 50入住客人的姓名 3 標

16、準價數字，整數客人入住客房的價格 4 押金數字，整數客人交納的押金 5 類別文本，長度 50客人入住客房的類別 6 證件名 稱 文本，長度 50客人的證件名稱 7 證件號 碼 文本，長度 50客人的證件號碼 8 證件地 址 文本，長度 50客人的證件地址 9 從何處 來 文本，長度 50客人的來源 10 到何處 去 文本，長度 50客人將要去的地方 11 住宿原 因 備注客人住宿的原因 12 操作員文本，長度 50客房登記的操作員 13 入住日 期 日期型客人入住的日期 14 入住時 間 時間型客人入住的時間 15 店內消 費 數字型，整數客人在店內消費的金額 16 餐費數字型，整數客人在店內

17、的餐費金額 17 話費數字型，整數客人在店內的話費金額 表 5 歷史客人表 編 號 字段名稱數據類型說明 1 客人姓名 文本，長度 50 歷史客人的姓名 2 證件號碼數字，整數歷史客人的證件號碼 3 證件地址 文本，長度 50 歷史客人的證件地址 4 最后入住日 期 日期型歷史客人最后的入住日期 5 最后離店日 期 日期型歷史客人最后的離店日期 6 入住次數數字型歷史客人的入住次數 （四） 運行環境選擇 1軟件支撐環境 本系統采用中文 windows xp 平臺，office 2000 中的 access 為數據庫，visual basic 6.0 為開發工具，軟件開發在 windows xp

18、 平臺下運行，最終產品可脫離 visual basic 6.0 運 行環境，在 windows 9x/2000/xp 平臺下運行。 2硬件支撐環境 cpu：賽揚 1.2g 以上 內存：sdr 64m 以上 顯卡：vga 16m 顯存以上 硬盤：50m 以上硬盤剩余空間 四、系統實施 （一） 創建工程 用戶需要創建工程存儲的目錄，例如“f:酒店客房管理信息系統” 。 運行 visualbasic6.0 主程序，并選擇新建“標準 exe”工程。新建工程后，在 visualbasic 窗口中有個缺省的窗體 form1,我們在此基礎上設計系統的主界面。 選擇“工程”菜單中的“工程 1 屬性”命令，在“

19、工程屬性”對話框中，將工程名設置為 “酒店客房管理信息系統” 。單擊“保存” ，將工程存儲為 酒店客房管理信息系統.vbp。 （二） 添加模塊 根據 visualbasic 功能模塊的劃分原則，將創建以下幾個模塊： const 用來管理工程中的常量 dbfunc 用來管理工程中與數據庫操作相關的聲明，變量和函數 generalfunc 用來管理工程中一些通用的自定義函數 variable 用來管理工程中的全局變量 添加模塊的具體操作請參照系統實體，這里不再詳述。 （三） 系統模塊的設計 登錄模塊的設計： 用戶要使用本系統，首先必須通過系統的身份認證，這個過程叫做登錄。登錄過程需要完 成以下任務

20、： 根據用戶名和密碼來判斷是否可能進入系統。 根據用戶類型決定用戶擁有的權限。 成功登錄的用戶將進入系統的主界面。 登錄窗體的名稱為 frmlogin,它的界面布局如圖七所示。 圖 7 登錄窗體的界面布局 下面介紹登錄窗體的部分代碼。 變量聲明 登錄窗體的變量聲明如下： public passwordkey as string public namekey as string public try_times as integer namekey 保存用戶名，passwordkey 保存密碼，try_times 記錄嘗試登錄的次數 cmd_ok_click 過程 當用戶單擊“確定”按鈕是時，觸

21、發 cmd_ok_click 事件，進行身份驗證，對應的代碼如 下： private sub cmd_ok_click() 數據有效性檢查 if trim(txtuser) = then msgbox 請輸入用戶名 txtuser.setfocus exit sub end if if trim(txtpwd) = then msgbox 請輸入密碼 txtpwd.setfocus exit sub end if namekey = makestr(txtuser) passwordkey = makestr(txtpwd) 判斷用戶是否存在 if myuser.in_db(namekey)

22、= false then msgbox 用戶名不存在 try_times = try_times + 1 if try_times = 3 then msgbox 您已經三次嘗試進入本系統，均不成功，系統將關閉 dbapi_disconnect end else exit sub end if end if 判斷密碼是否正確 myuser.getinfo (namekey) if myuser.pwd passwordkey then msgbox 密碼錯誤 try_times = try_times + 1 if try_times = 3 then msgbox 您已經三次嘗試進入本系統，

23、均不成功，系統將關閉 dbapi_disconnect end else exit sub end if end if 登錄成功，將當前用戶的信息保存在 curuser 中 curuser.username = myuser.username curuser.user_type = myuser.user_type 關閉自己 unload me end sub 其他模塊設計請參照系統實體，在這里不在詳細敘述。 五、系統運行 （一） 系統登錄 單擊“酒店客房管理信息系統”圖標。進入系統展示畫面。 圖 8 系統展示窗體 經過 5 秒鐘，自動跳轉到系統登錄窗體。 圖 9 系統登錄窗體 選擇操作員名稱

24、（admin）,輸入密碼（111） 。單擊“確定”進入系統的主界面。 圖 10 系統主界面 （二） 房客管理 1客房預定 單擊“房客管理” ，單擊“預定房間” 。彈出客房預定窗體。 在預定窗體中輸入客戶信息，單擊“預定” ，完成預定房間操作。 圖 11 客房預定窗體 2預定入住 圖 12 預定入住窗體 單擊“預定入住” ，彈出預定入住窗體。 在預定入住窗體中輸入相關信息，單擊“登記”完成預定入住操作。 3客房登記 圖 13 客房登記窗體 單擊“客房登記” ，彈出客房登記窗體。 在客房登記窗體中輸入相關信息，單擊“登記” ，完成客房登記操作。 4鐘點房登記 單擊“鐘點房登記” ，彈出鐘點房登記窗

25、體，輸入相關信息，單擊“登記”完成客房登記 操作。 圖 14 鐘點房登記窗體 5客人換房 圖 15 客人換房窗體 6補交押金 圖 16 補交押金窗體 7退房登記 圖 17 退房登記窗體 8在店客人表 圖 18 在店客人表窗體 （三） 客房管理 1客房狀態 圖 19 客房狀態窗體 2客房編輯 圖 20 客房編輯窗體 （四） 消費管理 1消費入帳 圖 21 消費入帳窗體 2餐費入帳 圖 22 餐費入帳 3話費入帳 圖 23 話費入帳窗體 （五） 報表管理 圖 24 報表管理窗體 （六） 系統管理 1.添加用戶 圖 25 添加用戶窗體 2.修改密碼 圖 26 密碼設置窗體 3.初始化數據庫 圖 27

26、 初始化數據庫窗體 4.用戶查看 圖 28 用戶查看窗體 （七） 系統信息 1.系統簡介 圖 30 系統介紹窗體 dim tim as integer 定義一個整型變量 dim myval as string 定義一個字符串變量 private sub form_load() 自動識別數據庫路徑 data1.databasename = app.path & kfgl.mdb data2.databasename = app.path & kfgl.mdb end sub private sub form_activate() 當記錄為零時，進入系統具有所有權限 if data1.record

27、set.recordcount = 0 then msgbox (請先設置操作員密碼和權限！) load mdiform1 mdiform1.show unload me else text1.setfocus end if end sub private sub text1_keydown(keycode as integer, shift as integer) if keycode = vbkeyreturn then text2.setfocus 按回車鍵，text2 獲得焦點 end sub private sub text2_keydown(keycode as integer,

28、shift as integer) if keycode = vbkeyreturn then cmd1.setfocus 按回車鍵 cmd1 獲得焦點 if keycode = vbkeyup then text1.setfocus if keycode = vbkeydown then cmd1.setfocus end sub private sub cmd1_click() 驗證操作員及密碼 if data2.recordset.bof = false then data2.recordset.movefirst data2.recordset.findfirst 操作員 like +

29、 chr(34) + text1.boundtext + chr(34) + if data2.recordset.nomatch then msgbox (操作員輸入錯誤!) else data1.recordsource = select * from qxsz where 操作員= & text1.boundtext & data1.refresh if text1.boundtext and text2.text and text2.text = data1.recordset.fields(密碼) then drm = text1.text if data1.recordset.fi

30、elds(角色名稱) = 管理員 then gly = 0 else gly = 1 end if load mdiform1 mdiform1.show unload me else if tim = 3 then 密碼輸錯 3 次，退出系統 myval = msgbox(密碼輸入錯誤,請向系統管理員查詢!, 0, ) if myval = vbok then end end if if text1.boundtext = then msgbox (請輸入操作員!) text1.setfocus else if text1.boundtext data1.recordset.fields(操

31、作員) then msgbox (查無此操作員,請重新輸入操作員!) text1.setfocus else if text2.text = then msgbox (請輸入操作員密碼!) text2.setfocus else if text2.text data1.recordset.fields(密碼) then msgbox (密碼錯誤,請重新輸入密碼!) tim = tim + 1 text2.setfocus end if end if end if end if end if end if end sub private sub cmd2_click() end end sub

32、dim db as database 定義數據庫 dim rs as recordset 定義字段 dim connter as integer 定義一個整型變量 dim workarea(200), sql as string 定義字符串變量 private sub form_load() 自動識別數據庫路徑 data1.databasename = app.path & kfgl.mdb end sub private sub comstart_click() frame1.enabled = true: comcreat.enabled = true end sub private sub comcreat_click() 清空選定表中的數據 progr