【正文】 31 圖 421 火車 資源管理流程圖 (6)飛機(jī)資源管理程序 此模塊 主要為旅游線路資源提供飛機(jī)線路的信息如：航空公司名稱、航班號(hào)、起飛機(jī)場(chǎng)、抵達(dá)機(jī)場(chǎng)、起飛時(shí)間、抵達(dá)時(shí)間和機(jī)票價(jià)格等信息，具體結(jié)構(gòu)如圖 422 所示。 具體結(jié)構(gòu)如圖 416 所示 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 27 圖 416 旅游線路 程序 流程圖 旅游資源管理程序 旅游 資源管理模塊又劃分為六個(gè)小模塊，下面我逐一加以說(shuō)明 (1)地域資源管理程序 此模塊主要為旅游線路資源提供必要的地域信息，如國(guó)內(nèi)地名、國(guó)外地名、和本市的地名。 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 21 總體 ER 圖如圖 412 圖 412 總體 ER 圖 數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì) 在上面的實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫(kù)中的表格以及各個(gè)表格之間的關(guān)系。用戶在登錄時(shí)只有輸入的密碼和用戶名實(shí)體中記錄的口令相同，系統(tǒng)才允許登錄。 修改記錄： 編寫： 樊亞鵬 日期： 審 核： 王海洋 日期： 通過(guò)對(duì)數(shù)據(jù)字典的定義，我們就可以開始的程序和數(shù)據(jù)庫(kù)，進(jìn)行大體的設(shè)計(jì)了。 圖 33 數(shù)據(jù)流圖圖例 旅游管理系統(tǒng)的頂層數(shù)據(jù)流圖 如圖 34 所示 圖 34 旅游管理系統(tǒng)頂層數(shù)據(jù)流圖 它表明了一個(gè)系統(tǒng)管理員登記錄入相關(guān)信息于旅游管理系統(tǒng)中，并且可隨時(shí)修改有關(guān)信息。 圖 32 系統(tǒng)流程示意圖 系統(tǒng)分析 數(shù)據(jù)流圖 數(shù)據(jù)流程分析就是吧數(shù)據(jù)再現(xiàn)行系統(tǒng)內(nèi)部的流動(dòng)情況抽象出來(lái)，舍去了具體組織機(jī)構(gòu)、信息載體、處理工作等物理組成，單純從數(shù)據(jù)流動(dòng)過(guò)程來(lái)考察實(shí)際業(yè)務(wù)的數(shù)據(jù)處理費(fèi)用查詢 旅游線路查詢 用戶 人員 管理員 旅游 資源管理 旅游線路管理 旅游費(fèi)用管理 用戶管理 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 8 模式。這些信息的找回將會(huì)花費(fèi)大量的 人力、物力和財(cái)力，對(duì)旅行社來(lái)說(shuō)一 筆不小的損失。 5 高可靠性，一個(gè)實(shí)用的系統(tǒng) 系統(tǒng) 可行性分析是在系統(tǒng)開發(fā)前必要的準(zhǔn)備 ， 因?yàn)?許多問(wèn)題不可能在預(yù)定的系統(tǒng)規(guī)?；驎r(shí)間期限之內(nèi)解決。 系統(tǒng)的目標(biāo) 在進(jìn)行系統(tǒng)的可行性分析時(shí)，必須對(duì)本系統(tǒng)的需求情況做些分析調(diào)查，主要包括：這個(gè)系統(tǒng)是不是有人需要以及客戶對(duì)本系統(tǒng)的特點(diǎn)和功能有些什幺要求。 系統(tǒng)初步調(diào)查 旅行社簡(jiǎn)介 該旅行社 是一家 中等 規(guī)模的旅行社，它主營(yíng)業(yè)務(wù)有觀光、餐飲、住宿。 ? 報(bào)表管理模塊 該模塊主要通過(guò)查詢條件，對(duì)各種信息進(jìn)行查詢，并將得到的結(jié)果導(dǎo)出 Excel 表、進(jìn)行打印報(bào)表等操作（其中信息包括：客戶信息、聯(lián)系人信息、反饋客戶信息、庫(kù)存信息）。 ? 系統(tǒng)退出。 ? 管理客戶的詳細(xì)信息：包括客戶的基本信息、聯(lián)系人信息、和客戶簽寫的合同信息。 眾所周知，顧客就是我們的上帝，我們只有滿足了上帝的需求，上帝才能給我們帶來(lái)一切。企業(yè)發(fā)展所需的各種資源（包括人力、物力、生產(chǎn)力）都是可以創(chuàng)造的，但每個(gè)領(lǐng)域中的客戶資源確是有限的，所以通過(guò)創(chuàng)新（產(chǎn)品的創(chuàng)新、企業(yè)管理的創(chuàng)新、服務(wù)的創(chuàng)新）來(lái)?yè)屨加邢薜目蛻糍Y源、維護(hù)好企業(yè)和客戶之間的關(guān)系、了解客戶的需求動(dòng)向，成為企業(yè)生存發(fā)展面臨的重大問(wèn)題。 ? 對(duì)用戶信息進(jìn)行管理，并為用戶設(shè)置管理權(quán)限。 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 3 第二章 總體設(shè)計(jì) 基本原理 項(xiàng)目規(guī)劃 客戶關(guān)系管理系統(tǒng)是一個(gè)典型的數(shù) 據(jù)庫(kù)開發(fā)應(yīng)用程序，由客戶管理模塊、庫(kù)存管理模塊、服務(wù)管理模塊、報(bào)表管理模塊、 管理模塊、用戶管理模塊組成，規(guī)劃系統(tǒng)功能模塊如下： ? 客戶管理模塊 該模塊主要功能是對(duì)客戶信息、客戶聯(lián)系人信息、合同信息進(jìn)行添加、刪除、查詢等操作。（ 2）制定組織的主要信息需求，形成 MIS 的總體結(jié)構(gòu)方案；安排項(xiàng)目開發(fā)計(jì)劃。所以一旦掌握某方面信息的人離開旅行社，就會(huì)對(duì)旅行社的經(jīng)營(yíng)造成負(fù)面影響。 3 易于維護(hù)和升級(jí)，系統(tǒng)的設(shè)計(jì)要方便維護(hù)，包括硬件的維護(hù)，軟件的維護(hù)（更改，升級(jí)等）和網(wǎng)絡(luò)的維護(hù)。 (2)經(jīng)濟(jì)可行性 首先、 旅行社現(xiàn)在的計(jì)算機(jī)上 存放 的報(bào)表雜亂無(wú)章，從而造成一些重要信息 被誤刪除或找不到存放位置。 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 7 系統(tǒng)業(yè)務(wù)流 程 系統(tǒng)的業(yè)務(wù)流程圖圖例，如圖 31 所示。 數(shù)據(jù)流圖是一種便于用戶理解、分析系統(tǒng)數(shù)據(jù)流程的圖形工具，是邏輯模型的組成部分。 簡(jiǎn)要說(shuō)明：不同權(quán)限操作的錄入位置。 2 軟件方面，配置 Windows XP 操作系統(tǒng)，后臺(tái)數(shù)據(jù)庫(kù)采用 SQL Sever 2021，瑞星防火墻，瑞星殺毒軟件 2021 版。 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 19 娛樂廳實(shí)體 ER 圖如圖 47 圖 47 娛樂廳實(shí)體 ER 圖 娛樂廳實(shí)體中包括娛樂廳編號(hào)、娛樂廳名稱、聯(lián)系人、聯(lián)系電話、通信地址、郵政編碼、所在地域、錄入日期和時(shí)間八個(gè)屬性，其中娛樂廳編號(hào)作為主鍵。從而設(shè)計(jì) 旅游 管理系統(tǒng)總體結(jié)構(gòu)如下如圖 413： 圖 413 系統(tǒng)程序流程圖 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 26 用戶認(rèn)證程序 此模塊的設(shè)計(jì)主要是認(rèn)證登錄用戶身份和權(quán)限是否合法 。具體結(jié)構(gòu)如圖 418 所示 圖 418 景點(diǎn)資源 程序 流程圖 xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 29 (3)娛樂 資源管理程序 此模塊主要是根據(jù)地域信息表所提供的信息，為旅游線路提供在地域的娛樂廳和娛樂項(xiàng)目的信息。登錄過(guò)程需要完成以下任務(wù)： 1. 根據(jù)用戶名和密碼來(lái)判斷是否可能進(jìn)入系統(tǒng)； 2. 根據(jù)用戶類型決定用戶擁有的權(quán)限。 經(jīng)過(guò)組裝測(cè)試，軟件已裝配完畢，接下來(lái)進(jìn)行確認(rèn)測(cè)試，將整個(gè)系統(tǒng)作為測(cè)試對(duì)象，采用的是黑盒測(cè)試方法。對(duì)系統(tǒng)進(jìn)行測(cè)試，主要是檢查系統(tǒng)在開發(fā)時(shí)是否出現(xiàn)錯(cuò)誤，通過(guò)不同的測(cè)試手段，使所開發(fā)的系統(tǒng)能更好的運(yùn)行xx 大學(xué) 2021屆成人 本科生畢業(yè)設(shè)計(jì)（論文） 38 第六章 總結(jié) 在當(dāng)今信息時(shí)代，現(xiàn)代化節(jié)奏越來(lái)越快，市場(chǎng)競(jìng)爭(zhēng)日趨激烈， 旅游 業(yè)如何面向市場(chǎng)，如何提高現(xiàn)代化管理水平，如何面臨與國(guó)際接軌 ......現(xiàn) 代化的酒店管理系統(tǒng)將成為 旅游業(yè)的唯一選擇。本系統(tǒng)用 VB 編寫客戶端 ,以 SQL Server 為服務(wù)端 .。關(guān)閉自己 Unload Me End Sub 主窗口代碼如下 Private Sub Form_Load() 1 End Sub Private Sub Image1_Click() End Sub Private Sub ImgExit_Click() End End Sub Private Sub lblLine_Click() 1 End Sub Private Sub Lblplane_Click() 1 End Sub Private Sub lblamuse_Click() 1 End Sub Private Sub lblarea_Click() 1 End Sub 附錄 42 Private Sub lblexit_Click() DBapi_Disconnect End End Sub Private Sub lblhotel_Click() 1 End Sub Private Sub lblplace_Click() 1 End Sub Private Sub lblres_Click() 1 End Sub Private Sub lbltrain_Click() 1 End Sub Private Sub lblUsers_Click() 39。把所在地域的旅游線路裝入列表中 Xl_refresh End Sub Private Sub List1_click() Curlid = () End Sub Public Modify As Boolean Public Function Check() As Boolean With MyLine 39。 As 房間類型 , As 住宿天數(shù) , * As 價(jià)格 _ + FROM Hotel h, lhotel l, Area a WHERE = + Trim() _ + And = And = And =1 UNION _ + SELECT As 所在地域 , As 賓館名稱 , 39。 As 用餐類型 , As 用餐次數(shù) , * As 價(jià)格 _ + FROM Restaurant r, lres l, Area a WHERE = + Trim() _ + And = And = And =1 UNION _ + SELECT As 所在地域 , As 餐廳名稱 , 39。顯示車票類型和票價(jià) Select Case Case 1 lbltype1 = 硬座 lblprice1 = Case 2 附錄 48 lbltype1 = 軟座 lblprice1 = Case 3 lbltype1 = 硬臥 lblprice1 = Case 4 lbltype1 = 軟臥 lblprice1 = End Select Else 39。飛機(jī) Call (, 2) If 0 Then = 1 () 39。讀取飛機(jī)信息 () 39。 As 用餐類型 , _ + As 用餐次數(shù) , * As 價(jià)格 _ + FROM Restaurant r, lres l, Area a WHERE = + Trim() _ + And = And = And =2 SetresAmt End Sub Private Sub Refresh_lamuse() = SELECT As 所在地域 , As 娛樂廳名稱 , _ + As 娛樂項(xiàng)目 , As 娛樂次數(shù) , * As 價(jià)格 _ + FROM Amusement a, AmuseItem i, lamuse l, Area a1 WHERE = _ + Trim() + And = And = And = SetAmuseAmt End Sub Private Sub Load_traffic(ByVal TmpFlag As Integer) If TmpFlag = 1 Then 39。 As 房間類型 , _ + As 住宿天數(shù) , * As 價(jià)格 _ + FROM Hotel h, lhotel l, Area a WHERE = + Trim() _ + And = And = And =2 UNION _ + SELECT As 所在地域 , As 賓館名稱 , 39。檢查行程天數(shù) If Val(txtDays) = 0 Then MsgBox 請(qǐng)輸入行程天數(shù) = 0 = Len(Trim(txtDay