【文章內(nèi)容簡介】 LSERVER2021 數(shù)據(jù)庫簡介 數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具數(shù)據(jù)庫的作用在于組織和表達信息簡而言之數(shù)據(jù)庫就是信息的集合計算機的數(shù)據(jù)庫可以分為兩類非關(guān)系數(shù)據(jù)庫 flatfile 和關(guān)系數(shù)據(jù)庫 relational 關(guān)系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息數(shù)據(jù)庫含有各個不同部分的術(shù)語象記錄域等 微軟 SQLSERVER2021 簡介 SQL Server 2021 是 Microsoft 公司推出的 SQL Server 數(shù)據(jù)庫管理系 統(tǒng)的最新版本該版本繼承了 SQL Server 70 版本的優(yōu)點同時又比它增加了許多更先進的功能具有使用方便可伸縮性好與相關(guān)軟件集成程度高等優(yōu)點可跨越從運行Microsoft Windows 98 的膝上型電腦到運行 Microsoft Windows 2021 的大型多處理器的服務器等多種平臺使用 ADO 是訪問由微軟推出的最新功能最強且容易使用的數(shù)據(jù)訪問實例 OLEDB 的應用程序接口 我們就是通過它以及創(chuàng)建 Active X 數(shù)據(jù)對象 VB60 與 SQL 數(shù)據(jù)庫二者的連接 ADO ADO Recordset 來訪問 SQLSEVER2021 上的 ODBC 數(shù)據(jù)源使用 ADO 控件可以方便的在 VB6 中訪問 ODBC 數(shù)據(jù)庫但是通過直接放置 ADODS 控件來獲得 ADO 的數(shù)據(jù)連接比較麻煩可以在 VB 工程中創(chuàng)建一個公共數(shù)據(jù)模塊將 ADO 控件的初始化建立連接關(guān)閉連接等操作都寫到函數(shù)中這樣就可以在工程的其他模塊中共享調(diào)用這個 ADO 連接一次完整的 ADO 調(diào)用操作分為如下幾個步驟 通過 ADO 控件使 Visual Basic 程序與 SQLSERVER 數(shù)據(jù)庫之間架起了一座橋梁我們可以很方便的通過修改程序中 ADODC的參數(shù)并通過 SQL語句來指向數(shù)據(jù)庫的 不同部分從而方便的對數(shù)據(jù)庫進行各種操作 系統(tǒng)分析設計 系統(tǒng)功能簡介 經(jīng)過對比真實的銀行提款機系統(tǒng)實現(xiàn)以下內(nèi)容 1 可以選擇中文和英文兩種語言服務 2 身份認證 3 密碼修改 4 取款 5 轉(zhuǎn)帳 6 查詢余額 7 查詢交易明細 系統(tǒng)流程圖 圖 1 系統(tǒng)流程圖 系統(tǒng)開發(fā)主要應用技術(shù) WINDOWS XP 是時下最流行的電腦操作系統(tǒng)穩(wěn)定性安全性都非常不錯而隨著ATM提款機逐步采用個人電腦以及性能的升級 WINXP也有了可能成為這些提款機的操作系統(tǒng)所以本次系統(tǒng)也在 WINXP 下進行開發(fā)由于需要 開發(fā)出前臺客戶友好界面及后臺數(shù)據(jù)庫系統(tǒng)而對于前臺只要能滿足其界面開發(fā)需要即可所以我采用了相對簡單易用并且功能強大的 VB60 后臺數(shù)據(jù)庫則采用了與之相連方便且功能同樣強大的 SQLSERVER2021采用以上兩個開發(fā)軟件完全能夠滿足 ATM模擬系統(tǒng)的開發(fā)需要 系統(tǒng)主要是由前臺客戶操作界面與后臺數(shù)據(jù)庫兩個部分組成前臺部分整個代碼程序采用一個主模塊在里面定義程序全局變量把各種功能函數(shù)寫入其中每個界面制作一個獨立窗體在各個窗體代碼中來調(diào)用主模塊中的各個函數(shù)來來實現(xiàn)相應功能界面部分由于 08年奧運會的臨近采用了幾副有關(guān)北京 08奧運會的卡通圖片讓界面整體突出一種奧運氣氛通過可愛的卡通動物也實現(xiàn)了友好親切的操作氛圍 經(jīng)過充分考慮認為系統(tǒng)并不需要非常復雜的數(shù)據(jù)庫系統(tǒng)就能夠達到模擬ATM 系統(tǒng)的效果所以建立了一個名為 X\ATM 的 SQL 服務器創(chuàng)建了名為 USER 的數(shù)據(jù)庫用戶登陸名為 sa 密碼為空并在 ODBC 數(shù)據(jù)源中將 USER 數(shù)據(jù)庫添加進去其中實際上只運用到兩個表一個用戶信息表和一個用戶操作表 表 1 用戶信息表 用戶信息表用以存放用戶的卡號密碼存款金額等信息由于該系統(tǒng)是為了模擬運用故安全要求不高所以密碼采用了明文方式存放便于使用查看本次 模擬系統(tǒng)并不具有創(chuàng)建新用戶的功能用戶信息表上的內(nèi)容都是為了模擬而手動添加的樣本用戶 表 2 用戶操作表 用戶操作表則用來記錄用戶在 ATM機上所使用的服務它包括了所有用戶對 ATM 的操作信息包括時間操作類型金額轉(zhuǎn)帳卡號成功與否等等用戶查詢明細的功能就是通過搜集檢索這張表來實現(xiàn)同時管理人員也可以從這張表上很方便的查閱用戶使用情況當然真實的銀行 ATM 系統(tǒng)其后臺的數(shù)據(jù)庫系統(tǒng)肯定是十分龐大的一個系統(tǒng)對保密性的要求也非常的高在這次的模擬中當然不可能達到那樣的要求 系統(tǒng)功能實現(xiàn) 歡迎界面實現(xiàn) 圖 2 歡迎界面 在歡迎界面我 們可以自由的選擇兩種語言分別為我們最常用的中文和英語在這里主模塊中定義了一個非常重要的 INT整型變量 i通過 i的值來決定所選擇的服務任意點擊一種服務都將進入登陸界面 Private Sub Command1_Click i 2 當點中文按鈕時 i的值就被賦為了 2在后面的操作中 i的值就將始終為 2 用以區(qū)別所選語言服務 Unload Form1 Form2Show End Sub Private Sub Command2_Click i 1 點 ENGLISH 按鈕時 i 的值賦 1 Unload Form1 Form2Show End Sub 登陸實現(xiàn) 在登陸界面有兩種語言可以用戶一是中文而是英文選擇兩種語言的功能和界面背景實際上都是完全一致的只是語言文字不同圖為選擇中文的界面 圖 3 登陸界面中文 如果點擊的是 ENGLISH 則為圖 圖 4 登陸界面英文 這里的兩個界面并非通過兩個窗體單獨實現(xiàn)而是共用一個窗體通過判斷 i的值對 label中的 CAPTION進行相應的中文和英文賦值后面的操作界面同樣也是采用這種方法就不再做英文的界面介紹這里把默認 的語言選擇為中文直接在窗體編輯菜單中對 CAPTION 進行了相應賦值如果為英文則需執(zhí)行下面的語句此后的每個界面語言確定及實現(xiàn)都是通過采取這個方法 Private Sub Form_Load If i 1 Then 判斷 i 的值 如果為 1 則進行英文賦值 Label1Caption Do you want to continuePlease choose Command1Caption other service Command2Caption Cancel End If End Sub 在窗體中我們首先來判斷用戶輸入的卡號和密碼是否符合我們的規(guī)定卡號為 8 位密碼為 6 位 Private Sub Command1_Click 當我們點下確認按鈕時 If i 2 Then If Len Text1Text 8 Or Len Text2Text 6 Then 比較卡號是否為 8 位及密碼是否為 6 位 Form3Show Form3Label1Caption 沒有正確輸入卡號或密碼 Text1Text Text2Text Else Call Checkuser 這里是調(diào)用主模塊中的身份驗證函數(shù)在后面的窗體實現(xiàn)中都是通過 CALL 語句來直接調(diào)用相應函數(shù)的 End If End If 以下為用戶選擇英語的代碼和選擇中文時是一樣的在后面的介紹中將不在引用英語的代碼 If i 1 Then If Len Text1Text 8 Or Len Text2Text 6 Then Form3Show Form3Label1Caption Please Input Correct Cardnumber Or Password Text1Text Text2Text Else Call Checkuser End If End If End Sub 在主模塊 MODEL1 中身份驗證函數(shù)代碼為 Public Sub Checkuser 定義 Checkuser 函數(shù) Dim strr As String Set CON New ADODBConnection strr Provider SQLOLEDB1Password Persist Security Info TrueUser ID saInitial Catalog userData Source X\ATM這段語句采