【正文】 作業(yè)規(guī)范 III 點(diǎn)，空一格接寫(xiě)表題，表題末尾不加標(biāo)點(diǎn)。 圖序和圖題應(yīng)放在圖位下方居中處 。2326 [4]Spriggs G history of fine grained hardmetal. Int J of Refractory Metal and Hard Material,1995,13:241255 《管理信息系統(tǒng)》 課程報(bào)告書(shū) 1 酒店管理 系統(tǒng)的分析與設(shè)計(jì) 1 背景及其基本 目標(biāo) 現(xiàn)代社會(huì)，科技飛速發(fā)展，電腦不斷普及。 可行性研究的目的是研究問(wèn)題，花費(fèi)最小的代價(jià)，以最快的速度提出解決問(wèn)題的方法。 2 系統(tǒng)分析 應(yīng)用 單位 的概況及其需求總目標(biāo) 酒店管理是酒店日常運(yùn)作的一個(gè)重要環(huán)節(jié)，學(xué)習(xí)制作酒店管理系統(tǒng)是很有必要的，同時(shí)，酒店管理系統(tǒng)也是服務(wù)行業(yè)管理軟件的一個(gè)綜合性代表，很具有實(shí)踐的意義。房間有三種狀態(tài)，即“已分配”、“已預(yù)訂”、“未分配”，員工有三種權(quán)限即：“ T”、“ U”、“ F”分別代表管理員權(quán)限和一般用戶權(quán)限，“ F”權(quán)限不能登錄系統(tǒng)，而管理員是由系統(tǒng)默認(rèn)。其中關(guān)鍵的技術(shù)包括數(shù)據(jù)庫(kù)的建立，數(shù)據(jù)庫(kù)的連接，數(shù)據(jù)的添加、刪除和更新 。 系統(tǒng)登陸模塊：主要負(fù)責(zé)客戶和管理員進(jìn)入系統(tǒng)的一個(gè)身份驗(yàn)證。 娛樂(lè)管理模塊：主要負(fù)責(zé)客戶娛樂(lè)消費(fèi)的信息管理。數(shù)據(jù)流圖的繪制過(guò)程通常是采用自頂向下，逐層分解，直到功能細(xì)化為止，形成若干層次的數(shù)據(jù)流圖。 2 經(jīng)濟(jì)的可行性 主要是對(duì)項(xiàng)目經(jīng)濟(jì)效益進(jìn)行評(píng)價(jià)，一方面是支出的費(fèi)用，其中包括設(shè)備的購(gòu)置費(fèi)，軟件開(kāi)發(fā)費(fèi)，管理和維護(hù)費(fèi)，人員工資和培訓(xùn)費(fèi)等。 3 管理上的可行性 主要是管理人員 對(duì)開(kāi)發(fā)信息系統(tǒng)是否支持，現(xiàn)有管理制度是否科學(xué)，規(guī)章制度是否齊全，原始數(shù)據(jù)是正確等。 前景根據(jù)以上分析，我們認(rèn)為開(kāi)發(fā)此 系統(tǒng)的條件已經(jīng)具備，可以開(kāi)始進(jìn)行開(kāi)發(fā)。同時(shí)保證投資者資金的安全性，資金穩(wěn)步的回籠期，資金的合理回報(bào)率。 （ 2）房間管理 簡(jiǎn)述：房間信息管理包括查看 房間的使用情況和房間狀態(tài)以及更改房間狀態(tài)，為客人提供訂房參考 輸入：房間編號(hào)或者房門(mén)狀態(tài) 處理過(guò)程描述：提供房間信息，讓顧客選自己滿意的房間并錄入系統(tǒng) 輸出：房間信息以及訂房信息。 性能：穩(wěn)定、快速、準(zhǔn)確。 功能：房間分等級(jí)，客戶入住以后，建立相應(yīng)的住房檔案，方便對(duì)已經(jīng)分配的房間和未分配的房間進(jìn)行管理包括房間信息的查詢。 3 客戶消費(fèi)管理模塊 目的：對(duì)客戶的消費(fèi)信息進(jìn)行管理以及對(duì)酒店的月消費(fèi)進(jìn)行統(tǒng)計(jì)。 輸出項(xiàng)：相應(yīng)的信息記錄和相應(yīng)的出錯(cuò)信息或提示。 性能：穩(wěn)定、快速、正確 輸入項(xiàng)：?jiǎn)T工號(hào)、員工姓名、性別、部門(mén) 輸出項(xiàng)：?jiǎn)T工的基本信息記錄和相應(yīng)的出錯(cuò)信息或提示。其具體代碼如下： Imports 39。uid=sa。打開(kāi)連接 str = insert into 系統(tǒng)日志 (操作時(shí)間 ,用戶名稱 ,內(nèi)容摘要 ,操作內(nèi)容 ) VALUES (39。,39。,39。,39。 ) Dim sql As New SqlCommand(str, sqlcon) () 39。 Else str = delete from amp。 End If Dim sql As New SqlCommand(str, sqlcon) () () End Function Public Function UpdateData(ByVal str1 As String, ByVal str2 As String, ByVal str3 As String) As Integer () If str3 = Then str = update amp。 Else str = update amp。 where amp。在進(jìn)行系統(tǒng)登錄過(guò)程中，登錄模塊將調(diào)用數(shù)據(jù)庫(kù)里的員工檔案表，對(duì)員工號(hào)和密碼進(jìn)行驗(yàn)證（密碼也為員工號(hào)），只有輸入正確后，才能進(jìn)入系統(tǒng)。當(dāng)數(shù)據(jù)應(yīng)經(jīng)存在時(shí)將給出提示如圖 55 所示。 空余房間管理窗體 空 余 房 間 管 理 窗 體空 余 房 間 管 理 窗 體查 看 空 余 房 間房 間 狀 態(tài)房 間 價(jià) 格房 間 類 型房 間 編 號(hào)D 1 0 1標(biāo) 準(zhǔn) 張 三 已 分 配添 加 新 房 間 查 看 已 住 房 間D 1 0 2中 級(jí) 李 四 已 預(yù) 訂D 1 0 3王 五 未 分 配豪 華 圖 45 空余房間管理界面 該窗體對(duì)空余房間進(jìn)行管理，對(duì)空余房間的信息進(jìn)行時(shí)時(shí)更新，還可以添加新的空余房間和查看已經(jīng)分配出去的房間。 在出錯(cuò)的情況下會(huì)給出相應(yīng)的警告和提示。需要對(duì)消費(fèi)檔案表進(jìn)行調(diào)用和處理。 員工信息管理 員 工 信 息 管 理 窗 口員 工 信 息 管 理 窗 口輸 入 員 工 編 號(hào) ：?jiǎn)T 工 信 息 查 詢員 工 信 息 添 加設(shè) 置 員 工 權(quán) 限員 工 信 息 刪 除員 工 編 號(hào) 員 工 姓 名 性 別 部 門(mén)a d m i n 張 龍 男 管 理 員p u b p u b 女 前 臺(tái)c y 1 2 3 1 張 三 男 保 安 圖 41 員工信息管理 界面 員工信息管理窗體，主要對(duì)員工的信息進(jìn)行統(tǒng)計(jì)，管理員還可以對(duì)員工賦《管理信息系統(tǒng)》 課程報(bào)告書(shū) 18 予系統(tǒng)登錄的權(quán)限。 由于能力的原因本次課題的設(shè)計(jì)還有很多不足的地方，一些功能的分析，設(shè)計(jì)和實(shí)現(xiàn)還有待進(jìn)一步的提高和改善。 5 心得體會(huì) 本次課題的設(shè)計(jì)和實(shí)現(xiàn)，通過(guò)對(duì)相應(yīng)資料的查閱和借鑒以及學(xué)習(xí)，了解信息管理系統(tǒng)的基礎(chǔ)上掌握了開(kāi)發(fā)酒店管理系統(tǒng)的基本方法，然后參考課題要求，以及對(duì)課題要求的分析，為設(shè)計(jì)和實(shí)現(xiàn)打下了基 礎(chǔ)。該窗體是對(duì)住宿結(jié)賬的處理，根據(jù)打折卡的情況來(lái)進(jìn)行打折和收費(fèi)，在結(jié) 賬之后還必須更改房間的狀態(tài)和注銷客戶信息表里的信息。在出錯(cuò)的情況下會(huì)給同相應(yīng)的警告和提示。在出錯(cuò)的情況下會(huì)給出相應(yīng)的錯(cuò)誤提示或者警告。該窗體也將對(duì)數(shù)據(jù)庫(kù)里的房間檔案表和住房檔案表進(jìn)行數(shù)據(jù)的處理。當(dāng)輸入正確以后，將進(jìn)入系統(tǒng)，主界面如圖 52 所示。 End If Dim sql As New SqlCommand(str, sqlcon) 《管理信息系統(tǒng)》 課程報(bào)告書(shū) 13 () () End Function End Module 4 系統(tǒng)實(shí)施 經(jīng)過(guò)前面幾個(gè)階段對(duì)系統(tǒng)的分析之后，接下來(lái)是本系統(tǒng)的實(shí)現(xiàn)階段。 set amp。 set amp。 where amp。關(guān)閉連接 End Function Public Function DelData(ByVal str1 As String, ByVal str2 As String) As Integer () If str2 = Then str = delete from amp。 CZNR amp。 NRZY amp。 amp。 Now amp。) 39。用戶名 Dim str As String Dim sqlcon As SqlConnection = New SqlConnection(server=localhost。