酒店管理系統系統報告◆課題名稱：酒店管理系統◆任課教師：劉福明◆班級：2021級軟件工程2班◆小組長：張潤森〔2〕◆小組成員：張宗林〔2〕黃河〔2〕日期：2010年12月25日摘要酒店管理是酒店日常運作的一個重要環節，學習制作酒店管理系統是很有必要的，同時，酒店管理系統也是效勞行業管理軟件的一個綜合性代表，很具有實踐的意義。本酒店管理系統是用PowerBuilder和Microsoftaccess制作而成，主要包括客戶信息登記、分配房間、消費管理、結賬和統計以及員工信息管理等主要功能。根據客戶需求給其分配房間，并且對客戶在酒店的消費情況進展統計以及客戶結賬，系統也對員工信息進展統計，管理員可以給予員工登錄系統的權限。根據需要，系統建立了6個表，分別用來記錄客戶信息、員工信息、消費分類、客戶消費檔案、房間信息和客戶住房信息。房間有三種狀態，即“已分配〞、“已預訂〞、“未分配〞，員工有三種權限即：“T〞、“U〞、“F〞分別代表管理員權限和一般用戶權限，“F〞權限不能登錄系統，而管理員是由系統默認。這些狀態分別可以對房間和員工進展管理。結論主要介紹了酒店管理在酒店日常運作中的作用，以及酒店管理系統的必要性。整個系統的開發過程包括：可行性分析、需求分析、總體設計、詳細設計、系統實現以及測試方案。其中關鍵的技術包括數據庫的建立，數據庫的連接，數據的添加、刪除和更新。為了系統的順利完成，開發人員將要密切合作和詳細的分工。關鍵詞：酒店管理系統、PowerBuilder、Microsoftaccess、數據庫分工事件人力分配可行性分析黃河、黃河需求分析張潤森、黃河、張宗林系統設計張潤森、黃河、張宗林代碼實現客戶信息管理員工管理張潤森房間管理張宗林客戶消費管理黃河結賬與統計張潤森測試張潤森、黃河、張宗林維護張潤森、黃河、張宗林目錄1. 前言 5 背景 5 編寫目的 5 定義 52. 可行性分析 6 技術上可行性 6 經濟上的可行性 6 管理上的可行性 6 結論 63. 需求分析 7 具體需求 7 功能需求 7 數據流圖 8 數據字典 11 實體聯系圖 11 實體圖 11 總體E-R圖 13 性能需求 13 數據管理能力需求 14 故障處理需求 14 其他需求 14 運行環境需求 144. 總體設計 14 系統分析 14 系統設計 15 軟件組織構造 15 功能說明 16 重要數據的數據構造設計 17 變量設計 17 函數設計 175. 詳細設計 17 數據庫的詳細設計 18 數據庫的實現 18 界面設計 19 系統登錄界面〔圖5-1〕 19 系統主界面〔圖5-2〕 20 系統功能詳細說明 20 客戶信息管理模塊 20 房間管理模塊： 20 客戶消費管理模塊： 21 結賬管理模塊： 21 員工管理模塊： 216. 系統實現 22 系統登錄模塊如圖6-1 22 客戶信息登記模塊 23 客戶房間分配模塊 24 空余房間管理窗體 25 餐飲管理窗體 26 娛樂消費管理窗體 27 酒店統計管理窗體 28 結賬退房窗體 29 員工信息管理窗體 307. 系統測試 30 登錄測試 30 系統功能模塊測試 318. 使用說明 33 運行環境 33 性能說明 33 操作說明 33總結 33附錄： 341、路徑初始化函數代碼： 342、連接數據庫的代碼 353、登錄窗體的登錄按鈕的代碼： 364、客戶信息添加功能的代碼： 375、結賬功能的代碼： 37提示： 38前言背景現代社會，科技飛速開展，電腦不斷普及。現代化酒店組織龐大、效勞工程多、信息量大，要想提高勞動生產、降低本錢。提高效勞質量和管理水平，進而促進經濟效益，必須借助計算機來進展現代化信息管理。酒店管理系統正是為此設計開發的編寫目的 可行性研究的目的是研究問題，花費最小的代價，以最快的速度提出解決問題的方法。經過對此工程的詳細準確的研究，初擬系統實現報告，對軟件開發中將要面臨的問題及其解決方案進展初步設計及合理安排。明確開發風險及其所帶來的經濟效益。本報告經審核后，交軟件經理審查。定義酒店管理系統〔JDGLXT〕：JDGLXT分別是“酒店管理系統〞的漢語拼音首字母縮寫。系統登陸模塊：主要負責客戶和管理員進入系統的一個身份驗證。客戶根本信息管理模塊：主要負責管理客戶的個人信息。房間分配管理模塊：主要負責為客戶分配房間。餐飲管理模塊：主要負責客戶餐飲信息和消費菜金的信息管理。娛樂管理模塊：主要負責客戶娛樂消費的信息管理。統計和結賬模塊：對客戶在酒店的住宿進展結賬。前臺工作員工管理模塊：主要負責對前臺員工根本信息的管理。可行性分析可行性研究的目的是付出最小的代價在盡可能短的時間里確定問題是否能解決，系統的可行性分析可以從以下幾個方面研究:技術上可行性技術上的可行性主要分析現有技術條件能否順利完成開發工作，軟硬件能否滿足開發者的需要等，這一特點非常適合計算機的特點，發揮計算機的數據處理速度快，準確率高的優勢。現代計算機硬件與軟件技術的飛速開展，為系統的建立提供了技術條件。由于酒店管理系統這一類的企業管理系統進展開發已有一定的時期，有很多成功的實例，技術根底也已經非常雄厚，因而技術上的是可行的。經濟上的可行性主要是對工程經濟效益進展評價，一方面是支出的費用，其中包括設備的購置費，軟件開發費，管理和維護費，人員工資和培訓費等。另一方面是取得的收益可以用錢來衡量的那局部以及使用本系統而提高的效率，節約的人力物力。基于企業的現有計算機及配套設備，建立MIS系統，大大降低了辦公費用，提高辦公效率，而且能檢測數據效用，為企業提供方便。由于本酒店管理系統是由我及幾個同學開發的，投入相對較少，但卻能獲得較大的收益，所以經濟上是可行的。管理上的可行性主要是管理人員對開發信息系統是否支持，現有管理制度是否科學，規章制度是否齊全，原始數據是正確等。酒店管理系統比擬完善的規章制度和管理方法為系統的建立提供了保障，一個軟件設計的好壞，關鍵在于產品的可靠，穩定，便于維護，系統采用模塊化程序設計方法，既便于系統功能的各種組合和修改，又便于未參與開發的技術維護人員進展補充、維護。處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息結論處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息處理客戶信息由于缺乏專業人士的幫助，并且缺少實際經歷,該管理系統可能做的不太健全，遠不是真正意義上的軟件、工業產品，只能算作坊生產的產物。可能還存在缺陷。缺乏之處有待改良。前景根據以上分析，我們認為開發此系統的條件已經具備，可以開場進展開發。并且我們相信此軟件經濟實惠，肯定具有良好的前景。.我們將會逐步完善該軟件,盡可能地讓滿足客戶的需求。讓客人在他下榻的房間內感受到方便，快捷，溫馨。同時保證投資者資金的平安性，資金穩步的回籠期，資金的合理回報率。因此我們開發的酒店管理系統可行!需求分析具體需求功能需求〔1〕客戶信息管理=1\*GB3①簡述：顧客信息管理，包括信息存入，信息查詢，信息修改，信息刪除。=2\*GB3②輸入：顧客信息=3\*GB3③處理過程描述:客戶信息存入數據庫。=4\*GB3④輸出:操作成功或失敗的提示信息。〔2〕房間管理=1\*GB3①簡述：房間信息管理包括查看房間的使用情況和房間狀態以及更改房間狀態，為客人提供訂房參考=2\*GB3②輸入:房間編號或者房間狀態=3\*GB3③處理過程描述:提供房間信息，讓顧客選自己滿意的房間并錄入系統=4\*GB3④輸出:房間信息以及訂房信息。〔3〕客戶消費管理=1\*GB3①簡述：管理顧客的消費，包括餐飲和娛樂兩種消費=2\*GB3②輸入：客人信息、消費類型和檔次=3\*GB3③過程處理描述：消費情況錄入系統=4\*GB3④輸出：操作成功或失敗的提示信息，產生消費清單〔4〕結賬與統計=1\*GB3①簡述：顧客消費和住房完畢結賬付款以及酒店對客戶消費進展統計=2\*GB3②輸入：客人信息、=3\*GB3③過程處理描述：顧客信息查詢消費情況=4\*GB3④輸出：消費清單或者操作失敗提示信息〔5〕員工管理=1\*GB3①簡述：員工信息管理，包括員工根本信息、上班情況及對各種信息的查詢和修改。=2\*GB3②輸入：員工信息=3\*GB3③處理過程描述：由員工編號查詢或修改各種信息=4\*GB3④輸出：操作失敗提示信息數據流圖繪制數據流圖的目的是為了方便開發人員與用戶的交流，以及為系統的設計提供依據。數據流圖的繪制過程通常是采用自頂向下，逐層分解，直到功能細化為止，形成假設干層次的數據流圖。酒店管理系統的數據流圖如下所示：根本系統模型頂層數據流圖一層數據流圖數據字典名稱：用餐檔案別名：名稱：用餐檔案別名：描述：客戶在酒店所有用餐記錄的集合定義：個人消費檔案=用餐地點+用餐金額+時間位置：輸出到個人消費檔案名稱：客戶檔案別名：描述：記錄客戶的根本信息定義：客戶檔案=姓名+性別+證件號位置：輸出到個人消費檔案名稱：住房檔案別名：名稱：住房檔案別名：描述：記錄客戶的住房信息定義：住房檔案=房間號+入住時間+姓名位置：輸出到個人消費檔案名稱：消費娛樂檔案別名：描述：客戶在酒店的消費娛樂記錄定義：消費娛樂檔案=消費工程+消費金額+時間位置：輸出到個人消費檔案名稱：個人消費檔案名稱：個人消費檔案別名：描述：用戶在酒店所有消費記錄的集合定義：個人消費檔案=客戶檔案+住房檔案+消費樂檔案+用餐信息檔案位置：輸出到個人消費實體聯系圖根據系統的功能需求畫出實體聯系圖〔Ｅ－Ｒ〕圖：實體圖客戶檔案實體：證件名性別姓名證件名性別姓名證件號客戶檔案證件號客戶檔案房間檔案實體：單價房間等級房間號房間檔案單價房間等級房間號房間檔案狀態狀態消費工程實體：價格消費名稱消費類型消費工程價格消費名稱消費類型消費工程員工檔案實體：部門性別姓名登錄權限員工號部門性別姓名登錄權限員工號員工檔案員工檔案總體E-R圖客戶檔案客戶檔案房間檔案消費工程證件號姓名性別房間號房間等級住房檔案入住時間消費類型消費名稱消費檔案消費時間單價退房時間價格111N員工檔案員工號姓名性別部門證件名登錄權限狀態數量性能需求=1\*GB3①精度軟件主要用于管理，不是科學計算，要求計算的精度不是很苛刻，所以輸入/輸出數據精度的要求不是很高，可以用浮點數。=2\*GB3②時間特性要求軟件運行的響應時間要求不超過1~2秒。=3\*GB3③靈活性軟件具有升級功能，以滿足用戶的需求。數據管理能力需求本軟件管理的數據大都以數據庫的形式儲存，主要包括房價信息，菜肴信息數據，客戶信息數據，其中房價信息數據和菜肴信息數據根本不變，數據庫大小根本不變，而客戶信息數據隨著時間的推移每天都在增加，客戶信息數據需要定期進展整理和處理。故障處理需求本軟件具有錯誤和異常的處理能力，根本不會有軟件故障，保證軟件能正在運行，有對數據庫備份的功能，這樣才能使用戶滿意。其他需求本軟件有保密功能，設立了系統賬號管理功能，用戶登錄時需要驗證用戶名及密碼，對于三次密碼輸入錯誤的使用者那么關閉此系統，這樣保證了數據的平安。本軟件使用也十分方便，以窗口的形式呈現給用戶，很容易操作。運行環境需求內存:512M,硬盤:80G，操作系統為Windows系列。總體設計系統分析根據用戶的要求以及對需求分析階段對功能的分析，要實現客戶的根本情況管理、房間分配管理、餐飲管理、娛樂管理、結帳處理、員工管理。⑴、客戶的根本情況管理：客戶入住時要對其信息進展登記，包括客戶的姓名、性別、證件號——客戶檔案。⑵、房間管理：酒店空余房間的管理，并按照客戶的要求把空余的房間分配給客戶，并且其房間號、使用時間、入住客戶的登記管理——住房檔案。⑶、餐飲、娛樂管理：客戶入住以后，在酒店的消費，酒店對客戶的消費進展統計，消費類型、消費金額、消費時間、消費數量——消費檔案〔客戶的各種消費都在相應的消費點進展現金支付，每次交費都建立在個人消費檔案中〕。⑷、結帳處理：客戶消費結賬以后，給出客戶的消費報告單，酒店在月底對酒店的消費情況進展統計〔前臺工作人員根據客戶的優惠卡給予相應的折扣優惠〕。⑸、員工管理：對員工的信息進展管理，查詢、添加、刪除系統設計 由問題分析我們確定了本系統需要哪些確切的功能模塊和組織構造。軟件組織構造本系統的總體構造采用菜單來調用窗體，利用窗體來進展管理、數據加工、信息查詢等工作，系統的功能模塊圖如圖4-1所示：圖4-1圖4-1酒店管理系統客戶信息管理房間管理客戶消費管理結賬與統計客戶信息登記客戶住房管理空余房間管理客戶餐飲管理客戶娛樂管理客戶退房結賬酒店營業統計員工管理員工信息管理功能說明系統分為五個模塊來對實現其功能需求，即：客戶信息管理模塊、房間管理模塊、客戶消費管理模塊、結賬與統計、員工管理a、客戶信息管理模塊①客戶信息登記：對客戶的信息進展登記b、房間管理模塊①客戶住房管理：為客戶分配房間②空余房間管理：對沒被分配的房間進展管理，以便房間的分配c、客戶消費管理①客戶餐飲管理：對客戶在餐飲類的消費進展統計②客戶娛樂管理：對客戶在娛樂類的消費進展統計d、結賬與統計①酒店營業統計：對客戶在酒店的消費進展統計和計算②客戶退房結賬：客戶為住宿結賬e、員工管理①員工信息管理：員工信息的添加、查詢、和刪除重要數據的數據構造設計變量設計在系統的代碼實現的時候，必須用到一些變量，一般我們所用到的變量為兩種，一是全局變量、二是局部變量。全局變量以“global_〞加字母作為變量名，如：global_name局部變量不限制函數設計為了簡化程序，并且提高代碼的重要性，在編寫代碼時，對屢次用到的代碼段，定義成函數，在用到的地方直接調用函數。全局函數以“gfunction_〞加函數名，如：gfunction_Add();局部函數以“zfunction_〞加函數名，如：zfunction_Add();詳細設計在此階段將對系統進展更詳細的分析和設計，目的是確定如何具體地實現所要求的系統。數據庫的詳細設計在設計和實現代碼之前必須設計好數據庫，根據系統的總體E-R圖裝得到數據庫的概念模式：①客戶檔案〔證件號、姓名、性別、證件名稱〕Customer_arch(Customer_ID〔20〕、customer_name〔12〕、customer_sex〔5〕、ID_name〔5〕)②房間檔案〔房間號、房間等級、單價(元/天)〕House_arch(House_NO〔15〕、house_level〔12〕、house_price〔12〕、house_state〔12〕)③消費工程〔消費類型、消費名稱、單價〕Cost_info(cost_NO〔12〕、cost_Name〔25〕、cost_Price〔12〕)④住房檔案〔房間號、證件號、入住時間、退房時間〕StayHouse_arch(House_NO〔15〕、Customer_ID〔25〕、in_time〔20〕、out_time〔20〕)⑤消費檔案〔證件號、消費類型、消費時間、數量〕Cost_arch(Customer_ID〔25〕、cost_NO〔12〕、cost_time〔20〕、cost_count〔5〕)⑥員工檔案〔員工號、員工姓名、性別、部門、登錄權限〕Stuff_arch(Stuff_ID〔20〕、Stuff_Name〔12〕、Stuff_Sex〔5〕、stuff_p〔12〕、stuff_vlv注：每個字段后面的括號內的值為其長度數據庫的實現根據系統數據庫的概念模式，可以得到應有如下的6個數據表：表一：客戶檔案表表二：房間檔案表表三：消費工程表表四：住房檔案表表五：消費檔案表表六：員工檔案表界面設計較好的界面能給用戶一幕了然的感覺，也便于設計，系統的界面應該保持一致不隨時間而改變，好的界面是能給用戶提供幫助的。系統登錄界面〔圖5-1〕系統主界面〔圖5-2〕圖5-2系統功能詳細說明客戶信息管理模塊目的：對客戶的信息進展登記和保存。功能：以直接登記和預定的兩種方式對客戶信息進展錄入，建立相應的客戶信息檔案，并可對客戶信息進展添加、刪除、修改和查詢。性能：穩定、快速、準確。輸入項：客戶的證件號、姓名、性別、證件名稱。輸出項：相應的信息記錄和相應的出錯信息或提示。房間管理模塊：目的：根據客戶的要求給客戶分配房間，并對剩下的房間進展管理。功能：房間分等級，客戶入住以后，建立相應的住房檔案，方便對已經分配的房間和未分配的房間進展管理包括房間信息的查詢。性能：穩定、及時、正確。輸入項：客戶的信息、入住時間、住宿時間、房間信息。輸出項：相應的信息記錄和相應的出錯信息或提示。客戶消費管理模塊：目的：對客戶的消費信息進展管理以及對酒店的月消費進展統計。功能：客戶入住以后，在酒店的消費，酒店對客戶的消費進展統計，包括消費類型、消費金額、消費時間，建立相應的消費檔案包括客戶對其信息的查詢。性能：穩定、快速、及時、正確。輸入項：消費類型，消費時間、價格。輸出項：相應的信息記錄和相應的出錯信息或提示。結賬管理模塊：目的：客戶退房結賬功能：客戶住宿期限到了以后，向酒店退房并支付相應的消費金額性能：穩定、快速、正確輸入項：房間號、入住時間、退房時間、相應的折扣輸出項：住房所需的金額和相應的出錯信息或提示員工管理模塊：目的：管理員管理員工的信息功能：對員工的信息進展統一管理，信息的添加、修改、刪除和查詢，以及給員工賦予登錄系統的權限。性能：穩定、快速、正確輸入項：員工號、員工姓名、性別、部門輸出項：員工的根本信息記錄和相應的出錯信息或提示系統實現經過前面幾個階段對系統的分析之后，接下來是本系統的實現階段。系統登錄模塊如圖6-1圖6-1本模塊的主要功能是對操作用戶的身份進展驗證，只有系統管理員和默認的用戶可以登錄本系統。在進展系統登錄過程中，登錄模塊將調用數據庫里的員工檔案表，對員工號和密碼進展驗證〔密碼也為員工號〕，只有輸入正確后，才能進入系統。每次輸入錯誤時，模塊都會給出錯誤提示，當第三次輸入錯誤時，給出“第三次輸入錯誤，還有一次時機〞的提示，當第四次輸入錯誤時，自動關閉登錄窗體。當輸入正確以后，將進入系統，主界面如圖5-2所示。客戶信息登記模塊圖6-2本窗體的主要功能是對客戶的信息登記，按照提示輸入相應的信息之后，該窗體將調用數據庫中的客戶信息檔案表，對數據進展操作。當數據應經存在時將給出提示如圖客戶房間分配模塊圖6-3該窗體主要功能是為客戶分配房間，根據即時的房間信息和客戶的要求，給其分配，如果客戶還沒有登記的話，必須先登記。該窗體也將對數數據庫里的房間檔案表和住房檔案表進展數據的處理。在出錯的情況下頁會給出相應的提示。空余房間管理窗體圖6-4該窗體對空余房間進展管理，對空余房間的信息進展時時更新，還可以添加新的空余的房間和查看已經分配出去的房間。該窗體也要條用數據庫里的房間檔案數據表。在出錯的情況下會給出相應的錯誤提示或者警告。餐飲管理窗體圖6-5該窗體是對客戶的餐飲消費情況進展統計，這個模塊需要客戶進展現金支付，這也是用戶的需求，該窗體主要是調用數據庫里的消費類型表和消費檔案表和客戶檔案表。在出錯的情況下會給出相應的警告和提示。娛樂消費管理窗體圖6-6和餐飲管理窗體一樣該窗體是對客戶的娛樂消費情況進展統計，這個模塊需要客戶進展現金支付，這也是用戶的需求，該窗體主要是調用數據庫里的消費類型表和消費檔案表和客戶檔案表。在出錯的情況下也會給出相應的警告和提示。酒店統計管理窗體圖6-7這個窗體的主要功能是對客戶在酒店的消費情況進展管理，可以按照每個月或者每天來查看消費情況。需要對消費檔案表進展調用和處理。結賬退房窗體圖6-8該窗體非常重要，要求處理過程非常正確和有序。該窗體是對住宿結賬的處理，根據打折卡的情況來進展打折和收費，在結賬之后還必須更改房間的狀態和注銷客戶信息表里的信息。涉及到客戶檔案表和房間檔案表和消費檔案表的處理。員工信息管理窗體圖6-9員工信息管理窗體，主要對員工的信息進展統計，管理員還可以對員工賦予系統登錄的權限。主要是對員工檔案表進展操作。系統測試系統測試是保證軟件質量，提高軟件可靠性的主要活動之一。它實施對軟件規格說明、設計規格說明和編碼的審核。軟件測試的目的是以最少的資源盡可能的找出軟件中的錯誤和缺陷，測試的結果是為軟件的維護提供依據。本次測試將大局部可能的值來檢查系統程序的正確性，并通過測試得到必要的調試或者功能改良。登錄測試當用戶輸入出錯時會給出提示用戶第n次輸入錯誤，如圖7-1圖7-1當輸入第三次錯誤時也會給出提示：如圖7-2圖7-2系統功能模塊測試在每個相應的功能模塊中，測試人員分別輸入錯誤的數據和正確的數據，查看相應的結果和提示。在其測試中按照窗體界面的按鈕或者圖標的提示，查看處理的結果。圖7-3如上圖在客戶信息添加的窗體中，點擊添加按鈕之后，會把左邊文本框里的內容添加到數據表里面，并且會在右邊的數據窗口里面顯示出來。入下列圖圖7-4每個功能模塊在測試過程中都會像圖7-3、圖7-4一樣，按照輸入規那么點擊功能按鈕后，會得到處理結果。在這里就不一一介紹。使用說明該系統的使用說明大致可以分為：運行環境，性能說明和操作說明三個局部。運行環境硬件平臺：硬盤空間20G以上；內存：256M以上CPU：PⅢ以上操作系統：Windows2000/Windowsxp/Windows7/Vista其他軟件：Microsoftaccess性能說明系統對用戶的請求需及時給出響應，無需連接互聯網。有時可能受到計算機性能的影響。操作說明系統提供操作人員的登錄，登錄之后，操作人員在界面上選擇相應的操作，點擊按鈕之后將數據存入數據庫。使用比擬簡單。但是操作人員也須將按照要求進展操作。具體的操作，系統開發人員將給酒店操作人員進展操作培訓。總結本次課題的設計和實現，我們小組首先在以往的學習根底上，通過對相應資料的查閱和借鑒以及學習，了解信息管理系統的根底上掌握了開發酒店管理系統的根本方法，然后參考課題要求，以及對課題要求的分析，為設計和實現打下了根底。由于時間和能力的原因，不能做一個功能更加完善的酒店管理系統，而僅僅從客戶信息登記、房間管理、消費管理、員工信息管理、結賬和統計這幾個方面來進展系統的設計，各個模塊都需要數據庫的支持，這使得我們在開發系統中，對數據庫的使用也有了更深一步的熟悉和了解，并取得了一定的成果。由于能力的原因本次課題的設計還有很多缺乏的地方，一些功能的分析、設計和實現還有待進一步的提高和改善。參考文獻：?軟件工程導論?(張海藩)清華大學出版社?現代軟件工程? 北京希望電子出版社 孫涌等編著附錄：酒店管理系統功能模塊的局部代碼1、路徑初始化函數代碼：AppInitPath=GetCurrentDirectory()//得到當前應用程序的路徑,如D:\demojx\pbsqlifDirectoryExists(appInitPath+"\ico")then//函數DirectoryExists測試指定路徑是否存在IcoPath=AppInitPath+"\ico\"else ifCreateDirectory(AppInitPath+"\ico")=1then//創立目錄成功返回1IcoPath=AppInitPath+"\ico\" else returnfalse endif endififDirectoryExists(appInitPath+"\pic")thenPicPath=AppInitPath+"\Pic\"elseifCreateDirectory(AppInitPath+"\pic")=1then//創立目錄成功返回1PicPath=AppInitPath+"\Pic\" else returnfalse endif endif ifDirectoryExists(appInitPath+"\db")thenDBPath=AppInitPath+"\DB\"elseifCreateDirectory(AppInitPath+"\DB")=1then//創立目錄成功返回1 DBPath=AppInitPath+"\DB\" else returnfalse endif endif returntrue2、連接數據庫的代碼initpaths()//路徑初始化函數loadsystem()//創立數據源的函數//ProSQLCA.DBMS="ODBC"SQLCA.AutoCommit=TrueSQLCA.DBParm="ConnectString='DSN=zrs'"connectusingSQLCA;ifsqlca.sqlcode=0then//sqlca全局事務對象,sqlcode=0表示連接成功//open(w_main)//翻開密碼窗體open(w_login) //翻開主窗體 elsemessagebox("提示","ACCESS2003數據庫連接失敗",StopSign!,Ok!)return endif 注：Loadsystem()函數的代碼如下：〔查找網上的資料〕/*添加數據源名稱zrs*/registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\odbcdatasources","zrs",regstring!,"MicrosoftAccessDriver(*.mdb,*.*)")/*添加相應項*/registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","DBQ",regstring!,DBPath+"yjy512.mdb")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","Driver",regstring!,"C:\WINDOWS\system32\odbcjt32.dll")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","DriverId",ReguLong!,25)registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","FIL",regstring!,"MSAccess;")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","SafeTransactions",ReguLong!,0)registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\zrs","UID",regstring!,"")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\tudou\Engines\Jet","ImplicitCommitSync",regstring!,"")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\tudou\Engines\Jet","UserCommitSync",regstring!,"Yes")registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\tudou\Engines\Jet","MaxBufferSize",ReguLong!,2048)registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\tudou\Engines\Jet","PageTimeout",ReguLong!,5)registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\tudou\Engines\Jet","Threads",ReguLong!,3)/* 注冊HKEY_LOCAL_MACHINE*/registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","APILevel",regstring!,"1")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","ConnectFunctions",regstring!,"YYN")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","Driver",regstring!,"C:\WINDOWS\system32\odbcjt32.dll")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","DriverODBCVer",regstring!,"02.50")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","",regstring!,"*.*")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","",regstring!,"2")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","Setup",regstring!,"C:\WINDOWS\system32\odbcjt32.dll")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","SQLLevel",regstring!,"0")registryset("HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\MicrosoftAccessDriver(*.mdb,*.*)","UsageCount",ReguLong!,4)3、登錄窗體的登錄按鈕的代碼：stringuid,xlv="T",alv="U"SELECTstuff_arch.stuff_id,stuff_arch.stuff_vlvINTO:uid,:global_vlvFROMstuff_archwherestuff_arch.stuff_id=:sle_user.textandstuff_arch.stuff_id=:sle_passwd.textand(stuff_arch.stuff_vlv=:xlvorstuff_arch.stuff_vlv=:alv);ifsqlca.sqlcode=0then open(w_main) close(parent)else cs=cs+1sle_user.SetFocus(); st_1.textcolor=rgb(255,0,0) st_1.text="輸入第"+trim(string(cs))+"次出錯" sle_user.text=""; sle_passwd.text=""ifcs=3th