銀行設備管理系統—免費(編輯修改稿)

　

【文章內容簡介】 本系統可使那些銀行對設備 管理工作更高效、方便，也 節省了管理成本。較之以前的傳統的手工管理方法有了較大的飛躍。面對國外強勢的沖擊，在銀行業中有大部分的市場。成本上主要是人力，并無設備上的要求，開發工具也現成有的，所以經濟上可行。 法律的可行性 此系統是由老師帶領及學生自主進行設計及實施完成的，并無侵權和責任問題，法律上不存在任何問題。 開發目標 系統的總目標是為管理者提供迅速、高效的服務，減免手工處 理的繁瑣與誤差。 系統分析的基本方法 在傳統的需求建模方法中有面向數據流，面向對象以及面向數據等三種常用分析方法， （ 1） .面向數據流的分析方法 該方法以信息對象及其操作為核心進行需求分析，可以按順序、選擇、重復三種結構把復合信息對象分解為成員信息對象。 （ 2） .面向對象的分析方法 其核心是利用面向對象的概念和方法為軟件需求建造模型，它通過提供對象，對象間消息傳遞等語言機制，讓分析人員在解空間中直接模擬問題空間中的對象極其行為，從而削減了語義斷層。 （ 3） .面向數據的分 析方法 描述問題域中的信息項及其相關行為，然后根據信息項具有的層次結構需求模型。 數據庫結構設計 數據庫結構設計是總體設計階段非常重要的環節，好的數據庫結構可以簡化開發過程，使系統功能更加清晰明確。因為數據庫結構的變化會造成編碼的改動，所以必須認真設計數據庫結構后再進行編碼，從而避免無謂的重復工作。 數據庫包含 7 個表，即基本信息表 BaseInfo、設備信息表 Device、設備維護表 Maintenance、設備巡檢表 Check、設備移機表 Movement、設備報廢表 Discard和用戶 信息表 Users。 (1)基本信息表 BaseInfo,保存設備分類、設備品牌和支行名稱的信息，結構如表 21所示。 表 21 表 BaseInfo 的結構 編號 字段名稱 數據類型 說明 1 InfoID Int 編號，主鍵 2 InfoName Varchar50 名稱 3 TypeId Tinyint 分類， 1 表示設備分類； 2表示設備品牌；3 表示支行 (2)設備信息表 Device,保存設備的基本信息，結構如表 22所示。 表 22 表 Device 的結構 編號 字段名稱 數據類型 說明 1 DevNo Varchar50 設備編號，主鍵 2 TypeID Int 設備分類編號 3 EnterpriseID Int 設備品牌編號 4 Model Varchar50 設備型號 5 Price Int 購買價格 6 Place Varchar50 設備布放地點 7 BranchID Int 設備所屬支行編號 8 StartDate Datetime 設備開通時間 9 Administrator Varchar50 設備管理員 10 Poster Varchar50 提交人 11 Status Varchar50 設備狀態（正常，報廢） (3)設備維護表 Maintenance,保存設備的維護信息，結構如圖 23所示。 表 23 表 Maintenance 編號 字段名稱 數據類型 說明 1 MnID Int 記錄編號，主鍵 2 DevNo Varchar50 設備編號 3 ReportDate Datetime 設備報修時間 4 ArriveDate Datetime 到達現場時間 5 SolveDate Datetime 故障解決時間 6 Reason Varchar200 故障原因 7 ChangeAccessory Bit 是否更換配件 8 AccessoryList Varchar200 更換配件的列表 9 Engineer Varchar50 維護人姓名 10 Amount Float 維護費用 11 Comment Varchar500 備注 (4)設備巡檢表 Check,保存設備巡檢的信息，結構如表 24 所示。 表 24 表 Check 的結構 編號 字段名稱 數據類型 說明 1 CheckID Int 記錄編號，主鍵 2 DevNo Varchar50 設備編號 3 CheckDate Datetime 設備巡檢時間 4 Comment Varchar500 設備巡檢內容 5 FindError Bit 是否發現故障 6 Reason Varchar200 故障原因 7 ChangeAccessory Bit 是否更換配件 8 AccessoryList Varchar200 更換配件的列表 9 Amount Float 維修費用 10 CheckPerson Varchar50 巡檢人員 (5)設備移機表 Movement,保存設備移機信息，結構如表 25所示 表 25 表 Movement 的結構 編號 字段名稱 數據類型 說明 1 MoveID Int 記錄編號，主鍵 2 DevNo Varchar50 設備編號 3 MoveDate Datetime 移機時間 4 Reason Varchar200 移機原因 5 NewPlace Varchar50 新 布放地點 6 NewAdmin Varchar50 新管理員 (6)設備報廢表 Discard,保存設備的報廢信息，結構如表 26 所示。 表 26 表 Discard 的結構 編號 字段名稱 數據類型 說明 1 DisID Int 記錄編號，主鍵 2 DevNo Varchar50 設備編號 3 DisSum Int 折算金額 4 Reason Varchar200 報廢原因 5 CreateDate Datetime 申請時間 6 Username Varchar40 申請人 7 Checker Varchar40 審批人 8 CheckDate Datetime 審批日期 9 Result Varchar200 審批意見 10 Status Varchar10 狀態（申請、提交、同意、不同意、報廢） (7)用戶信息表 Users,保存系統用戶星系，結構如表 27所示。 表 27 表 Users 的結構 編號 字段名稱 數據類型 說明 1 UserName Varchar50 用戶名，主鍵 2 UserPwd Varchar50 密碼 在表的結構表中定義了每個表的主鍵，為了規定各表之間的關系，還定義一組外鍵，如表 28所示。 表 28 外鍵定義 關系名 主鍵表 主鍵字段 外鍵表 外鍵字段 FK_Device_BaseInfo BaseInfo InfoID Device TypeID FK_Device_BaseInfo1 BaseInfo InfoID Device EnterpriseID FK_Device_BaseInfo2 BaseInfo InfoID Device BranchID FK_Maintenance_Device Device DevNo Maintenance DevNo FK_ Device DevNo Check DevNo FK_ Device DevNo Movement DevNo FK_ Device DevNo Discard DevNo 第三章設計工程框架 工程中的模塊 本工程包含如下幾個模塊： ? Const 用來管理工程中的常量。 ? DbFunc 用來管理工程中與數據庫操作相關的聲明、變量和函 數。 ? GeneralFunc 用來管理工程中一些通用的自定義函數。 ? Variable 用來管理工程中的全局變量。 添加類模塊 在工程中，需要為每一個創建一個類模塊，將對此表的所有數據庫操作封裝在類中。在通常情況下，類的成員變量與對應的表中的字段名相同。 1) BaseInfo 類用來管理表 BaseInfo 的數據庫操作，它保存為。 2) Devicees 類用來管理表 Device 的數據庫操作 ,它保存為 。 3) Maintenance 類用來管理表 Maintenance 的數據庫操作，它保存 為。 4) Check 類用來管理表 Check 的數據庫操作，它保存為 。 5) Movement 類用來管理表 Movement 的數據庫操作，它保存為。 6) Discard 類用來管理表 Discard 的數據庫操作，它保存為 。 7) Users 類用來管理表 Users 的數據庫操作，它保存為 。 第四章系統設計 當系統運行時，首先打開登錄窗體，只有有權限的用戶才能進入系統。登錄成功后，將顯示系統主界面。 設計登錄窗體 登錄窗體的名稱為 FrmLogin,他的界面布局如圖 41 所示。 圖 41 登錄窗體的界面布局 登錄窗體的屬性如表 41 所示 。 表 41 設置登錄窗體的屬性 窗體屬性 設置值 具體說明 名稱 FrmLogin 設置窗體名稱 BorderStyle 1Fixed Single 設置窗體的邊框屬性 Caption 身份驗證 窗體的標題條文本 ControlBox False 取消控制按鈕，防止用戶通過控制按鈕關 閉對話框 StartUpPosition 2屏幕中心 設置窗體彈出時，位置在屏幕中心 登錄窗體中控件的屬性如表 42 所示。 表 42 登錄窗體包含的控件及其屬性 對象名 屬性 屬性值 Label1 Caption 用戶名 Label2 Caption 密碼 TxtUser Text 空 TxtPwd Text 空 PasswordChar * Cmd_Ok Caption 確定 Cmd_Cancel Caption 取消 代碼如下： Private Sub Cmd_OK_Click() Dim j As Single ?數據有效性檢查 If txtUser = “” Then MsgBox “請輸入用戶名 ” Exit Sub End If If txtPwd = “” Then MsgBox “請輸入密碼 ” Exit Sub End If NameKey = MakeStr(txtUser) PasswordKey = MakeStr(txtPwd) ?判斷用戶是否存在 If (NameKey) = False Then MsgBox “用戶名不存在 ” Try_times = Try_times + 1 If Try_times = 3 Then MsgBox “您已經三次嘗試進入本系統，均不成功，系統將關閉 ” Dbapi_Disconnect End Else Exit Sub End If End If ?判斷密碼是否正確 (NameKey) If PasswordKey Then MsgBox “密碼錯誤 ” Try_times = Try_times + 1 If Try_times = 3 Then MsgBox “您已經三次嘗試進入本系統，均不成功，系統將關閉 ” Dbapi_Disconnect End Else Exit Sub End If End If ?登錄成功，將當前用戶的信息保存在 CurUser 中 () ?關閉自己 Unload Me End Sub 設計主界面 主窗體是工程的啟動對象，可以在系統菜單中選擇“工程” /“屬性”，打開屬性窗口設置啟動對象。本系統中主窗體名為 FrmMain。 菜單設計器如圖： 42 所示。 圖 42 主窗體 FrmMain 代碼如下： Private Sub Form_Load() 39。登錄界面 1 End Sub 基本信息管理模塊設計 基本信息管理模塊包括設備類型信息管理、設備品牌信息管理和支行信息管理。 設備類型信息管理 設備類型信息管理窗體的名稱為 FrmType，布局如圖 43 所示 。 圖 43