【正文】 個(gè) ADO Data 控件為它們提供數(shù)據(jù)源。設(shè)置查詢條件 SchCnd = AND = 39。設(shè)置連接字符串 = SELECT * FROM BaseInfo WHERE TypeId=1 39。綁定數(shù)據(jù)源 = InfoName 39。設(shè)備型號 = 0 39。 Private Sub Cmd_Modi_Click() If = True Then MsgBox 請選擇記錄 Exit Sub End If 39。購買價(jià)格 = Trim((5)) 39。刷新 DataGrid 表格的內(nèi)容 End Sub 銀行設(shè)備管理系統(tǒng) 31 設(shè)備信息選擇窗體 為了方便用戶在其他模塊中選擇設(shè)備信息，設(shè)計(jì)一個(gè)選擇設(shè)備的窗體，窗體名為 FrmDeviceSel 中，使用 DATAGRID 和 ADODC 控件來顯示設(shè)備的數(shù)據(jù)。設(shè)備編號 () 39。根據(jù)變量 Modify 的值，決定是插入新數(shù)據(jù)，還是修改已有的數(shù)據(jù) If Modify = False Then .Insert Else .Update (OriId) End If End With 39。 + Format(, yyyymmdd) _ + 39。 END AS 是否更換配件 , AS 更換配件的列表 , _ + AS 維護(hù)人員 , AS 維護(hù)費(fèi)用 , AS 備注 _ + FROM Device d, BaseInfo t1, BaseInfo t2, Maintenance m _ + WHERE = AND = AND = _ + SchCnd + ORDER BY 39。設(shè)置數(shù)據(jù)源的屬性 = Conn = SELECT AS 編號 , AS 設(shè)備編號 , _ + AS 設(shè)備品牌 , AS 設(shè) 備型號 , AS 銀行設(shè)備管理系統(tǒng) 35 所屬支行 , _ + AS 布放地點(diǎn) , AS 設(shè)備報(bào)修時(shí)間 , AS 到達(dá)現(xiàn)場時(shí)間 , _ + AS 故障解決時(shí)間 , AS 故障原因 , CASE WHEN 0 _ + THEN 39。代碼如下： Private Sub GridRefresh() 39。布放地點(diǎn) End Sub 銀行設(shè)備管理系統(tǒng) 33 當(dāng)用戶在設(shè)備窗體中選擇了設(shè)備，同時(shí)將設(shè)備信息放入到對象 MyDeviceSel中，所以當(dāng)用戶退出選擇設(shè)備窗體時(shí)，系統(tǒng)可以從對象 MyDeviceSel 中讀取選擇的設(shè)備信息。 設(shè)備維護(hù)信息編輯窗體 設(shè)備維護(hù)信息 編輯窗體的名稱為 FrmMntenanceEdit,窗體的布局如圖 47 所示。管理員 = Trim((9)) 39。設(shè)備編號 = Trim((1)) 39。管理員 = 39。 Private Sub Cmd_Add_Click() 39。綁定列值 39。設(shè)置數(shù)據(jù)源 (0).Width = 800 39。 (1)SchCnd 變量。把用戶錄入的數(shù)據(jù)賦值到數(shù)據(jù)庫對象變量中 With MyDevice .DevNo = MakeStr(txtDevNo) .TypeID = Val() .EnterpriseID = Val() .Model = MakeStr(txtModel) .Price = Val(txtPrice) .Place = MakeStr(txtPlace) .BranchID = Val() .StartDate = Format(, yyyymmdd) .Administrator = MakeStr(txtAdmin) .Poster = MakeStr(txtPoster) .Status = 正常 39。 支行信息 = Conn 39。顯示列名 = InfoId 39。 銀行設(shè)備管理系統(tǒng) 24 圖 44 窗體 FrmDeviceEdit 包含的主 要控件及其屬性如表 44 所示。刷新分類列表 End Sub （ 5） Cmd_Del_Click 過程 。判斷是否存在此記錄信息 OriInfoName = Trim() 39。設(shè)置列表綁定字段 End Sub （ 2） cmd_add_click 過程。 圖 43 窗體中包含的控件及其屬性如表 43 所示。 圖 41登錄窗體的界面布局 登錄窗體的屬性如表 41 所示 。 3) Maintenance 類用來管理表 Maintenance 的數(shù)據(jù)庫操作，它保存 為。 表 28 外鍵定義 關(guān)系名 主鍵表 主鍵字段 外鍵表 外鍵字段 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 銀行設(shè)備管理系統(tǒng) 15 第三章設(shè)計(jì)工程框架 工程中的模塊 本工程包含如下幾個(gè)模塊： ? Const 用來管理工程中的常量。 數(shù)據(jù)庫包含 7 個(gè)表，即基本信息表 BaseInfo、設(shè)備信息表 Device、設(shè)備維護(hù)表 Maintenance、設(shè)備巡檢表 Check、設(shè)備移機(jī)表 Movement、設(shè)備報(bào)廢表 Discard和用戶 信息表 Users。成本上主要是人力，并無設(shè)備上的要求，開發(fā)工具也現(xiàn)成有的，所以經(jīng)濟(jì)上可行。 在此，對本系統(tǒng)的可行性作一分析。 ? ADO 數(shù)據(jù)庫訪問技術(shù)。 銀行設(shè)備管理系統(tǒng) 10 開發(fā)工具的選擇 開發(fā)數(shù)據(jù)庫管理信息系統(tǒng)需要選擇兩種工具，既前臺開發(fā)語言和后臺數(shù)據(jù)庫。設(shè)備移機(jī)信息包括移機(jī)時(shí)間、移機(jī)原因、設(shè)備新布放地點(diǎn)、設(shè)備新管理員等。 在設(shè)備維護(hù)信息管理模塊中，可以對設(shè)備維護(hù)信息進(jìn)行添加、修改、刪除和查看等操作?；拘畔ㄔO(shè)備分類信息、設(shè)備品牌信息和支行信息等。身份認(rèn)證可以分為以下兩個(gè)過程： ? 確認(rèn)用戶是否是有效的系統(tǒng)用戶。 本系統(tǒng)中，用戶管理模塊的功能比較簡單。 ? 設(shè)備巡檢信息的添加、修改、刪除和查詢。 統(tǒng)一的語言： SQL可用于所有用戶的 DB 活動模型，包括系統(tǒng)管理員、數(shù)據(jù)庫管理員、 應(yīng)用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。使用 SQL的常見關(guān)系數(shù)據(jù)庫管理系統(tǒng)有： Oracle、 Sybase、 Microsoft SQL Server、 Access、 Ingres等等。圖 庫系統(tǒng)的簡圖。 在人類邁向 21 世紀(jì)知識經(jīng)濟(jì)的時(shí)候，信息變?yōu)榻?jīng)濟(jì)發(fā)展的戰(zhàn)略資源，信息技術(shù)已成為社會生 產(chǎn)力重要的組成部分。 ABSTRACT Along with the universality of the bankcard, a lot of places installed a great deal of savings machine and withdraw money the machine and POS machine etc. bank selfhelp equipments. The bank equipments management system can record the gearing and the usage circumstance of the bank equipments effectively, management of norm to the selfhelp equipments, thus for the customer provide more stable with superior quality of service. This text introduced the design of the bank equipments management system and development process, elaborating the whole design way of thinking of applied system in detail, and designed period to carry on to each part detailed of analysis, end reach an integrity of design project；This system adoption Visual Basic is to develop tool, the SQL Server is the backstage database. This is the database management information system of classic. The end in article, return to adjust to try a result according to the database system, put forward can improve further of part, in order to at throw in physically applied after the system can stabilize a dependable work more. The textual database system is a bank equipments management system, including the equipments type management, the equipments brand management 銀行設(shè)備管理系統(tǒng) 2 and paying to go the information management,equipments maintenance information management,equipments to move the machine information management,equipments to cruise the check information management and equipments to discard the information management etc. function. 關(guān) 鍵詞：銀行設(shè)備管理系統(tǒng)的實(shí)現(xiàn) ， SQL數(shù)據(jù)庫系統(tǒng) Keyword:The realization of the bank equipments management system, SQL database system 銀行設(shè)備管理系統(tǒng) 3 目錄 第一章緒論 ...................................................................................................................... 4 計(jì)算機(jī)在銀行中的應(yīng)用 ........................................................................................ 4 數(shù)據(jù)庫及其應(yīng)用 ................................................................................................... 4 數(shù)據(jù)庫系統(tǒng) .......................................................................................................... 4 數(shù)據(jù)庫系統(tǒng)簡介 ................................................................................................... 5 第二章系統(tǒng)分析 ............................................................................................................... 6 系統(tǒng)需求分析 .