【文章內(nèi)容簡介】 ● 地域信息的查詢。2. 景點資源管理功能● 景點資源的登入，包括景點編號、景點名稱、聯(lián)系人、票價等信息；● 景點資源的修改；● 景點資源的刪除；● 景點資源的查詢。3. 賓館資源管理功能● 賓館資源的錄入，包括賓館編號、賓館名稱、聯(lián)系人、報價等信息；● 賓館資源的修改；● 賓館資源的刪除；● 賓館資源的查詢。4. 餐廳資源管理功能● 餐廳資源的錄入，包括餐廳編號、餐廳名稱、聯(lián)系人、報價等信息；● 餐廳資源信息的修改；● 餐廳資源信息的刪除；● 餐廳資源信息的查詢。5. 娛樂資源管理功能● 娛樂資源信息的錄入，包括娛樂廳編號、娛樂廳名稱、聯(lián)系人、報價等信息；● 娛樂資源信息的修改；● 娛樂資源信息的刪除；● 娛樂資源信息的查詢。6. 交通資源管理功能● 火車資源信息管理；● 飛機資源信息管理。7. 旅游線路管理功能● 旅游線路信息的錄入，包括線路編號、線路名稱、報價等信息；● 旅游線路信息的修改；● 旅游線路信息的刪除；● 旅游線路信息的查詢。8. 系統(tǒng)用戶管理功能● 系統(tǒng)用戶信息的錄入，包括用戶名、密碼等信息；● 系統(tǒng)用戶信息的修改；● 系統(tǒng)用戶信息的刪除；● 系統(tǒng)用戶信息的查詢。 功能模塊劃分本系統(tǒng)可以實現(xiàn)8個完整的功能。旅游資源及路線管理系統(tǒng) 針對各個模塊不同的表實現(xiàn)添加記錄、修改記錄、刪除記錄、以及查詢顯示記錄等功能。交通資源管理娛樂資源管理餐廳資源管理交通線路管理系統(tǒng)用戶管理賓館資源管理景點資源管理地域信息管理 旅游資源及線路管理系統(tǒng)功能模塊圖在功能模塊示意圖的樹狀結(jié)構(gòu)中，每一個結(jié)點都是最小的功能模塊。每一個功能模塊都需要針對不同的表完成相同的數(shù)據(jù)庫操作，即添加記錄、修改記錄、刪除記錄、以及查詢顯示記錄信息。地域信息管理景點資源管理賓館資源管理餐廳資源管理娛樂資源管理交通資源管理旅游線路管理線路地域數(shù)據(jù)線路景點數(shù)據(jù)線路賓館數(shù)據(jù)線路用餐數(shù)據(jù)線路娛樂數(shù)據(jù)線路交通數(shù)據(jù)其他線路數(shù)據(jù) 線路報價及成本預(yù)算 旅游資源及路線管理系統(tǒng)的功能模塊圖從模塊關(guān)系圖中可以看出，旅游資源信息除了供用戶查閱外，不可以為旅游線路管理提供數(shù)據(jù)。當(dāng)用戶需要生成一條旅游線路是，可以從旅游資源里提取到最新的數(shù)據(jù)。線路報價和成本預(yù)算也會隨著資源的變化。在本系統(tǒng)中，用戶管理模塊的功能比較簡單。在系統(tǒng)初始化時，有一個默認的 “系統(tǒng)管理員”用戶Admin，由程序設(shè)計人員手動的添加到數(shù)據(jù)庫中。Amin用戶可以使用系統(tǒng)的所有功能，可以創(chuàng)建用戶、修改用戶信息、以及刪除用戶；普通用戶分為資源管理員和線路管理員兩種類型，資源管理員只能對旅游資源信息進行管理，線路管理員只能對旅游線路信息進行管理，它們只能修改自己的用戶名和密碼。系統(tǒng)用戶信息管理修改Admin用戶的密碼創(chuàng)建、修改和刪除普通用戶信息修改自身的用戶名和密碼Admin用戶普通用戶 用戶管理功能集合模塊圖 系統(tǒng)流程分析進行用戶登陸后，登陸到主界面，然后在旅游資源以及線路管理模塊中管理好輸入的一些基本信息。本系統(tǒng)的流程分析圖如下圖所示：開 始 重試失敗超過3次用戶登錄 否 退出程序 失敗 是 成功 用戶管理模塊 旅游資源及線路管理模塊讀取用戶類型 旅游資源管理a) 管理自己的用戶信息b) 管理普通用戶的信息 Admin用戶 旅游線路管理管理自己的用戶信息 普通用戶 系統(tǒng)流程圖 第4章 系統(tǒng)的詳細設(shè)計 設(shè)計工程框架 創(chuàng)建工程運行Visual Basic ，選擇新建“標準EXE”工程。新建工程后，在Visual Basic窗口中有一個缺省的窗體Form1，我就在此基礎(chǔ)上設(shè)計系統(tǒng)的主界面。選擇“工程”菜單中的“工程1屬性”命令，在“工程屬性”對話框中，將工程名設(shè)置為Travel。單擊“保存”按鈕。 添加模塊根據(jù)Visual Basic 功能模塊的劃分原則，我創(chuàng)建了以下四個模塊?！?Const 用來管理工程中的常量?！?DbFunc 用來管理工程中與數(shù)據(jù)庫操作相關(guān)的聲明、變量和函數(shù)?！?GeneralFunc 用來管理工程中一些通用的自定義函數(shù)。● Variable 用來管理工程中的全局變量 添加類模塊根據(jù)Visual Basic 功能模塊的劃分原則，為每一個表創(chuàng)建一個類模塊，將對此表的所有數(shù)據(jù)庫操作封存在類中。1. Area類Area類用來管理表Area的數(shù)據(jù)庫操作。 Area類的成員函數(shù) 函數(shù)名 具體說明Init初始化成員變量Delete刪除指定的地獄記錄。參數(shù)TmpId表示要刪除的地域的編號GetId根據(jù)指定的地域名稱讀取地域編號。參數(shù)TmpName表示要讀取的地域名稱GeInfo讀取指定的地域記錄。參數(shù)TmpId表示要讀取的地域的編號InDB判斷指定的地獄名稱是否已經(jīng)在數(shù)據(jù)庫中。參數(shù)TmpName表示指定的地域名稱Insert插入新的地域記錄LoadArea將所有地域數(shù)據(jù)讀取到數(shù)組中。為了便于使用，此過程按照地域的分類將地域名分別裝入到數(shù)組d1()、d2()和d3()中Update修改指定的地域記錄。參數(shù)TmpId下面對初始化的函數(shù)Init進行下說明 因為每個類模塊都需要一個初始化的過程。對類模塊中的成員變量賦初始值。因為每一個類模塊的對象在程序中會多次使用。在每次使用之前都應(yīng)該對其進行初始化，從而保證不把上一次使用的值帶到這一次使用中?！? Init函數(shù)的代碼如下： Public Sub Init() AreaId = 0 AreaName = AreaType = 0End Sub再對另一個函數(shù)LoadArea進行下說明。因為此函數(shù)是一個批量讀取表Area中數(shù)據(jù)的過程。程序?qū)⒌赜蛎Q讀取到3個數(shù)組中：d1()、d2()和d3()中，他們在Variable模塊中定義，分別掉表不同的地域類別。2. Place 類Place類是用來管理表Place的數(shù)據(jù)庫操作。 Place類的成員函數(shù) 函數(shù)名 具體說明Init初始化成員變量Delete刪除指定的景點記錄。參數(shù)TmpPid表示要刪除的景點編號AreaInplace判斷指定地域信息是否包含景點數(shù)據(jù)。參數(shù)TmpAreaId表示要查詢的地域編號GetId根據(jù)指定的景點名稱讀取景點編號。參數(shù)TmpName表示要讀取的景點名稱GetInfo根據(jù)指定的景點編號讀取景點數(shù)據(jù)。參數(shù)TmpPid表示要讀取的景點編號InDB判斷指定的景點名稱是否在數(shù)據(jù)庫中。參數(shù)TmpName表示要讀取的景點名稱Insert插入新的景點記錄LoadplaceByArea讀取指定地域中所有景點名稱到數(shù)組ArrPlace中Update修改指定的景點記錄。參數(shù)OriId表示要修改的景點編號下面對其中的Delete過程進行說明。因為它是一個典型刪除表中數(shù)據(jù)的過程，幾乎每一個模塊都有一個類似的過程。此過程體現(xiàn)了執(zhí)行SQL語句的基本方法，即首先使用DB_Connect連接到數(shù)據(jù)庫，再將要執(zhí)行SQL語句賦值到SqlStmt變量中，調(diào)用OdbeExt()過程，執(zhí)行SQL語句。最后釋放句柄，并調(diào)用DB_Connect斷開與數(shù)據(jù)庫的連接。3. Hotel類Hotel類用來管理Hotel的數(shù)據(jù)庫操作。 Hotel類的成員函數(shù) 函數(shù)名 具體說明Init初始化成員變量Delete刪除指定的賓館記錄。參數(shù)TmpPid表示要刪除的賓館編號AreaInHotel判斷指定地域信息是否包含賓館參數(shù)。參數(shù)TmpAreaId表示要查詢的地域編號GetId根據(jù)指定的賓館名稱讀取賓館編號。參數(shù)TmpName表示要讀取的賓館名稱GetInfo根據(jù)指定的賓館編號讀取賓館數(shù)據(jù)。參數(shù)TmpPid表示要讀取的賓館編號InDB判斷指定的賓館名稱是否在數(shù)據(jù)庫中。參數(shù)TmpName表示要讀取的賓館名稱Insert插入新的賓館記錄LoadplaceByArea讀取指定地域中所有賓館名稱到數(shù)組ArrHotel中Update修改指定的賓館記錄。參數(shù)OriId表示要修改的賓館編號下面對其中的AreaInHotel 函數(shù)進行說明。為了維護數(shù)據(jù)庫結(jié)構(gòu)的完整性，在刪除數(shù)據(jù)時，往往需要進行完整性的判斷。例如，地域數(shù)據(jù)是本系統(tǒng)中最基本的數(shù)據(jù)，與很多表存在聯(lián)系。所以在刪除地域數(shù)據(jù)時，需要在其他表中進行判斷，如果要刪除的地域存在于其他表中，則不能刪除，因為刪除地域會造成其他表的數(shù)據(jù)不完整。AreaInHotel（）函數(shù)就是這種判斷函數(shù)的一個代表，如果指定的地域中包含賓館信息，則返回賓館名稱，否則返回空?！?AreaInHotel過程 AreaInHotel過程的代碼如下： Public Function AreaInHotel(ByVal TmpAreaId As Long) As String DB_Connect SqlStmt = SELECT Hname FROM Hotel WHERE AreaId= _ + Trim(TmpAreaId) OdbcExt (SqlStmt) If SQLFetch(Hstmt) SQL_NO_DATA_FOUND Then ColVal = String(400, 0) Rc = SQLGetData(Hstmt, 1, 1, ColVal, Len(ColVal), pcblen) AreaInHotel = TrimStr(ColVal) Else AreaInHotel = End If Rc = SQLFreeStmt(Hstmt, SQL_DROP) DB_DisconnectEnd Function4. Restaurant類Restaurant類用來管理表Restaurant的數(shù)據(jù)庫操作。 Restaurant類的成員函數(shù)函數(shù)名 具體說明Init初始化成員變量Delete刪除指定的餐廳記錄。參數(shù)Tmprid表示要刪除的餐廳編號AreaInRes判斷指定地域信息是否包含餐廳參數(shù)。參數(shù)TmpAreaId表示要查詢的地域編號GetId根據(jù)指定的餐廳名稱讀取餐廳編號。參數(shù)TmpName表示要讀取的餐廳名稱GetInfo根據(jù)指定的餐廳編號讀取餐廳數(shù)據(jù)。參數(shù)Tmprid表示要讀取的餐廳編號InDB判斷指定的餐廳名稱是否在數(shù)據(jù)庫中。參數(shù)TmpName表示要讀取的餐廳名稱Insert插入新的餐廳記錄LoadRestaurantByArea讀取指定地域中所有餐廳名稱到數(shù)組ArrRes中Update修改指定的餐廳記錄。參數(shù)OriId表示要修改的餐廳編號下面對其中的GetInfo 函數(shù)進行說明。幾乎每個類模塊都需要一個GetInfo（）過程，它的作用是讀取指定表中的某一行數(shù)據(jù)。在GetInfo（）過程中，要執(zhí)行SQL語句為SELECT語句。執(zhí)行SQL語句后，調(diào)用SQL_FETCHO函數(shù)將滿足條件的數(shù)據(jù)讀取到內(nèi)存中，然后使用SQL_ GetData（）函數(shù)從結(jié)果集中讀取每一列的數(shù)據(jù)，并賦值到對應(yīng)的類變量中。5. Amusement 類Amusement類來管理表Amusement的數(shù)據(jù)庫操作。 Amusement類的成員函數(shù)函數(shù)名 具體說明Init初始化成員變量Delete刪除指定的娛樂廳記錄。參數(shù)TmpAid表示要刪除的娛樂廳編號AreaInAmuse判斷指定地域信息是否包含娛樂廳參數(shù)。參數(shù)TmpAreaId表示要查詢的地域編號GetId根據(jù)指定的娛樂廳名稱讀取娛樂廳編號。參數(shù)TmpName表示要讀取的娛樂廳名稱GetInfo根據(jù)指定的娛樂廳編號讀取賓館數(shù)據(jù)。參數(shù)TmpAid表示要讀取的娛樂廳編號InDB判斷指定的娛樂廳名稱是否在數(shù)據(jù)庫中。參數(shù)TmpName表示要讀取的娛樂廳名稱Insert插入新的娛樂廳記錄LoadAmuseByArea讀取指定地域中所有娛樂廳名稱到數(shù)組ArrAmuse中Update修改指定的娛樂廳記錄。參數(shù)OriId表示要修改的娛樂廳編號6. AmuseItem 類AmuseItem類喲后果來管理表AmuseItem的數(shù)據(jù)庫操作。 AmuseItem類的成員函數(shù)函數(shù)名 具體說明Init