《網站規(guī)劃與建設綜合實驗》課程設計--賓館管理信息系統

1、<p>　　《網站規(guī)劃與建設綜合實驗》</p><p><b>　　課程設計報告</b></p><p>　　設計題目：賓館管理信息系統 </p><p>　　專 業(yè)：計算機科學與技術系(網絡工程方向) </p><p>　　班 級：1002班 </p><p>&

2、lt;b>　　指導教師： </b></p><p><b>　　組長姓名：</b></p><p><b>　　2013年6月</b></p><p><b>　　計算機科學與技術系</b></p><p>　　賓館管理信息系統的設計與實現</p>

3、<p>　　摘 要：隨著計算機科學技術的發(fā)展,人們已進入了互聯網的時代,由于目前計算機文化基礎以全部提升到Windows平臺,因此作為其后繼課程的程序設計語言,自然也應在這一平臺上深入下去。本次設計之所以采用Visual Studio2010 ,就是因為其具有程序設計語言簡單易學、易用的特點,又在編程系統中引入了面向對象的機制,用一種巧妙的方法把Windows編程的復雜性封裝起來,提供了一種可視界面的設計方法,使用窗體和

4、控件設計應用程序界面,從而極大的提高了用戶開發(fā)應用程序的效率?，F代社會中,各行各業(yè)都通過應用計算機實現自動化,提高工作效率,把勞動者從繁雜的腦力勞動和體力勞動中解放出來。近20年間，管理信息系統（MIS）的應用得到了迅速的發(fā)展，尤其是今年來Internet/Intranet技術的飛速發(fā)展，為企業(yè)建立MIS系統提供了良好的支持環(huán)境。通過本次設計,開發(fā)軟件應如何下手,按照怎樣的順序來完成軟件,從這種基本思想出發(fā),提出了軟件開發(fā)中一些問題的復

5、雜性和軟件工程學的概念。 </p><p>　　關鍵詞：賓館管理 數據庫　Visual Studio2010</p><p><b>　　目 錄</b></p><p>　　第一章 系統概述1</p><p>　　1.1 課題的背景、目的與意義1</p><p>　　第二章 系統分析

6、2</p><p>　　2.1 技術分析2</p><p>　　2.2 功能分析2</p><p>　　第三章 總體設計與詳細設計3</p><p>　　3.1系統總體設計3</p><p>　　3.2 數據庫設計4</p><p>　　第四章 系統測試10</p>&

7、lt;p>　　4.1測試分類10</p><p>　　4.2測試結果12</p><p>　　第五章 設計總結13</p><p><b>　　參考文獻14</b></p><p><b>　　致 謝15</b></p><p><b>　　第一

8、章 系統概述</b></p><p>　　1.1 課題的背景、目的與意義</p><p>　　近年來，賓館業(yè)迅猛發(fā)展，市場的競爭日趨激烈，全面提高賓館的軟件管理水準，已成為賓館業(yè)發(fā)展的當務之急。尤其是對于星級賓館，既需要完成前臺的一些服務工作，還需要完成后臺的管理工作。然而，傳統的人工管理模式已經遠遠不能滿足有效、快捷地處理經營中產生的大量信息數據的需要，從而使得企業(yè)決策層無

9、法及時、準確地掌握一線資料，繼而影響對市場進行正確地分析和預測。像沿海城市三星級以上賓館引進外方管理，使小部分賓館管理水準幾乎接近或達到國際水平。但對占80%以上的廣大中小型賓館來說，是難以做到的。因此，欲在競爭中甩開對手，取得優(yōu)勢，必須在經營、管理、產品、服務等方面具備獨到之處。而對賓館的經營狀況起決定作用的是客房的管理。簡單的服務標準已不是制勝的錦囊，只有管理做到最細微之處，才能讓顧客體會到賓館服務的高標準、高質量，而準確、快速、周

10、全往往就是最基本的成功要素。</p><p>　　傳統的管理方法已經不能適應現代社會的需要，因此采用電腦管理業(yè)務、財務等諸多環(huán)節(jié)已成為推動賓館業(yè)迅速發(fā)展的先決條件，賓館客房管理信息系統是各大中小型賓館所需要使用的一個管理系統。</p><p>　　第二章 系 統 分 析</p><p><b>　　2.1 技術分析</b></p>

11、<p>　　該軟件適用于Win7/2000/NT/XP等系統，并且功能齊全、操作方便、效果甚佳。開發(fā)工具可選用Visual Studio 2010，它作為一種面向對象的可視化開發(fā)工具，不僅開發(fā)速度快，效率高，成本低，界面友好，數據和圖形功能強大，而且易于掌握和使用。另外，在數據庫功能方面新增了功能強大、使用方便的ADO（Active Database Object）技術，可以方便地和多種數據庫相連，并支持C\S，B\S多層

12、結構模式，易于將本系統向其他數據庫環(huán)境的移植和擴展。數據庫可選用 Microsoft SQL 2005,其性能比較高，而且數據庫安全管理形式靈活方便，更為突出的是它與Windows操作系統的集成和協調性是其他數據庫產品不能比擬的</p><p><b>　　2.2 功能分析</b></p><p>　　一個賓館管理信息系統，首先賓館管理系統的基本需求歸納如下：<

13、/p><p>　　（1）客房類型管理應該提供有關客房類型情況的規(guī)范，如標準間和雙人間的各自設置。</p><p>　?。?）客房信息管理用來管理各個客房的信息和狀況，包括房間位置、價格、額定人數和實際人數等。</p><p>　?。?）客房查詢是在客戶入住之前根據客戶的要求提供給客戶的客房的情況。</p><p>　?。?）客戶查詢主要是根據客戶

14、的號碼來顯示客戶的住宿記錄，以便用戶管理和計算。</p><p>　　（5）客戶入住就是登記客戶入住信息。</p><p>　?。?）客戶結算是客戶付清住宿費用并注銷房間。</p><p>　?。?）系統幫助是用來提示工作人員怎么使用該賓館管理系統的模塊</p><p>　　登錄設計要求工作人員正確輸入ID 和密碼且查詢相對應之后才能登陸系統

15、，同時設置不同的登錄身份便于對系統的管理和保密工作。</p><p>　　第三章 總體設計與詳細設計</p><p><b>　　3.1系統總體設計</b></p><p><b>　　1.系統結構圖：</b></p><p>　　本賓館客房管理系統適用于各類中小型賓館的客房資源和客戶信息的管理，實

16、現了賓館客房的信息化管理，該系統主要包括基礎信息設置、客房前臺管理、查詢統計管理、掛賬管理、系統初始設計、系統維護等功能。</p><p><b>　　2.系統設計草圖：</b></p><p><b>　　3.2 數據庫設計</b></p><p><b>　　1.數據庫技術</b></p&g

17、t;<p>　　它是在既定（本系統使用SQL Server）的數據庫管理系統基礎之上建立數據庫的過程。其過程是將現實存在的數據及其應用處理關系進行抽象，從而形成數據庫結構。具體實現時，首先明確用戶對數據的需求，在此基礎上，建立數據庫的概念模型，概念模型主要是用來反映用戶的現實環(huán)境和需求，它獨立于具體的數據庫管理系統，并且與數據庫怎樣實現無關。在建立數據庫概念模型之后，要真正實現與數據庫管理系統的結合，即能夠由既定的數據庫管

18、理系統所支持，還必須進行邏輯結構的設計，在邏輯結構設計階段，主要完成建立數據庫的邏輯模型，并解決數據的完整性、一致性、安全性和有效性等問題；最后一個階段是數據庫的物理結構設計，其任務是為系統邏輯結構模型確定合理的存儲結構、存取方法、以及數據表示和數據存儲空間分配等內容，從而得到具體的數據庫物理結構。[10]</p><p>　　2.數據庫表的設計：</p><p>　　表 3.1 操作員表

19、 czy_tab</p><p>　　表 3.2 本單位定義表 bdwdy_tab</p><p>　　表 3.3 客房信息類型表 kfxxlx_lab</p><p>　　表 3.4 業(yè)務部門定義表 ywbmdy_tab</p><p>　　表 3.5 員工信息表 ygxx_tab</p><p>　　表 3.6 工

20、作單位信息表 gzdwxx_tab</p><p>　　表 3.7 客房預訂表 kfyd_tab</p><p>　　表 3.8 住宿登記表 zxdj_tab</p><p>　　表 3.9 掛賬結算表 krjk_tab</p><p>　　表 3.10 退宿結賬表 txjz_tab</p><p>　　3.3系統功能

21、描述：</p><p><b>　?。ㄒ唬┗A信息設置</b></p><p>　　1、設置客房信息：對客房的基本信息進行增加、修改、刪除。</p><p>　　2、設置員工信息：對員工的基本信息進行增加、修改、刪除。</p><p>　　3、設置掛賬單位：對掛賬單位的基本信息進行增加、修改、刪除。</p>

22、<p><b>　　（二）客房前臺管理</b></p><p>　　1、客房預訂：可以通過此窗口實現客房預訂。</p><p>　　2、住宿登記:客人入住賓館登記信息，退宿一天前進行提醒。</p><p>　　3、宿費提醒：查詢某日期的提醒信息或全部提醒信息。</p><p>　　4、退宿結帳：可以選擇掛賬、

23、打折等多種方式，并可以在此增加其他消費項目的費用。自動提取系統時間以及當前操作員。</p><p><b>　?。ㄈ┎樵兘y計管理</b></p><p>　　1、客房查詢：通過房間號查詢客房基本信息。</p><p>　　2、房態(tài)查詢：（未實現）</p><p>　　3、預訂房查詢：通過客戶姓名查詢預訂信息。</

24、p><p>　　4、住宿查詢：通過客戶姓名查詢住宿信息。</p><p>　　5、退宿查詢：通過客戶姓名查詢退宿信息。</p><p><b>　?。ㄋ模熨~管理</b></p><p>　　1、掛賬查詢：通過掛賬單位或地址以及時間段查詢掛賬信息。</p><p>　　2、掛賬結款：登記掛賬單位對掛賬

25、的還款。</p><p><b>　?。ㄎ澹┫到y初始設計</b></p><p>　　1、本單位定義：設置本單位的基本信息。</p><p>　　2、業(yè)務部門定義：設置各業(yè)務部門的相關信息。</p><p><b>　?。┫到y維護</b></p><p>　　1、系統初始

26、化：清空目前的系統數據，將系統恢復為初始狀態(tài)。</p><p>　　2、操作員管理：高級管理員登錄后可進行操作員的添加、刪除以及信息更改。</p><p>　　3、權限設置：可以設定操作員的管理權限以及具體的可操作功能。</p><p><b>　　第四章 系統測試</b></p><p><b>　　4.1測

27、試分類</b></p><p><b>　　（1）功能測試 </b></p><p>　　本系統是專為賓館客房管理開發(fā)的軟件。在此對系統各部分功能，以及可靠性等方面進行測試。針對本系統，主要有以下的功能測試：</p><p>　　1、登陸測試：通過登陸信息的填寫，用戶是否可以正確快速地登陸到主界面進行相關操作。作為系統的唯一入口，是

28、否能做好安全工作。測試用例表如下:</p><p><b>　　界面登錄測試用例表</b></p><p>　　2、信息添加：測試系統對基本表數據的添加是否正確，數據庫能否立即更新。測試用例表如下：</p><p><b>　　信息添加測試用例表</b></p><p>　　3、信息修改：測試系統能

29、否正確實現對已添加數據的修改功能。測試用例表如下：</p><p><b>　　信息修改測試用例表</b></p><p>　　4、信息刪除：測試系統能否正確實現對已添加數據的刪除功能。測試用例表如下：</p><p><b>　　信息刪除測試用例表</b></p><p>　　5、信息查詢：測試系

30、統能否正確實現對已添加數據的查詢功能。測試用例表如下：</p><p><b>　　信息查詢測試用例表</b></p><p><b>　　4.2測試結果</b></p><p>　　經過測試，對于擁有正確管理員帳號和密碼的管理員可以進入賓館客房管理系統主菜單進行權限所允許的各項功能操作，并能正確實現已完成的各種功能。對不

31、擁有正確帳號和密碼的用戶則拒絕其進入系統，以保護系統的秘密數據和保證其運行安全，防止惡意破壞。</p><p><b>　　設計總結</b></p><p>　　在做畢業(yè)設計以前，作者對管理信息系統開發(fā)的理解只是停留在理論知識的水平上，是紙上談兵，缺乏實際的軟件開發(fā)經驗。這次通過做畢業(yè)設計，作者完成了《賓館客房管理信息系統》的軟件開發(fā)任務。在整個開發(fā)過程中遇到了很多的

32、問題，但最終都一一解決，對其中比較深刻的幾點體會總結如下：</p><p>　　第一，讓作者發(fā)愁的是對賓館客房的具體業(yè)務流程不太熟悉。通過走訪各賓館和查閱資料，經過反復的修改論證，才完成了系統的分析和設計工作。</p><p>　　第二，面臨的困難是不熟悉軟件開發(fā)工具。作者只好翻閱了有關PowerDesign的書籍，同時又不斷向老師和同學們請教，才逐漸熟練和掌握了開發(fā)工具。</p&g

33、t;<p>　　第三，從教條主義到理論聯系實際的轉變。因為沒有寫論文的經驗，所以開始總是生搬硬套書本上的理論和概念，結果寫出的論文就非常死板，缺乏新意，不能真正描述出自己軟件的開發(fā)過程，犯了教條主義的錯誤。后來經過老師的多次指點，作者對論文從結構和內容上都進行了大幅度的調整和修改，刪掉了論文中過多的理論和概念，利用理論知識把自己實際的開發(fā)過程，用自己的語言和科學方法準確的表達出來，經過多次修改終于完成了論文的寫作。這使作者

34、真正體會到什么叫理論聯系實際。</p><p>　　第四，在軟件開發(fā)的過程中，開始編寫菜單、窗口、表結構時，進展還是比較順利，但當有些字段、表關聯、數據窗口混淆在一起的時候，作者被搞得暈頭轉向。最后不得不重新整理表結構，修改字段名稱，到 SQLServer中去修改數據庫，才將系統的結構最終確定下來。對于源代碼的編寫，也是經過反復的修改測試，才使系統的設計功能得以正確實現。</p><p>

35、　　這次的畢業(yè)設計對作者來說是非常難得的一次鍛煉機會。畢業(yè)設計使作者對幾年來所學的專業(yè)課有了更為深刻的認識，提高了對管理信息系統開發(fā)理論，方法和步驟的認識，使知識得到了融會貫通，得到了比以往學習任何一門課都大的提高和進步。對于作者來講這不僅僅是一次畢業(yè)設計，不僅僅學會了一門數據庫開發(fā)工具，更重要的是在學習的過程中，遇到了很多的困難，在解決這些困難的過程中提高了作者學習的能力、解決問題的能力和實際工作能力，學到了許多書本以外的知識。<

36、;/p><p>　　總之，理論+實踐=知識。程序設計過程中，作者以理論為指導，以實踐為主體，將理論與實踐緊密結合起來，親身體會到只有將理論與實踐有效的結合起來，才能使理論指導實踐，又反過來豐富理論，二者相得益彰，使學習效率大大提高。</p><p><b>　　參考文獻</b></p><p>　　[1]劉彥保,李軍利,郝繼升.用PowerBuil

37、der和SQL Server開發(fā)酒店管理信息系統[J].延安大學學報,2003,Vol.04</p><p>　　[2]亓協民.龍鐵賓館網絡系統分析[J].哈爾濱鐵道科技,1999,Vol.01</p><p>　　[3]So-Yeon LEE,Jai-Sang Koh.WWW-Based Reliability Information System [J].Computers ind.

38、Engng,1998,Vol.35:599-602</p><p>　　[4]吳鋒.PowerBuilder在企業(yè)MIS開發(fā)中的應用與思考[J].計算機工程與應用,1999,Vol.01</p><p>　　[5]張鴻,熊文龍.基于C/S模式的SQL數據庫應用技術[J].武漢理工大學學報,2003,Vol.06</p><p>　　[6]陳建平.Sybase SQL

39、 Server與管理信息系統設計[J].長春郵電學院學報，1996，Vol.02 </p><p>　　[7]葉蓓.SQL Server2000關系數據庫特性分析[J].現代電子技術,2003,Vol.23</p><p>　　[8]劉凱,苗放,王艷.PowerBuilder與Sybase在客戶/服務器模式下的連接及應用[J].物探化探計算技術,2001,Vol.04</p>

40、<p>　　[9]樊銀亭,曾春先.SQL Server數據庫系統中的數據完整性研究[J].金陵科技學院學報,2005,Vol.02</p><p>　　[10]錢學忠.SQL在數據庫應用系統中的運用[J].電子器件,2000,Vol.03</p><p>　　[11]Timo Manterea,Jarmo T. Alanderb.Evolutionary software en

41、gineering, a review[J].Applied Soft Computing,2005,Vol.05:315-331</p><p><b>　　致 謝</b></p><p>　　在論文完成之際，心情無比激動。一年的研究生學習，我忠心感謝我的老師xx。感謝在他的帶領下，讓我渡過了我學習生活最有意義的一段日子，使我的學習生活變得更充實。</p&

42、gt;<p>　　忠心感謝所我的全體同學及實驗中老師的大力督促，營造的活躍而又濃厚的學術氛圍深深感染了我。</p><p>　　感謝我的室友在我遇到困難的時候，是他們給予我支持和鼓勵以及戰(zhàn)勝困難的勇氣和力量，和他們一起度過的一年美好時光，我將永難忘記。</p><p>　　最后，祝每一位老師工作順利，生活幸福，并致以真誠的敬意。</p><p><

43、;b>　　附錄：</b></p><p>　　源代碼及相應界面圖：</p><p><b>　　系統登錄</b></p><p>　　單擊系統啟動畫面，進入系統登錄窗口。用戶進入系統前，必須通過密碼驗證方可進入主窗口界面。 </p><p>　　窗口中主要放置了一個下拉單選框ddlb_1，一個單行編輯框

44、sle_1，以及兩個命令按鈕cb_1、cb_2。用戶首先在下拉單選框中選擇操作員，然后輸入密碼。點擊“確定”按鈕后，系統自動提取對應操作員的登錄密碼，與保存在局部變量中的用戶所輸入密碼進行比對。如果密碼不正確，則提示“密碼有誤！” ；如果密碼正確則進入系統主窗口main_win。登錄按鈕cb_1的代碼如下：</p><p>　　//窗口login_win的“確定”按鈕的clicked()事件，判斷密碼的正誤，若正

45、確則進入系統主界面</p><p>　　string czy99,pwd99,czy100,pwd100,pwd200</p><p>　　czy99=trim(ddlb_1.text)</p><p>　　pwd99=trim(sle_1.text)</p><p>　　if czy99="" then</p>

46、;<p>　　messagebox("","請選擇操作員!")</p><p><b>　　else</b></p><p>　　if pwd99="" then</p><p>　　messagebox("","請輸入密碼!")&

47、lt;/p><p><b>　　else</b></p><p><b>　　//選擇數據</b></p><p>　　select pwd into :pwd100 from czy_tab where czy=:czy99;</p><p>　　pwd200=trim(pwd100)</p&g

48、t;<p>　　if pwd200=pwd99 then</p><p>　　czyvar=trim(czy99)</p><p>　　open(main_win)</p><p>　　close(parent)</p><p><b>　　else</b></p><p>　　me

49、ssagebox("","密碼有誤!")</p><p>　　sle_1.text=""</p><p>　　sle_1.setfocus()</p><p><b>　　end if</b></p><p><b>　　end if</b>

50、;</p><p><b>　　end if</b></p><p>　　登錄成功后顯示賓館客房管理信息系統主界面如下圖，主窗口為main_win，主界面上所鏈接菜單為menu_menu。</p><p>　　基礎信息設置（包括客房信息、員工信息、掛賬單位信息）</p><p>　　（由于結構相似，在此以客房信息設置為例

51、進行解說。）</p><p>　　單擊主菜單“基礎信息設置”下的“設置客房信息”子菜單，進入客房信息設置窗體，主要實現客房基本信息的添加、修改、刪除等功能：</p><p>　　本窗口主要由兩個單行編輯框、三個掩碼框、一個多行編輯框、兩個下拉單選框、一個數據窗口以及十個命令按鈕組成，其中營業(yè)日期可自動提取系統時間。點擊“添加”按鈕，可生成新的房間信息，在添加房間信息的過程中，“添加”按鈕不

52、可用，“保存”按鈕可用。在此窗口還可以對已保存的房間信息進行修改，并可刪除已保存的房間信息?！疤砑印卑粹ocb_3的代碼如下：</p><p>　　//窗口kflxxx_win的“添加”按鈕的clicked()事件，清空文本控件的內容，自動生成房間號碼</p><p>　　em_3.text=string(today())</p><p>　　em_1.text=&q

53、uot;"</p><p>　　ddlb_1.text=""</p><p>　　em_2.text=""</p><p>　　mle_1.text=""</p><p>　　ddlb_2.text=""</p><p>　　sl

54、e_1.text=""</p><p>　　sle_2.text=""</p><p>　　string lbbh,lbbh1,lbbh2</p><p><b>　　int lbbh3</b></p><p><b>　　//選擇數據</b></p&g

55、t;<p>　　select fjh into :lbbh from kfxxlx_tab;</p><p>　　if lbbh="" then</p><p>　　em_1.text="0001"</p><p><b>　　else </b></p><p>&l

56、t;b>　　//生成房間號</b></p><p>　　declare cursor1 cursor for select fjh from kfxxlx_tab;</p><p>　　open cursor1;</p><p>　　fetch cursor1 into :lbbh1;</p><p>　　lbbh2=&qu

57、ot;0001"</p><p>　　do while sqlca.sqlcode=0</p><p>　　if lbbh1>lbbh2 then</p><p>　　lbbh2=lbbh1</p><p><b>　　else</b></p><p>　　lbbh2=lbbh2&

58、lt;/p><p><b>　　end if </b></p><p>　　fetch cursor1 into :lbbh1;</p><p><b>　　loop</b></p><p>　　close cursor1;</p><p>　　lbbh3=integer(lbb

59、h2) + 1</p><p>　　lbbh2=string(lbbh3)</p><p>　　em_1.text=lbbh2</p><p><b>　　end if</b></p><p><b>　　lbbh=""</b></p><p><b

60、>　　lbbh1=""</b></p><p><b>　　lbbh2=""</b></p><p><b>　　lbbh3=0</b></p><p>　　ddlb_1.setfocus()</p><p>　　cb_2.enabled=t

61、rue</p><p>　　cb_3.enabled=false</p><p><b>　　客房預訂</b></p><p>　　單擊主菜單“客房前臺管理”下的“客房預訂”子菜單，進入客房預訂窗體。</p><p>　　本窗口主要由九個單行編輯框、三個下拉單選框以及四個命令按鈕組成，其中操作員為自動填入，預付金額在登記

62、預住天數、選擇客房價格后點擊編輯框可自動生成。點擊“添加”按鈕，可生成新的客房預訂信息。窗口open事件的部分代碼如下：</p><p>　　//窗口kfyd_win的open()事件，初始給控件，分別把不同的房間類型和價格添加到組合框ddlb_2和ddlb_3中</p><p><b>　　……</b></p><p>　　//把不同的房間類

63、型添加到組合框ddlb_2中</p><p>　　declare cursor1 cursor for select distinct fjlx from kfxxlx_tab;</p><p>　　open cursor1;</p><p>　　fetch cursor1 into :kflb;</p><p>　　do while sql

64、ca.sqlcode=0</p><p>　　ddlb_2.additem(kflb)</p><p>　　fetch cursor1 into :kflb; </p><p><b>　　loop</b></p><p>　　close cursor1;</p><p><b>　　s

65、tring jg</b></p><p>　　//把不同的價格添加到組合框ddlb_3中</p><p>　　declare cursor2 cursor for select distinct jg from kfxxlx_tab;</p><p>　　open cursor2;</p><p>　　fetch cursor2

66、into :jg;</p><p>　　do while sqlca.sqlcode=0</p><p>　　ddlb_3.additem(jg)</p><p>　　fetch cursor2 into :jg; </p><p><b>　　loop</b></p><p>　　close c

67、ursor2;</p><p><b>　　住宿登記</b></p><p>　　單擊主菜單“客房前臺管理”下的“住宿登記”子菜單，進入住宿登記窗體。</p><p>　　本窗口主要由五個單行編輯框、十四個編輯框、一個多行編輯框、三個下拉單選框以及四個命令按鈕組成，其中有十二個編輯框自動生成數據（住宿編號可更改，其他不可更改）。房間號碼可選擇已

68、登記的房間，如果選中房態(tài)為“入住”的房間則提示“該客房已住人！”，房態(tài)為“維修”時則提示“該客房正在維修！”。在登記過程中“登記”按鈕enabled屬性為false。窗口open事件的部分代碼如下：</p><p>　　//窗口zxdj_win的open()事件，初始化控件，并把不同的房間號添加到組合框ddlb_3中</p><p>　　string fjh</p><

69、p>　　//把不同的房間號添加到組合框ddlb_3中</p><p>　　declare cursor1 cursor for select fjh from kfxxlx_tab;</p><p>　　open cursor1;</p><p>　　fetch cursor1 into :fjh;</p><p>　　do while

70、 sqlca.sqlcode=0</p><p>　　ddlb_3.additem(fjh)</p><p>　　fetch cursor1 into :fjh;</p><p><b>　　loop </b></p><p>　　close cursor1;</p><p>　　//得到當前系統

71、的日期</p><p>　　em_5.text=string(today())</p><p>　　//得到當前系統的時間</p><p>　　em_6.text=string(now())</p><p>　　ddlb_2.selectitem(3)</p><p><b>　　……</b>&l

72、t;/p><p><b>　　宿費提醒</b></p><p>　　單擊主菜單“客房前臺管理”下的“宿費提醒”子菜單，進入宿費提醒窗體。</p><p>　　本窗口主要由一個掩碼框、一個數據窗口以及三個命令按鈕組成。掩碼框em_1自動提取當前日期，可進行更改。點擊“到時提醒”按鈕，系統從zxdj_tab表中提取退宿時間在em_1所輸入時間一天后的相

73、關數據。點擊“所有被提醒”按鈕，顯示所有需要提醒的客人信息。“到時提醒”按鈕cb_1的代碼如下：</p><p>　　//窗口xftx_win的“到時提醒”按鈕的clicked()事件，提醒客人還差一天就到期了</p><p>　　string sql,tixrq1</p><p>　　tixrq1=trim(em_1.text)</p><p&

74、gt;　　dw_1.settransobject(sqlca)</p><p>　　sql="select zxno,xm,zj,zjh,dwordz,zxsy,fjhm,kfbz,kfjg,zxrq,zxsj,zxts,zqxf,dzfs,dzds,sjxf,txrq,txsj,ysyj,bz,czy,tixrq,tixsj,isor from zxdj_tab where tixrq='&q

75、uot;+tixrq1+"'"</p><p><b>　　//檢索數據</b></p><p>　　dw_1.setsqlselect(sql)</p><p>　　dw_1.retrieve()</p><p><b>　　退宿結賬</b></p>&l

76、t;p>　　單擊主菜單“客房前臺管理”下的“退宿結賬”子菜單，進入退宿結賬窗體。</p><p>　　本窗口實現功能為客人的退房結賬。在下拉菜單中選擇憑證號碼，其他信息自動從數據庫中提取，退宿編號為自動分配。在附加費處選擇附加費項目，然后在后面的單行編輯框中輸入數目，提示欄中顯示對應的消費，并自動計算到應收金額及退還金額中。掩碼框“附加費”金額em_8的代碼如下：</p><p>　

77、　//窗口txjz_win的掩碼框em_8的modified()事件，統計總計金額</p><p>　　if ddlb_7.text="電話費" then</p><p>　　st_22.text=em_8.text</p><p>　　elseif ddlb_7.text="會議費" then</p><

78、p>　　st_24.text=em_8.text</p><p>　　elseif ddlb_7.text="雜費" then</p><p>　　st_23.text=em_8.text</p><p>　　elseif ddlb_7.text="停車費" then</p><p>　　st_2

79、5.text=em_8.text</p><p>　　elseif ddlb_7.text="賠償費" then</p><p>　　st_26.text=em_8.text</p><p><b>　　end if</b></p><p>　　em_9.text=string(real(sle_8.

80、text)+(real(st_22.text)+real(st_23.text)+real(st_24.text)+real(st_25.text)+real(st_26.text))*real(em_7.text)/100)</p><p>　　em_11.text=string(real(em_10.text)-real(em_9.text))</p><p>　　查詢統計管理（包括客

81、房、預訂房、住宿、退宿、掛賬信息查詢）</p><p>　?。ㄓ捎诮Y構相似，在此以預訂房查詢?yōu)槔M行解說。）</p><p>　　單擊主菜單“查詢統計管理”下的“預訂房查詢”子菜單，進入預訂房查詢窗體。</p><p>　　在此窗口可以對預訂信息進行查詢以及刪除。窗口open事件的代碼如下：</p><p>　　//窗口ydfcx_win的o

82、pen()事件，連接數據庫，檢索數據，把不同的姓名添加到組合框ddlb_1中</p><p><b>　　string xm</b></p><p>　　//把不同的姓名添加到組合框ddlb_1中</p><p>　　declare cursor1 cursor for select distinct xm from kfyd_tab;<

83、/p><p>　　open cursor1;</p><p>　　fetch cursor1 into :xm;</p><p>　　do while sqlca.sqlcode=0</p><p>　　ddlb_1.additem(xm)</p><p>　　fetch cursor1 into :xm; </p&

84、gt;<p><b>　　loop</b></p><p>　　close cursor1;</p><p><b>　　//連接數據庫</b></p><p>　　dw_1.settransobject(sqlca)</p><p><b>　　//檢索數據</b&g

85、t;</p><p>　　dw_1.retrieve()</p><p><b>　　掛賬結賬</b></p><p>　　單擊主菜單“掛賬管理”下的“掛賬結賬”子菜單，進入掛賬結賬窗體。</p><p>　　在下拉菜單“掛賬單位或地址”處進行對象選擇，系統在數據庫中搜索相應數據后數據窗口中會出現該單位的掛賬信息。結款方

86、式有多種選擇。在命令按鈕“確定”cb_1的代碼如下：</p><p>　　//窗口khjz_win的“確定”按鈕的clicked()事件，保存客人結帳信息</p><p><b>　　……</b></p><p><b>　　//選擇數據</b></p><p>　　select thje,dzfs

87、 into :thje,:dzfs from txjz1_tab where xxdz=:gzdw and isor=:isor;</p><p>　　thje2=real(thje)</p><p>　　if thje2>0 then</p><p>　　thje3=string(thje2 - thje1)</p><p>　　el

88、seif thje2<0 then</p><p>　　thje3=string(thje2 + thje1)</p><p><b>　　end if</b></p><p>　　if trim(thje)="" then</p><p>　　messagebox("",

89、"您已經結完款了!")</p><p><b>　　else</b></p><p>　　if trim(dzfs)=dzfs1 and real(thje)<>0 then</p><p><b>　　//保存數據信息</b></p><p>　　insert

90、into krjk_tab(gzdw,jkfs,hkje,jkr,czy) values(:gzdw,:jkfs,:hkje,:jkr,:czy);</p><p>　　string pzhm,……</p><p><b>　　//選擇數據</b></p><p>　　select pzhm,……</p><p>　　i

91、nto :pzhm,……</p><p>　　from txjz1_tab where xxdz=:gzdw and isor=:isor;</p><p><b>　　//修改數據</b></p><p>　　update txjz1_tab set isor=:isor1 where xxdz=:gzdw and dzfs=:dzfs1 a

92、nd isor=:isor;</p><p><b>　　//保存數據</b></p><p>　　insert into txjz1_tab (pzhm,……)</p><p>　　values(:pzhm,……);</p><p>　　elseif trim(dzfs)=dzfs1 and real(thje)=0

93、then</p><p><b>　　//修改數據</b></p><p>　　update txjz1_tab set isor=:isor1 where xxdz=:gzdw and dzfs=:dzfs1;</p><p>　　messagebox("","您已經結完款了!")</p>

94、<p><b>　　end if</b></p><p><b>　　end if</b></p><p>　　string xxdz1</p><p>　　xxdz1=trim(ddlb_1.text)</p><p>　　dw_1.settransobject(sqlca)</

95、p><p>　　string sql</p><p>　　sql="select pzhm,…… from txjz1_tab where xxdz='"+xxdz1+"'"</p><p><b>　　//檢索數據</b></p><p>　　dw_1.setsqls

96、elect(sql)</p><p>　　dw_1.retrieve()</p><p><b>　　int total</b></p><p>　　total=dw_1.rowcount()</p><p>　　dw_1.scrolltorow(total)</p><p>　　系統初始設計（本

97、單位定義、業(yè)務部門定義）</p><p>　?。ń缑嬉约肮δ軐崿F與基礎信息設置類似。）</p><p><b>　　系統初始化</b></p><p>　　單擊主菜單“系統維護”下的“系統初始化”子菜單，進入系統初始化窗體。</p><p>　　本窗口功能為高級管理員初始化系統數據。點擊“清除所有數據”，所有基本表的數據

98、將被刪除。點選“開始”后可選擇相應數據，再點擊“建立新賬”，點選的功能所對應的基本表數據將被刪除。命令按鈕“建立新賬”cb_3的關鍵代碼如下：</p><p>　　//窗口xtcsh_win的clicked()事件，刪除選定的數據</p><p><b>　　……</b></p><p>　　if cbx_1.checked then</

99、p><p><b>　　//刪除數據</b></p><p>　　delete kfyd_tab;</p><p><b>　　end if</b></p><p>　　if cbx_2.checked then</p><p>　　delete zxdj_tab;</p&

100、gt;<p><b>　　end if</b></p><p>　　if cbx_3.checked then</p><p>　　delete txjz_tab;</p><p>　　delete txjz1_tab;</p><p><b>　　end if</b></p&g

101、t;<p>　　if cbx_4.checked then</p><p>　　delete kfxxlx_tab;</p><p><b>　　end if</b></p><p>　　if cbx_5.checked then</p><p>　　delete gzdwxx_tab;</p>

102、;<p><b>　　end if</b></p><p><b>　　操作員管理</b></p><p>　　單擊主菜單“系統維護”下的“操作員管理”子菜單，進入操作員管理窗體。</p><p>　　在下拉菜單處選擇操作員后，輸入密碼點擊“密碼確認”。系統將單行編輯框中的密碼和數據庫中對應的數據比對后判斷是

103、否擁有權限。如果沒有則提示錯誤信息，如果具備權限則將“新增用戶”更改為可操作?！懊艽a確認”按鈕cb_3的代碼如下：</p><p>　　//窗口czygl_win的“密碼確認”按鈕的clicked()事件，判斷密碼正誤</p><p>　　string czy,pwd,pwd1</p><p>　　czy=trim(ddlb_1.text)</p>&

104、lt;p>　　pwd=trim(sle_1.text)</p><p><b>　　//選擇數據庫</b></p><p>　　select pwd into :pwd1 from czy_tab where czy=:czy;</p><p>　　if czy="" then</p><p>

105、　　messagebox("","請選擇操作員!")</p><p><b>　　else</b></p><p>　　if pwd=trim(pwd1) then</p><p>　　string czyjb55</p><p><b>　　//選擇數據</b&g

106、t;</p><p>　　select czyjb into :czyjb55 from czy_tab where czy=:czy;</p><p>　　if trim(czyjb55)=string(1) then</p><p>　　menu_menu.m_系統維護.m_權限設置.enabled=true</p><p>　　cb_1

107、.enabled=true</p><p>　　cb_2.enabled=true</p><p>　　sle_2.enabled=true</p><p>　　sle_3.enabled=true</p><p>　　sle_1.text=""</p><p><b>　　else<

108、;/b></p><p>　　messagebox("","對不起，您不是系統管理員!")</p><p>　　//菜單項“權限設置”不可用</p><p>　　menu_menu.m_系統維護.m_權限設置.enabled=false</p><p>　　cb_2.enabled=true<

109、;/p><p>　　sle_1.text=""</p><p>　　sle_2.enabled=true</p><p>　　sle_3.enabled=true</p><p><b>　　end if</b></p><p><b>　　else</b>&

110、lt;/p><p>　　messagebox("","密碼有誤")</p><p><b>　　end if</b></p><p><b>　　end if</b></p><p>　　通過驗證后“新增用戶”按鈕屬性變?yōu)榭捎?，點擊“新增用戶”按鈕，進入系統操作員

111、管理界面，可對操作員進行增刪以及密碼的改動。</p><p><b>　　權限設置</b></p><p>　　單擊主菜單“系統維護”下的“權限設置”子菜單，進入權限設置窗體。</p><p>　　在本窗口可以完成對操作員權限的級別設定，以及能夠使用的具體功能。命令按鈕“確定”cb_1的部分代碼如下：</p><p>　

112、　//窗口qxgl_win的“確定”按鈕的clicked()事件，設置各菜單項的使用權限</p><p>　　int qxjb89</p><p>　　qxjb89=integer(sle_1.text)</p><p>　　if qxjb89>0 then</p><p>　　if qxjb89=2 then</p>&

113、lt;p>　　//使如下菜單項可用</p><p>　　if cbx_1.checked then</p><p>　　menu_menu.m_基礎信息程序設計.m_客房信息類別.enabled=true</p><p><b>　　end if </b></p><p>　　if cbx_2.checked th

114、en</p><p>　　menu_menu.m_基礎信息程序設計.m_員工信息設計.enabled=true</p><p><b>　　end if </b></p><p><b>　　......</b></p><p><b>　　else</b></p>