軟件工程畢業(yè)設(shè)計-基于net酒店管理系統(tǒng)-wenkub

　

【正文】 在 15 = = = Else 39。根據(jù)輸入的用戶 ID進行查詢 Dim dv As DataView = _ _ (select 密碼 ,姓名 from 用戶清單 where 用戶編號 = 39。登陸用戶的 ID Public UserId As String = 39。存在名為 name的子窗體，是子窗體獲得焦點并返回 True (i).Focus() Return True End If Next 39。合法用戶進入系統(tǒng) If = True Then Dim frm As frmMain = New frmMain = = (frm) End If End Sub (4)設(shè)置程序的啟動項目，讓從系統(tǒng) Main啟動，而不是窗體啟動。用途是收銀結(jié)賬后，賬單明細導(dǎo)入到賬單明細歷史，如表 9所示 表 9.“賬單明細歷史”表 功能模塊設(shè)計 創(chuàng)建系統(tǒng)主窗口 (1)利用系統(tǒng)默認生成的窗體作為主窗體，將其對應(yīng)的文件名更名為 。用途是將預(yù)訂單轉(zhuǎn)入到入住單后，將預(yù)訂單清除并導(dǎo)入到預(yù)訂單歷史，如表 5所示 表 5.“ 預(yù)訂單歷史”表 (6)“入住單”表：入住單號、訂單編號、會員編號、客房類型、抵店時間等。用途是保存樓層編號及名稱，如表 1所示 表 1 .“樓層信息”表 (2)“客房類型”表：類型編號、類型名稱、價格、拼房價格、可超預(yù)訂數(shù)、是否可以拼房 。其他涉及客房的表，都只記錄相應(yīng)的客房編號。 需求分析是從客戶的需求中提取出軟件系統(tǒng)能夠幫助用戶解決的業(yè)務(wù)問題，通過對用戶業(yè)務(wù)問題的分析，規(guī)劃出系統(tǒng)的功能模塊。 Sql Serve 2021 SQL Server 是一個關(guān)系數(shù)據(jù)庫管理系統(tǒng)。 4) 具有處理各種復(fù)雜情況的能力 系統(tǒng)開發(fā)工具 Visual basic .NET Visual Visual Basic 語言演變而來，是一種為高效地生成類型安全和面向?qū)ο蟮膽?yīng)用程序而設(shè)計的語言。作為一有效的統(tǒng)計分析手段，計算機管理系統(tǒng)具有明顯的優(yōu)勢，它在數(shù)據(jù)保存、數(shù)據(jù)交換等方面均能做到快速可靠，是手工操作所不能完成的。 關(guān)鍵詞： 酒店管理系統(tǒng)， SQL Server 2021， Visual 項目開發(fā)背景 酒店業(yè)是一個前景廣闊而又競爭激烈的行業(yè)。雖然信息化并不是酒店走向成功的關(guān)鍵元素，但它可以幫助那些真正影響成敗的要素發(fā)揮更大的效用。 本論文中除引文和致謝的內(nèi)容外，沒有抄襲其他人或其他機構(gòu)已經(jīng)發(fā)表或撰寫過的研究成果。 畢業(yè)論文（設(shè)計） 題 目 酒店管理系統(tǒng) 院 系 計算機系 專 業(yè) 軟件工程 學(xué)生姓名 學(xué) 號 指導(dǎo)教師 職 稱 副教授 二Ｏ一一年 五 月二十日 聲 明 本人鄭重聲明： 持以“求實、創(chuàng)新”的科學(xué)精神從事研究工作。 其他同志對本研究所做的貢獻均已在論文中作了聲明并表示了謝意。因此采用全新的計算機網(wǎng)絡(luò)和管理系統(tǒng)，將成為提高酒店的管理效率，改善服務(wù)水準的重要手段之一。改革開放以來，我國的酒店業(yè)迅速發(fā)展，已經(jīng)成為一個具有相當規(guī)模的產(chǎn)業(yè)。本套酒店管理系統(tǒng)正是為了解決部門之間的信息交流與處理 ,以提高酒店辦公效率而開發(fā)的 ]5[ 。 Visual Basic 允許 開發(fā)人員開發(fā)面向 Windows、 Web 和移動設(shè)備的程序。它最初是由 Microsoft Sybase 和 AshtonTate三家公司共同開發(fā)的，于 1988 年推出了第一個 OS/2 版本 ]1[ 。 酒店管理系統(tǒng)的需求分析 一個通用的酒店管理系統(tǒng)應(yīng)該包括下圖 1示的功能模塊，其中每個功能都由若干相關(guān)聯(lián)的子功能模塊 3 組成 ]6[ (如圖 1所示 )。“客房信息”和其他表間的關(guān)系是 1： N的關(guān)系。用途是保存客房類型信息，如表 2所示 表 2.“客房類型”表 (3)“客房信息”表：客房編號、類型編號、樓層編號、額度人數(shù)、床數(shù)、客房描述、備注、狀態(tài)、是否可以拼房。用途是散客入住酒店時，信息可由預(yù)訂單轉(zhuǎn)入，如表 6所示 11 表 6.“入住單”表 (7)“入住單歷史”表：入住單號、訂單編號、會員編號、客房類型、抵店時間等。 (2)從 ToolBox窗體上選擇 MainMenu控件，為主窗體添加一個圖 12主菜單控件 ]7[ 。在【酒店管理系統(tǒng)屬性頁】對話框中的【啟動對象】下拉列表中選擇 Sub Main. (5)添加判斷子窗體實例狀態(tài)的函數(shù) GetInstanceState,此函 數(shù)的主要作用是實現(xiàn)單擊主窗體的某菜單項，如單擊【預(yù)訂管理】時，只是出現(xiàn)一個預(yù)訂管理子窗體 Private Function GetInstanceState(ByVal name As String) As Boolean 39。不存在名為 Name的子窗體 False Return False End Function 實現(xiàn)系統(tǒng)登錄功能 (1)新建一個窗體，將其 Name屬性設(shè)置為“ frmLogin”，并為其圖 13加控件 14 圖 (2)為 frmLogin類添加如下兩個公共變量。登陸的用戶名 Public UserName As String = Friend WithEvents Label1 As 39。 _ + () + 39。用戶 ID存在 UserId = () 39。 (3)在 SqlDataAdapter對象上右擊， 在彈出的快捷菜單中選擇【生成數(shù)據(jù)集】命令，在彈出的【生成數(shù)據(jù)集】對話框中單擊【確定】按鈕。 Public Function GetInfo() As String 39。更新客房信息表 (預(yù)訂單 ). _ Rows().Delete() Dim db As DataBase = New DataBase Dim strSQL As String = update 客房信息 set 狀態(tài) =39。 (strSQL) () 39。數(shù)據(jù)格式不正確！ ) Exit Sub End Try Try (帳單明細 ).(dr) If = True Then (DataSet11) End If Catch ex As Exception (數(shù)據(jù)添加失敗 !) End Try LoadData() = End Sub 實現(xiàn)收銀退房功能 (1)在【添加新項】對話框的【模板】列表框中選擇【繼承的窗體】選項，并命名為“ ” ,單擊【打開】選項出現(xiàn)【繼承選擇器】對話框，在選擇“ frmBase” 選項并為窗件添加如圖 19所示的控件 圖 (2)從工具箱拖到一個 SqlDataAdapter對象到窗體上，連接 hotelbook數(shù)據(jù)庫，添加入住單表并選擇“入住單號、客房類型、客房編號、抵店時間、離店時間、入住價格、加床價格、預(yù)收款、應(yīng)收賬款、結(jié)賬金額、是否結(jié)賬、結(jié)賬日期、付款方式”字段。清空 DataSet11 () = Dim strSQL As String _ = SELECT 入住單號 , 客房類型 , 客房編號 , 抵店時間 , 離店時間 , 入住價格 , 加床價格 , 預(yù)收款 , 應(yīng)收帳款 , 結(jié)帳金額 , 是否結(jié)帳 , 結(jié)帳日期 , 付款方式 FROM 入住單 39。保存位圖對象的 ArrayList Private bitMaps As ArrayList 39。限制要顯示那些狀態(tài)客房的字符串 Public strFilter As String = (3)選擇【文件】下的【添加現(xiàn)有項】命令，將表示客房狀態(tài)的圖片加入到項目中，單擊【打開】按鈕 (4)在【解決方案資源管理器】對話框設(shè)置剛剛加入到項目的 7個表示客房狀態(tài)的位圖文件，將【屬性】中的【生成操作】設(shè)置為【嵌入的資源】 (5)功能實現(xiàn)的部分代碼如下： Private Sub btnSet_Click(ByVal sender As , _ ByVal e As ) Handles Dim iRow, iCol As Integer iRow = iCol = Dim strState As String = (iRow, iCol) Dim strTmpState As String If iCol 0 Then If = True Then strTmpState = 0 ElseIf = True Then strTmpState = 2 ElseIf = True Then strTmpState = 4 ElseIf = True Then strTmpState = 1 23 ElseIf = True Then strTmpState = 3 ElseIf = True Then strTmpState = 5 End If Else Return End If If strTmpState strState Then Dim db As DataBase = New DataBase Dim dv As DataView = = 樓層編號 = + _ (iRow, 0).(/)(0) Dim strSQL As String = update 客房信息 set 狀態(tài) =39。 (strSQL) () End If LoadData() Dim dvTmp As DataView = = False = False = False 39。 圖 圖 圖 用戶選擇自己身份后，系統(tǒng)會自動跳出相應(yīng)的用戶名 (如圖 22所示 )，用戶輸入密碼成功后點【確定】會自動進入系統(tǒng)，如果密碼輸入錯誤，系統(tǒng)會出現(xiàn)以下提示 (如圖 23所示 ) 管理員界面 當管理員成功進入系統(tǒng)后，可以看到以下界面 (如圖 24 所示 ), 包含有基礎(chǔ)設(shè)置、業(yè)務(wù)管理、房態(tài)管理、退出系統(tǒng)功能。如果需要刪除一條信息，則選中該信息后單擊【刪除】。 圖 26 業(yè)務(wù)管理 業(yè)務(wù)管理具有預(yù)訂管理、入住管理、消費記賬、收銀退房 ,功能，單擊【業(yè)務(wù)管理】會出現(xiàn)以下提示 (如圖 28所示 ) 圖 (1)預(yù)訂管理 選擇【預(yù)訂管理】命令，進入【預(yù)訂管理】功能窗體，在其中處理客房預(yù)訂的業(yè)務(wù) (如圖 29所示 )。 圖