酒店管理系統(tǒng)畢業(yè)論文3

1、<p><b>　　畢業(yè)論文（設計）</b></p><p>　　題 目 酒店管理系統(tǒng) </p><p>　　院 系 計算機系 </p><p>　　專 業(yè) 軟件工程 </p><p>　　二Ｏ一一年 五 月二十日&l

2、t;/p><p>　　目 錄</p><p><b>　　1.緒論1</b></p><p>　　1.1項目開發(fā)背景1</p><p>　　1.2酒店信息化管理的目標2</p><p>　　1.3系統(tǒng)開發(fā)工具2</p><p>　　1.3.1 Visua

3、l basic .NET2</p><p>　　1.3.2 Sql Serve 20052</p><p>　　2.需求分析與規(guī)格說明2</p><p>　　2.1 酒店管理系統(tǒng)的需求分析2</p><p>　　2.1.1 基礎設置3</p><p>　　2.1.2 預訂管理3</p>&

4、lt;p>　　2.1.3 前臺接待管理4</p><p>　　2.1.4 前臺收銀管理4</p><p>　　2.1.5 客房及客史管理5</p><p>　　2.1.6 財務核查管理5</p><p>　　2.1.7 其他系統(tǒng)接口6</p><p>　　2.2數(shù)據(jù)庫需求分析6</p>

5、<p><b>　　2.3實例功能8</b></p><p>　　2.4系統(tǒng)流程圖8</p><p>　　3.酒店管理系統(tǒng)設計9</p><p>　　3.1 數(shù)據(jù)庫設計9</p><p>　　3.2功能模塊設計12</p><p>　　3.2.1 創(chuàng)建系統(tǒng)主窗口12<

6、/p><p>　　3.2.2 實現(xiàn)系統(tǒng)登錄功能13</p><p>　　3.2.3實現(xiàn)客房類型設置功能15</p><p>　　3.2.4實現(xiàn)客房信息設置功能16</p><p>　　3.2.5實現(xiàn)預訂管理功能17</p><p>　　3.2.6實現(xiàn)入住管理功能18</p><p>　　3

7、.2.7實現(xiàn)消費記賬功能19</p><p>　　3.2.8 實現(xiàn)收銀退房功能20</p><p>　　3.2.9實現(xiàn)設置房態(tài)圖的功能21</p><p>　　4.酒店管理系統(tǒng)介紹23</p><p>　　4.1登錄界面23</p><p>　　4.2 管理員界面24</p><p>

8、;　　4.2.1 基礎設置24</p><p>　　4.2.2 業(yè)務管理26</p><p>　　4.2.3房態(tài)管理27</p><p><b>　　5.總結28</b></p><p>　　附錄A 外文原文31</p><p>　　附錄B 外文譯文37</p>&l

9、t;p><b>　　酒店管理系統(tǒng)</b></p><p>　　摘要：在信息高度發(fā)達的今天，酒店業(yè)務涉及的各個工作環(huán)節(jié)已經(jīng)不再僅僅是傳統(tǒng)的住宿、結算業(yè)務，而是更廣更全面的服務性行業(yè)代表。酒店作為一個服務性行業(yè)，從客房的營銷即客人的預計開始，從入住登記直到最后退房結賬，整個過程應該能夠以賓客為中心，提供快捷方便的服務，給賓客一種顧客至上的享受，只有提高酒店的管理水平，簡單化各種復雜的操作，

10、在最合理的最短的時間內完成酒店業(yè)務的規(guī)范操作，這樣才能令旅客舒適難忘，面對酒店業(yè)內激烈的競爭形勢，各酒店均在努力拓展服務領域的廣度和深度。雖然信息化并不是酒店走向成功的關鍵元素，但它可以幫助那些真正影響成敗的要素發(fā)揮更大的效用。因此采用全新的計算機網(wǎng)絡和管理系統(tǒng)，將成為提高酒店的管理效率，改善服務水準的重要手段之一。</p><p>　　本系統(tǒng)采用SQL Server 2005建立數(shù)據(jù)庫，用Visual Basi

11、c.NET完成系統(tǒng)的制作，本系統(tǒng)能夠實現(xiàn)一般酒店的管理功能，包含酒店管理中的基礎設置，業(yè)務管理，房態(tài)管理等。能夠方便酒店管理人員查閱客房動態(tài)、采集客戶信息、處理客戶訂單、結算。</p><p>　　關鍵詞：酒店管理系統(tǒng)，SQL Server 2005，Visual Basic.NET</p><p><b>　　1.緒論</b></p><p>

12、;<b>　　1.1項目開發(fā)背景</b></p><p>　　酒店業(yè)是一個前景廣闊而又競爭激烈的行業(yè)。改革開放以來，我國的酒店業(yè)迅速發(fā)展，已經(jīng)成為一個具有相當規(guī)模的產(chǎn)業(yè)。由于我國的旅游業(yè)迅速發(fā)展，通過調查，我國在2020年將成為世界上第四大旅游國家；同時我國加入世界貿(mào)易組織，酒店業(yè)將完全開放，這個時候，我國的酒店業(yè)將面臨著前所未有的機遇和挑戰(zhàn) 。酒店行業(yè)的激烈競爭使得爭取客源、提高酒店滿員率

13、、指定正確的銷售策略已經(jīng)成為一項重要的任務，而借助于當前蓬勃發(fā)展的IT工具來拓展銷售能力，創(chuàng)造客觀的經(jīng)濟效益已經(jīng)成為許多酒店的首選。作為一有效的統(tǒng)計分析手段，計算機管理系統(tǒng)具有明顯的優(yōu)勢，它在數(shù)據(jù)保存、數(shù)據(jù)交換等方面均能做到快速可靠，是手工操作所不能完成的。本套酒店管理系統(tǒng)正是為了解決部門之間的信息交流與處理,以提高酒店辦公效率而開發(fā)的。</p><p>　　1.2酒店信息化管理的目標</p>&l

14、t;p>　　為銷售提供全面，準確的信息數(shù)據(jù)。</p><p>　　為客人提供快捷、細致、周到的服務</p><p>　　為財務提供嚴密賬務系統(tǒng)。</p><p>　　具有處理各種復雜情況的能力</p><p><b>　　1.3系統(tǒng)開發(fā)工具</b></p><p>　　1.3.1 Visua

15、l basic .NET </p><p>　　Visual Basic.NET是從 Visual Basic 語言演變而來，是一種為高效地生成類型安全和面向對象的應用程序而設計的語言。Visual Basic 允許開發(fā)人員開發(fā)面向 Windows、Web 和移動設備的程序。與所有面向Microsoft .NET Framework語言一樣，使用 Visual Basic 編寫的程序都具有安全性和語言互操作性方面

16、優(yōu)點。VB.net常被人稱為VB7.0即對VB6的升級是不對的，幾乎在.net中思想已經(jīng)完全改變，VB6中是基于事件和對象的思想，而在.net中由于使用了.net框架，面對對象在.net中尤為突出，6中過程思想還能運用，但在.net中過程思想已完全被OOP思想取代。</p><p>　　1.3.2 Sql Serve 2005</p><p>　　SQL Server 是一個關系數(shù)據(jù)庫管理

17、系統(tǒng)。它最初是由Microsoft Sybase 和Ashton-Tate三家公司共同開發(fā)的，于1988 年推出了第一個OS/2 版本。在Windows NT 推出后，Microsoft與Sybase 在SQL Server 的開發(fā)上就分道揚鑣了，Microsoft 將SQL Server 移植到Windows NT系統(tǒng)上，專注于開發(fā)推廣SQL Server 的Windows NT 版本。Sybase 則較專注于SQL Server在U

18、NIX 操作系統(tǒng)上的應SQL Server安裝界面用 。</p><p>　　2.需求分析與規(guī)格說明</p><p>　　需求分析是從客戶的需求中提取出軟件系統(tǒng)能夠幫助用戶解決的業(yè)務問題，通過對用戶業(yè)務問題的分析，規(guī)劃出系統(tǒng)的功能模塊。</p><p>　　2.1 酒店管理系統(tǒng)的需求分析</p><p>　　一個通用的酒店管理系統(tǒng)應該包括下圖

19、1示的功能模塊，其中每個功能都由若干相關聯(lián)的子功能模塊組成(如圖1所示)。 </p><p>　　圖1.酒店管理系統(tǒng)功能模塊</p><p>　　2.1.1 基礎設置</p><p>　　“基礎設置”功能模塊用于對客房類型、客房價格、客房信息、會員資料設置、系統(tǒng)參數(shù)等項目進行初始化設置，這些設置一般不輕易改動，其中包含的子功能模塊如圖2所示</p>

20、;<p>　　圖2.基礎設置功能模塊</p><p>　　2.1.2 預訂管理</p><p>　　“預訂模塊”功能模塊用于管理客戶的預訂業(yè)務，有散客預訂、團體預訂、預訂查詢、修改預訂、經(jīng)理控房、合約配額、房態(tài)表、可售情況表的功能，其中包含的子功能模塊如圖3所示</p><p>　　圖3.預訂管理功能模塊</p><p>　　

21、2.1.3 前臺接待管理</p><p>　　“前臺接待管理”功能模塊用于管理客戶入住和入住后的相關業(yè)務，有散客入住、團隊客人入住、預訂入住、客人換房、客人續(xù)住、房態(tài)修改、房態(tài)查詢的功能，其中包含的子功能模塊如圖4所示</p><p>　　圖4.前臺接待管理功能模塊</p><p>　　2.1.4 前臺收銀管理</p><p>　　“前臺收銀

22、管理”功能模塊用于管理客戶退房及相關收銀業(yè)務，有記賬操作、客房退單、團體退房、預付金管理、附加費管理、傭金管理、費用統(tǒng)計的功能，其中包含的子模塊如圖5所示</p><p>　　圖5.前臺收銀管理功能模塊</p><p>　　2.1.5 客房及客史管理</p><p>　　“客房及客史管理”功能也叫“管家管理”功能，用于管理客房的信息和客戶住宿歷史的信息，有可用房查詢

23、、房態(tài)維護、房態(tài)統(tǒng)計、維修房報表、在住散客報表、在住團報表、長住房報表等功能，其中包含的子功能模塊如圖6所示</p><p>　　圖6.客服及客史管理功能模塊</p><p>　　2.1.6 財務核查管理</p><p>　　“財務核查管理”功能模塊用于管理酒店每天的財務核查工作，有夜審、普通房租過賬、包價房租過賬、結賬單審核、打印催賬單、班次結賬。其中包含的子功能

24、模塊如圖7所示</p><p>　　圖7.財務核查管理功能模塊</p><p>　　2.1.7 其他系統(tǒng)接口</p><p>　　“其他系統(tǒng)接口”功能模塊提供了酒店管理系統(tǒng)與其他系統(tǒng)的接口，實現(xiàn)不同系統(tǒng)間的數(shù)據(jù)共享，其中包含的子功能模塊如圖8所示</p><p>　　圖8. 其他系統(tǒng)接口功能模塊</p><p>　　

25、2.2數(shù)據(jù)庫需求分析</p><p>　　一個基本的酒店管理系統(tǒng)數(shù)據(jù)庫中大致包括100多張表，分別存放在相應的子功能的數(shù)據(jù)信息，其中“客房信息”和“客戶信息”表是起關鍵作用的表，用于存放酒店客房的基本信息和酒店入住客戶的信息。其他涉及客房的表，都只記錄相應的客房編號?！翱头啃畔ⅰ焙推渌黹g的關系是1：N的關系。圖9為酒店管理系統(tǒng)關鍵實體的E-R圖。</p><p>　　圖9.酒店管理系統(tǒng)關

26、鍵實體的E-R圖</p><p><b>　　2.3實例功能</b></p><p>　　由于水平和時間有限，本系統(tǒng)簡化了需求分析中的各功能所含的屬性，只設計了關鍵的功能模塊，詳細實例圖如圖10所示</p><p>　　圖10.酒店管理系統(tǒng)實例功能</p><p><b>　　2.4系統(tǒng)流程圖</b>

27、;</p><p><b>　　圖11.系統(tǒng)流程圖</b></p><p>　　3.酒店管理系統(tǒng)設計</p><p><b>　　3.1 數(shù)據(jù)庫設計</b></p><p>　　根據(jù)系統(tǒng)的功能要求，主要構造以下幾個表:</p><p>　　(1)“樓層信息”表:樓層編號、樓層

28、名稱。用途是保存樓層編號及名稱，如表1所示</p><p>　　表1 .“樓層信息”表</p><p>　　(2)“客房類型”表：類型編號、類型名稱、價格、拼房價格、可超預訂數(shù)、是否可以拼房。用途是保存客房類型信息，如表2所示</p><p>　　表2.“客房類型”表</p><p>　　(3)“客房信息”表：客房編號、類型編號、樓層編號、額

29、度人數(shù)、床數(shù)、客房描述、備注、狀態(tài)、是否可以拼房。用途是保存酒店所有客房信息，如表3所示</p><p>　　表3.“客房信息”表</p><p>　　(4)“預訂單”表：預訂單號、會員編號、客房類型、抵店時間等。用途是散客訂房間時使用，如表4所示</p><p><b>　　表4.“預訂單”表</b></p><p>

30、　　(5)“ 預訂單歷史”表：預訂單號、會員編號、客房類型、抵店時間、離店時間、單據(jù)狀態(tài)。用途是將預訂單轉入到入住單后，將預訂單清除并導入到預訂單歷史，如表5所示</p><p>　　表5.“ 預訂單歷史”表</p><p>　　(6)“入住單”表：入住單號、訂單編號、會員編號、客房類型、抵店時間等。用途是散客入住酒店時，信息可由預訂單轉入，如表6所示</p><p&g

31、t;<b>　　表6.“入住單”表</b></p><p>　　(7)“入住單歷史”表：入住單號、訂單編號、會員編號、客房類型、抵店時間等。用途是入住單在收銀結賬后清除，并導入到入住單歷史，如表7所示</p><p>　　表7.“入住單歷史”表</p><p>　　(8)“ 賬單明細”表：賬單編號、入住單號、消費內容、消費金額、消費時間、備注。

32、用途是查詢客戶消費的明細單，如表8所示</p><p>　　表8.“ 賬單明細”表</p><p>　　(9)“賬單明細歷史”表：賬單編號、入住單號、消費內容、消費金額、消費時間、備注。用途是收銀結賬后，賬單明細導入到賬單明細歷史，如表9所示</p><p>　　表9.“賬單明細歷史”表</p><p><b>　　3.2功能模塊設

33、計</b></p><p>　　3.2.1 創(chuàng)建系統(tǒng)主窗口</p><p>　　(1)利用系統(tǒng)默認生成的窗體作為主窗體，將其對應的文件名更名為firmMain.vb。</p><p>　　(2)從ToolBox窗體上選擇MainMenu控件，為主窗體添加一個圖12主菜單控件。</p><p><b>　　圖12.系統(tǒng)主窗

34、口</b></p><p>　　(3)在窗體frmMain對應的代碼文件中添加公有變量以及程序入口函數(shù)Main</p><p>　　Public Shared Sub Main()</p><p><b>　　'顯示登陸對話框</b></p><p>　　Dim loginFrm As frmLogi

35、n = New frmLogin</p><p>　　loginFrm.ShowDialog()</p><p><b>　　'合法用戶進入系統(tǒng)</b></p><p>　　If loginFrm.bResult = True Then</p><p>　　Dim frm As frmMain = New frm

36、Main</p><p>　　frm.UserName = loginFrm.UserName</p><p>　　frm.UserId = loginFrm.UserId</p><p>　　Application.Run(frm)</p><p><b>　　End If</b></p><p&g

37、t;<b>　　End Sub</b></p><p>　　(4)設置程序的啟動項目，讓從系統(tǒng)Main啟動，而不是窗體啟動。在【酒店管理系統(tǒng)屬性頁】對話框中的【啟動對象】下拉列表中選擇Sub Main.</p><p>　　(5)添加判斷子窗體實例狀態(tài)的函數(shù) GetInstanceState,此函數(shù)的主要作用是實現(xiàn)單擊主窗體的某菜單項，如單擊【預訂管理】時，只是出現(xiàn)一

38、個預訂管理子窗體</p><p>　　Private Function GetInstanceState(ByVal name As String) As Boolean</p><p>　　'獲得frmMain窗體的子窗體的數(shù)量</p><p>　　Dim i As Integer = Me.MdiChildren.Length</p>&l

39、t;p>　　'循環(huán)判斷是否有名為name的子窗體實例</p><p>　　For i = 0 To Me.MdiChildren.Length - 1</p><p>　　If Me.MdiChildren(i).Name = name Then</p><p>　　'存在名為name的子窗體，是子窗體獲得焦點并返回True</p>

40、<p>　　Me.MdiChildren(i).Focus()</p><p>　　Return True</p><p><b>　　End If</b></p><p><b>　　Next</b></p><p>　　'不存在名為Name的子窗體False</p&g

41、t;<p>　　Return False</p><p>　　End Function</p><p>　　3.2.2 實現(xiàn)系統(tǒng)登錄功能</p><p>　　(1)新建一個窗體，將其Name屬性設置為“frmLogin”，并為其圖13加控件</p><p>　　圖13.系統(tǒng)登錄窗體</p><p>　　(

42、2)為frmLogin類添加如下兩個公共變量。</p><p>　　Public Class frmLogin</p><p>　　Inherits System.Windows.Forms.Form</p><p><b>　　'用于返回登陸結果</b></p><p>　　Public bResult As

43、Boolean = False</p><p><b>　　'登陸用戶的ID</b></p><p>　　Public UserId As String = ""</p><p><b>　　'登陸的用戶名</b></p><p>　　Public UserNam

44、e As String = ""</p><p>　　Friend WithEvents Label1 As System.Windows.Forms.Label</p><p><b>　　'登陸的用戶密碼</b></p><p>　　Private UserPwd As String = ""

45、</p><p>　　(3)為文本框txbUserld添加LostFocus事件響應函數(shù)</p><p>　　ByVal e As System.EventArgs) Handles txbUserId.LostFocus</p><p>　　'定義一個數(shù)據(jù)訪問類的對象</p><p>　　Dim db As DataBase = N

46、ew DataBase</p><p>　　'根據(jù)輸入的用戶ID進行查詢</p><p>　　Dim dv As DataView = _</p><p>　　db.RunSelectSQL _</p><p>　　("select 密碼,姓名 from 用戶清單 where 用戶編號 = '" _<

47、/p><p>　　+ Me.txbUserId.Text.Trim() + "'")</p><p>　　'判斷用戶ID是否存在</p><p>　　If dv.Count = 0 Then</p><p><b>　　'用戶ID不存在</b></p><p&g

48、t;　　Me.txbUserId.Text = ""</p><p>　　Me.txbPwd.Text = ""</p><p>　　Me.txbName.Text = ""</p><p><b>　　Else</b></p><p><b>　　&

49、#39;用戶ID存在</b></p><p>　　UserId = Me.txbUserId.Text.Trim()</p><p>　　'獲得用戶的密碼級用戶名</p><p>　　Me.UserPwd = dv.Item(0)("密碼")</p><p>　　Me.txbName.Text = dv

50、.Item(0)("姓名")</p><p><b>　　End If</b></p><p>　　'釋放數(shù)據(jù)訪問類的占用資源</p><p>　　db.Dispose()</p><p><b>　　End Sub</b></p><p>　　3

51、.2.3實現(xiàn)客房類型設置功能</p><p>　　(1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“frmRoomType.vb</p><p>　　(2)為新建窗口添加如圖14示控件</p><p>　　圖14.客房類型設置窗體</p><p>　　(3)從工具箱中拖到一個SqlDataAdapter控件到窗體上

52、，連接到設計的數(shù)據(jù)庫，并添加客房類型的數(shù)據(jù)庫信息</p><p>　　(4)為TextBox控件以及ComboBox控件設置數(shù)據(jù)源。 </p><p>　　(5)重寫frmRoomType類型frmBase的函數(shù)(由于代碼較長，只摘錄部分代碼)</p><p>　　Public Overrides Sub SaveForAdd()</p><p&

53、gt;　　Dim dr As DataRow = DataSet11.Tables("客房類型").NewRow()</p><p><b>　　Try</b></p><p>　　dr("類型編號") = txbCode.Text.Trim</p><p>　　dr("類型名稱")

54、= txbName.Text.Trim</p><p>　　dr("可超預訂數(shù)") = txbDays.Text.Trim</p><p>　　dr("拼房價格") = txbPinPrice.Text.Trim</p><p>　　dr("價格") = txbPrice.Text.Trim</p&g

55、t;<p>　　dr("是否可拼房") = ckbPin.Checked</p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show("數(shù)據(jù)格式不正確！")</p><p><b>　　Exit Sub</b></p>&

56、lt;p><b>　　End Try</b></p><p><b>　　Try</b></p><p>　　DataSet11.Tables("客房類型").Rows.Add(dr)</p><p>　　If Me.DataSet11.HasChanges = True Then</p&g

57、t;<p>　　SqlDataAdapter1.Update(DataSet11)</p><p><b>　　End If</b></p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show("數(shù)據(jù)添加失敗!")</p><p>

58、<b>　　End Try</b></p><p>　　LoadData()</p><p>　　dgdList.DataSource = dtData.DefaultView</p><p><b>　　End Sub</b></p><p>　　3.2.4實現(xiàn)客房信息設置功能</p>

59、<p>　　(1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“frmRoomInfo.vb”,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇frmBase選項并為窗件添加圖15控件 </p><p>　　圖15.客房信息設置窗體</p><p>　　(2)客房類型設置功能與客房信息設置功能相似，詳細代碼可參照客房信息功能模塊代碼</

60、p><p>　　3.2.5實現(xiàn)預訂管理功能</p><p>　　(1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“frmReserve.vb”,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇frmBase選項并為窗件添加圖16控件</p><p>　　圖16.預訂管理功能窗體</p><p>　　(2) 從工具箱中拖

61、到一個SqlDataAdapter對象到窗體上，連接hotelbook數(shù)據(jù)庫，添加預訂單，并選擇所有字段。</p><p>　　(3)在SqlDataAdapter對象上右擊，在彈出的快捷菜單中選擇【生成數(shù)據(jù)集】命令，在彈出的【生成數(shù)據(jù)集】對話框中單擊【確定】按鈕。</p><p>　　(4)為類frmReserve添加以下變量</p><p>　　Public C

62、lass frmReserve</p><p>　　Inherits 酒店管理系統(tǒng).frmBase</p><p>　　'用來標示雙擊dgdList,窗體是否自動關閉</p><p>　　Public bClose As Boolean = False</p><p>　　Private gridMouseDownTime As Da

63、teTime = New DateTime</p><p><b>　　'客房編號</b></p><p>　　Private strRoomCode As String = "</p><p>　　(5)為窗體類frmReserve添加公有函數(shù)GetInfo。</p><p>　　Public Fun

64、ction GetInfo() As String</p><p>　　'獲得DataGrid當前被選中的行號</p><p>　　Dim iRow As Integer = dgdList.CurrentRowIndex</p><p>　　Dim sId As String</p><p>　　'獲取DataGrid當前被

65、選中的行的內容</p><p>　　sId = dtData.Rows(iRow)("預訂單號").ToString()</p><p>　　Return sId</p><p>　　End Function</p><p>　　3.2.6實現(xiàn)入住管理功能</p><p>　　(1)在【添加新項】對

66、話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“frmReside.vb”,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇frmBase選項并為窗件添加如圖17控件</p><p>　　圖17.入住管理功能窗體</p><p>　　(2)從工具箱中拖到一個SqlDataAdapter對象到窗體上，連接hotelbook數(shù)據(jù)庫，添加入住單，并選擇所有字段。</p>&

67、lt;p>　　(3)為類“frmReside.vb”添加以下變量</p><p>　　Public Class frmReside</p><p>　　Inherits 酒店管理系統(tǒng).frmBase</p><p>　　Public bClose As Boolean = False</p><p>　　Private gridMous

68、eDownTime As DateTime = New DateTime</p><p>　　Private strRoomCode As String = ""</p><p>　　(4)更新客房信息，對已經(jīng)空房的房間，刪除之前的入住信息</p><p>　　Public Overrides Sub DeleteData()</p>

69、<p><b>　　Try</b></p><p><b>　　'更新客房信息表</b></p><p>　　DataSet11.Tables("預訂單"). _</p><p>　　Rows(bmData.Position).Delete()</p><p&g

70、t;　　Dim db As DataBase = New DataBase</p><p>　　Dim strSQL As String = "update 客房信息 set 狀態(tài)='空房'" + " where 客房編號='" + txbRoomCode.Text.Trim + "'"</p><p&

71、gt;　　db.RunDelOrInsSQL(strSQL)</p><p>　　db.Dispose()</p><p><b>　　'刪除當前行的數(shù)據(jù)</b></p><p>　　DataSet11.Tables("入住單"). _</p><p>　　Rows(bmData.Positi

72、on).Delete()</p><p>　　If Me.DataSet11.HasChanges = True Then</p><p>　　'更新DataSet11</p><p>　　SqlDataAdapter1.Update(DataSet11)</p><p><b>　　End If</b><

73、/p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show("數(shù)據(jù)刪除失敗!")</p><p><b>　　End Try</b></p><p>　　3.2.7實現(xiàn)消費記賬功能</p><p>　　(1)在【添加新項】對話框

74、的【模板】列表框中選擇【繼承的窗體】選項，并命名為“frmConsume.vb”,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇frmBase選項并為窗件添加圖18控件</p><p>　　圖18.消費記賬功能窗體</p><p>　　(2)從工具箱中拖到一個SqlDataAdapter控件到窗體上，連接到設計的數(shù)據(jù)庫，并添加客房類型的數(shù)據(jù)庫信息</p><p>

75、　　(3)從工具箱中拖到一個SqlDataAdapter控件到窗體上，連接到設計的數(shù)據(jù)庫，并添加客房類型的數(shù)據(jù)庫信息</p><p>　　(4)為TextBox控件以及ComboBox控件設置數(shù)據(jù)源。</p><p>　　(5)功能實現(xiàn)的部分代碼如下</p><p>　　Public Overrides Sub SaveForAdd()</p><

76、;p>　　Dim dr As DataRow = DataSet11.Tables("帳單明細").NewRow()</p><p><b>　　Try</b></p><p>　　dr("入住單號") = txbInId.Text.Trim</p><p>　　dr("消費內容"

77、;) = cbbContent.Text.Trim</p><p>　　dr("消費金額") = txbMoney.Text.Trim</p><p>　　dr("消費時間") = tmConsume.Value.ToString</p><p>　　dr("備注") = txbRemark.Text.Tr

78、im</p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show(ex.ToString) '"數(shù)據(jù)格式不正確！")</p><p><b>　　Exit Sub</b></p><p><b>　　End Try</b&

79、gt;</p><p><b>　　Try</b></p><p>　　DataSet11.Tables("帳單明細").Rows.Add(dr)</p><p>　　If Me.DataSet11.HasChanges = True Then</p><p>　　SqlDataAdapter1.Up

80、date(DataSet11)</p><p><b>　　End If</b></p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show("數(shù)據(jù)添加失敗!")</p><p><b>　　End Try</b></

81、p><p>　　LoadData()</p><p>　　dgdList.DataSource = dtData.DefaultView</p><p><b>　　End Sub</b></p><p>　　3.2.8 實現(xiàn)收銀退房功能</p><p>　　(1)在【添加新項】對話框的【模板】列表框

82、中選擇【繼承的窗體】選項，并命名為“frmCash.vb”,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇“frmBase” 選項并為窗件添加如圖19所示的控件</p><p>　　圖19.收銀退房功能窗體</p><p>　　(2)從工具箱拖到一個SqlDataAdapter對象到窗體上，連接hotelbook數(shù)據(jù)庫，添加入住單表并選擇“入住單號、客房類型、客房編號、抵店時間、離店時間

83、、入住價格、加床價格、預收款、應收賬款、結賬金額、是否結賬、結賬日期、付款方式”字段。</p><p>　　(3)在SqlDataAdapter對象上右擊，在彈出的快捷菜單中選擇【生成數(shù)據(jù)集】命令。在彈出的【生成數(shù)據(jù)集】對話框中單擊【新建】單選按鈕，然后單擊【確定】按鈕。</p><p>　　(4)功能實現(xiàn)部分代碼如下：</p><p>　　Public Overr

84、ides Sub LoadData()</p><p>　　'清空DataSet11</p><p>　　DataSet11.Clear()</p><p>　　SqlConnection1.ConnectionString = DataBase.sConn</p><p>　　Dim strSQL As String</p&g

85、t;<p>　　SqlDataAdapter1.SelectCommand.CommandText _</p><p>　　= "SELECT 入住單號, 客房類型, 客房編號, 抵店時間, 離店時間, 入住價格, 加床價格, 預收款, 應收帳款, 結帳金額, 是否結帳, 結帳日期, 付款方式 FROM 入住單 "</p><p>　　'根據(jù)查詢條

86、件重新填充DataSet11</p><p>　　SqlDataAdapter1.Fill(DataSet11)</p><p>　　dtData = DataSet11.Tables("入住單")</p><p>　　bmData = Me.BindingContext(DataSet11, "入住單")</p>

87、<p>　　If bmData.Count <> 0 Then</p><p>　　bmData.Position = 0</p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　3.2.9實現(xiàn)設置房態(tài)圖的功

88、能</p><p>　　(1)新建一個窗體，將其Name屬性改為“frmRoomState”,并為其添加如下圖20控件</p><p>　　圖20.房態(tài)圖設置功能窗體</p><p>　　(2)為類添加如下變量</p><p>　　Public Class frmRoomState</p><p>　　Inherits

89、 System.Windows.Forms.Form</p><p>　　'為dgdList保存數(shù)據(jù)的數(shù)據(jù)表</p><p>　　Private dtData As DataTable</p><p>　　'保存要顯示的客房信息的數(shù)據(jù)表</p><p>　　Private dtRoom As DataTable</p&g

90、t;<p>　　'保存位圖對象的ArrayList</p><p>　　Private bitMaps As ArrayList</p><p>　　'記錄房間數(shù)最多的那一層的房間數(shù)</p><p>　　Private iMaxRoomNumber As Int16</p><p>　　Private gridM

91、ouseDownTime As DateTime = New DateTime</p><p><b>　　'客房編號</b></p><p>　　Public strRoomCode As String = ""</p><p>　　'雙擊DataGrid的單元格是否關閉窗口</p><

92、p>　　Public bClose As Boolean = False</p><p>　　'限制要顯示那些狀態(tài)客房的字符串</p><p>　　Public strFilter As String = ""</p><p>　　(3)選擇【文件】下的【添加現(xiàn)有項】命令，將表示客房狀態(tài)的圖片加入到項目中，單擊【打開】按鈕</

93、p><p>　　(4)在【解決方案資源管理器】對話框設置剛剛加入到項目的7個表示客房狀態(tài)的位圖文件，將【屬性】中的【生成操作】設置為【嵌入的資源】</p><p>　　(5)功能實現(xiàn)的部分代碼如下：</p><p>　　Private Sub btnSet_Click(ByVal sender As System.Object, _</p><p&g

94、t;　　ByVal e As System.EventArgs) Handles btnSet.Click</p><p>　　Dim iRow, iCol As Integer</p><p>　　iRow = dgdList.CurrentCell.RowNumber</p><p>　　iCol = dgdList.CurrentCell.ColumnNumb

95、er</p><p>　　Dim strState As String = dgdList.Item(iRow, iCol)</p><p>　　Dim strTmpState As String</p><p>　　If iCol <> 0 Then</p><p>　　If Me.rbnArrive.Checked = Tru

96、e Then</p><p>　　strTmpState = "0"</p><p>　　ElseIf Me.rbnEmpty.Checked = True Then</p><p>　　strTmpState = "2"</p><p>　　ElseIf Me.rbnFull.Checked = Tr

97、ue Then</p><p>　　strTmpState = "4"</p><p>　　ElseIf Me.rbnLeave.Checked = True Then</p><p>　　strTmpState = "1"</p><p>　　ElseIf Me.rbnRepair.Checked =

98、 True Then</p><p>　　strTmpState = "3"</p><p>　　ElseIf Me.rbnSelf.Checked = True Then</p><p>　　strTmpState = "5"</p><p><b>　　End If</b>&l

99、t;/p><p><b>　　Else</b></p><p><b>　　Return</b></p><p><b>　　End If</b></p><p>　　If strTmpState <> strState Then</p><p>

100、;　　Dim db As DataBase = New DataBase</p><p>　　Dim dv As DataView = dtRoom.Copy.DefaultView</p><p>　　dv.RowFilter = "樓層編號=" + _</p><p>　　dgdList.Item(iRow, 0).ToString.Spli

101、t("/")(0)</p><p>　　Dim strSQL As String = "update 客房信息 set 狀態(tài)='"</p><p>　　strSQL += GetStateText(strTmpState) + "'"</p><p>　　strSQL += " w

102、here 客房編號='"</p><p>　　strSQL += dv(iCol - 1)(0).ToString.Trim + "'"</p><p>　　db.RunDelOrInsSQL(strSQL)</p><p>　　db.Dispose()</p><p><b>　　En

103、d If</b></p><p>　　LoadData()</p><p>　　Dim dvTmp As DataView = dtData.DefaultView</p><p>　　dvTmp.AllowNew = False</p><p>　　dvTmp.AllowDelete = False</p><

104、;p>　　dvTmp.AllowEdit = False</p><p><b>　　'設置數(shù)據(jù)源</b></p><p>　　dgdList.DataSource = dtData.DefaultView</p><p><b>　　End Sub</b></p><p>　　4.酒

105、店管理系統(tǒng)介紹</p><p><b>　　4.1登錄界面</b></p><p>　　點擊進入本系統(tǒng)，首先出現(xiàn)的登陸界面(如圖21)。第一行是大標題“酒店管理系統(tǒng)”，用戶可在標題下方第一排的下拉框中選擇自己的角色，有四種選擇：管理員、銷售員、會計員、采購員。用戶可根據(jù)自己的身份選擇適合的角色。 </p><p><b>　　圖21.

106、登錄界面</b></p><p>　　圖22.登錄界面二 圖23.登錄界面三</p><p>　　用戶選擇自己身份后，系統(tǒng)會自動跳出相應的用戶名(如圖22所示)，用戶輸入密碼成功后點【確定】會自動進入系統(tǒng)，如果密碼輸入錯誤，系統(tǒng)會出現(xiàn)以下提示(如圖23所示)</p><p><b>　　4.2 管理員界面</b&

107、gt;</p><p>　　當管理員成功進入系統(tǒng)后，可以看到以下界面(如圖24 所示), 包含有基礎設置、業(yè)務管理、房態(tài)管理、退出系統(tǒng)功能。</p><p><b>　　圖24.管理員界面</b></p><p>　　4.2.1 基礎設置</p><p>　　基礎設置具有客房類型設置和客房信息設置功能，單擊【基礎設置】會

108、出現(xiàn)以下提示(如圖25所示)</p><p>　　圖25. 基礎設置界面</p><p><b>　　(1)客房類型設置</b></p><p>　　單擊【客房類型設置】命令，進入【進入客房類型設置】功能窗體，在其中輸入客房類型的相關信息(如圖26所示)。其中【價格】屬性對應這種類型客房的住宿價格。如果需要新增或修改類別，單擊相應按鈕，輸入新信

109、息后單擊【保存】即可。如果需要刪除一條信息，則選中該信息后單擊【刪除】。</p><p>　　圖26.客房類型設置界面</p><p><b>　　(2)客房信息設置</b></p><p>　　單擊【客房信息設置】命令，進入【客房信息設置】功能窗體(如圖27所示)，在其中輸入客房的信息，其中【類型編號】屬性從前面建立的客房類型中選擇。選擇客房

110、的類型后，在數(shù)據(jù)庫中存儲的是客服編號。樓層編號一樣，從“樓層”用戶表中選擇樓層名稱，保存的是樓層的編號。</p><p>　　圖27.客房信息設置界面</p><p>　　4.2.2 業(yè)務管理</p><p>　　業(yè)務管理具有預訂管理、入住管理、消費記賬、收銀退房,功能，單擊【業(yè)務管理】會出現(xiàn)以下提示(如圖28所示)</p><p>　　圖2

111、8.業(yè)務管理界面</p><p><b>　　(1)預訂管理</b></p><p>　　選擇【預訂管理】命令，進入【預訂管理】功能窗體，在其中處理客房預訂的業(yè)務(如圖29所示)。當客戶需要預訂房間時，單擊【新增】，系統(tǒng)新增加一條記錄，并自動設置預訂單號和單據(jù)狀態(tài)。在下面的【客房類型】下拉列表中選擇顧客想要預訂的客房類型，客房價格和入住價格自動關聯(lián)顯示出來。選擇了客房

112、類型后就可以保存預訂單了，其他項目是選擇填寫的項目，可以根據(jù)實際情況填寫，也可以在預訂時就指定客房，這樣在入住時直接調出就可以了，以避免預訂后沒有客房情況。</p><p>　　圖29.預訂管理界面</p><p><b>　　(2)入住管理</b></p><p>　　選擇【入住管理】命令，進入【入住管理】功能窗體，在其中處理客戶入住業(yè)務(如

113、圖30所示).入住管理和預訂管理操作方法基本是一致的，只是添加了一些屬性，如電話等級、是否提供早餐、是否需要叫醒等，同時還可以通過窗體最下方的【從預訂單選】按鈕，選擇在預訂功能中填寫的預訂單，這樣在預訂客戶入住時就可以直接選擇相應的信息，從而大大提高工作效率。</p><p>　　圖30.入住管理界面</p><p><b>　　(3)消費記賬</b></p&g

114、t;<p>　　選擇【消費記賬】命令，進入【消費記賬】功能窗體(如圖31所示)，在這里輸入客戶消費的相關明細，明細項目對應于客戶入住的入住單號，主要用于在客戶退房結賬時可以統(tǒng)計消費的總金額。</p><p>　　圖31.消費記賬界面</p><p><b>　　(4)收銀退房</b></p><p>　　圖32.收銀退房界面<

115、;/p><p>　　選擇【收銀退房】命令，進入【收銀退房】功能窗體(如圖32所示)，客戶退房時需要在該窗體進行結算操作，首先選擇退房的入住單，單擊【計算應收賬款】按鈕，系統(tǒng)自動計算該入住單的應收賬款總金額和結賬金額，結賬金額為負表示預收款多了，剩余部分退還客戶。核對賬單準確無誤后，選擇付款方式，單擊【收銀結賬退房】按鈕，完成收銀工作，將客房狀態(tài)改為空房。</p><p><b>　　

116、4.2.3房態(tài)管理</b></p><p>　　選擇【收銀退房】命令，進入【收銀退房】功能窗體(如圖33所示)，在這里可以查詢出所有客房的房態(tài)信息，以圖形的形式表現(xiàn)出來，非常的直觀。同時可以在該功能中直接更改客房狀態(tài)，方法為選擇一間客房，在【房態(tài)選擇】選項組中選擇新的房態(tài)，單擊【設置房態(tài)】按鈕，即可更改指定客房的房態(tài)。</p><p>　　圖33. 房態(tài)管理界面</p&g

117、t;<p><b>　　5.總結</b></p><p>　　“酒店管理系統(tǒng)”在現(xiàn)代酒店管理運營過程中起到了舉足輕重的作用，而借助于當前蓬勃發(fā)展的IT工具來擴展銷售能力，創(chuàng)造客觀的經(jīng)濟效益已經(jīng)成為許多酒店的首選。越來越多的酒店加入了信息化管理的陣營，可見酒店信息化管理對于現(xiàn)代酒店管理的作用有多大。</p><p><b>　　參考文獻</

118、b></p><p>　　[1]王 珊,薩師煊,數(shù)據(jù)庫系統(tǒng)概論[M], 高等教育出版社, 2008.</p><p>　　[2]王 晟,馬里杰,數(shù)據(jù)庫開發(fā)經(jīng)典案例解析[M,]清華大學出版社, 2006.</p><p>　　[3]董國平,顏志軍,萬 麗 ,visual basic數(shù)據(jù)庫開發(fā)[M],電子工業(yè)出版社, 2006.</p><p&

119、gt;　　[4]Paulraj Ponniah, 韓宏志 譯, 數(shù)據(jù)庫設計與開發(fā)[M], 清華大學出版社, 2005.</p><p>　　[5]文 通,現(xiàn)代酒店管理規(guī)范實例大全 [M],中國紡織出版社,2008.</p><p>　　[6]王鳳生,高星級酒店績效管理實務[M],中信出版社,2008.</p><p>　　[7]王 晟,Visual Basic.NE

120、T數(shù)據(jù)庫開發(fā)經(jīng)典案例解析[M],清華大學出版社,2005.</p><p>　　[8]孫街亭,Visual Basic.NET程序設計案例教程[M],中國水利水電出版社,2010.</p><p>　　[9]龔小勇,關系數(shù)據(jù)庫與 SQL Server 2005[M],機械工業(yè)出版社,2009.</p><p>　　[10]程旭東,現(xiàn)代酒店管理[M],人民郵電出版社,

121、2011.</p><p>　　[11]牛越勝,現(xiàn)代酒店管理信息系統(tǒng)[M],廣東旅游出版社 ,2004.</p><p><b>　　致謝</b></p><p>　　本設計在xx老師的悉心指導和嚴格要求下業(yè)已完成，從課題選擇、方案論證到具體設計和調試，無不凝聚著xx老師的心血和汗水，xx老師認真負責的工作態(tài)度，嚴謹?shù)闹螌W精神和深厚的理論水平都

122、讓我受益匪淺。他無論在理論上還是在實踐中，都給予我很大的幫助，使我得到不少的提高，這對于我以后的學習有一種巨大的幫助，感謝他耐心的輔導。在四年的本科學習和生活期間，各位任課老師的認真負責，使我能夠很好的掌握和運用專業(yè)知識，并在設計中得以體現(xiàn)。正是有了他們的悉心幫助和支持，才使我的畢業(yè)論文工作順利完成，在此向zz計算機與軟件學院的全體老師表示由衷的謝意，感謝他們四年來的辛勤栽培。</p><p>　　Hotel M

123、anagement System</p><p>　　Zhu Guixiang</p><p>　　Binjiang College, Nanjing University of Information Science & Technology, Nanjing,210044</p><p><b>　　ABSTRACT:</b><

124、;/p><p>　　With highly developed in the information today, All the work involved in hotel business links have already longer merely the traditional lodging, Settle accounts traffic, But is more widely more overa

125、ll service - type businesses representative. The hotel is a service - type businesses, From the marketing of guest room namely the guest's projected begin, from the marketing of guest room then the guest's projec