銀行儲蓄系統(tǒng)

1、精品 料推薦數(shù)據(jù)庫系統(tǒng)原理課 程 設(shè) 計2011 年 12 月 31 日0精品 料推薦目錄一、概述-31.1課程設(shè)計的目的 -31.2課程設(shè)計的內(nèi)容 -31.3課程設(shè)計的要求 -3二、需求分析 -32.1系統(tǒng)需求 -32.2數(shù)據(jù)字典 -3三、系統(tǒng)總體設(shè)計 -33.1系統(tǒng)總體設(shè)計思路 -33.2概念模型設(shè)計 -33.2.1局部 e-r 圖 -33.2.2全局 e-r 圖 -33.3邏輯結(jié)構(gòu)設(shè)計 -33.4數(shù)據(jù)庫建立實施 -33.4.1建立數(shù)據(jù)庫 -33.4.2建立關(guān)系表 -3四、系統(tǒng)實現(xiàn) -3五、系統(tǒng)評價 -3六、課程設(shè)計心得、總結(jié) -3參考文獻： -3致謝-3附錄-31精品 料推薦一、概述1.

2、1課程設(shè)計的目的數(shù)據(jù)庫系統(tǒng)原理 課程設(shè)計是本專業(yè)的重要實踐性教學(xué)環(huán)節(jié)， 是數(shù)據(jù)庫系統(tǒng)原理課程的后續(xù)輔助教學(xué)課程。 通過該課程設(shè)計， 使學(xué)生掌握數(shù)據(jù)庫的基本概念，結(jié)合實際的操作和設(shè)計， 鞏固課堂教學(xué)內(nèi)容， 使學(xué)生掌握數(shù)據(jù)庫系統(tǒng)的基本概念、原理和技術(shù)， 將理論與實際相結(jié)合， 應(yīng)用現(xiàn)有的數(shù)據(jù)建模工具和數(shù)據(jù)庫管理系統(tǒng)軟件， 規(guī)范、科學(xué)地完成一個小型數(shù)據(jù)庫的設(shè)計與實現(xiàn)， 把理論課與實驗課所學(xué)內(nèi)容做一綜合， 并在此基礎(chǔ)上強化學(xué)生的實踐意識、 提高其實際動手能力和創(chuàng)新能力。具體掌握的基本能力有以下幾個方面：1. 學(xué)習(xí)和鞏固數(shù)據(jù)庫系統(tǒng)原理的基本知識。2. 關(guān)系數(shù)據(jù)庫管理系統(tǒng)的基本使用方法。3. 熟悉 sql

3、語言的主要功能及 sql 語句的使用操作。4. 熟悉數(shù)據(jù)庫管理系統(tǒng)的設(shè)計過程，培養(yǎng)解決實際問題的能力。5. 小型數(shù)據(jù)庫應(yīng)用系統(tǒng)的設(shè)計方法。1.2課程設(shè)計的內(nèi)容1、課程設(shè)計內(nèi)容：(1) 主要的數(shù)據(jù)表定期存款帳，活期存款帳，存款類別代碼表等等。(2) 主要功能模塊1) 實現(xiàn)儲戶開戶登記。2) 辦理定期存款帳。3) 辦理定期取款手續(xù)。4) 辦理活期存款帳5) 辦理活期取款手續(xù)。6) 實現(xiàn)利息計算。7) 輸出明細表。2精品 料推薦8) 具有數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)功能。2、系統(tǒng)要求：(1) 要進行實際調(diào)研，系統(tǒng)功能在實現(xiàn)時參照實際的儲蓄系統(tǒng)的功能。(2) 同時要考慮銀行系統(tǒng)數(shù)據(jù)的安全與保密工作。1.3課程設(shè)

4、計的要求1. 根據(jù)題目查找資料及調(diào)研，寫出數(shù)據(jù)庫系統(tǒng)的需求分析報告；2. 根據(jù)需求分析，設(shè)計系統(tǒng)的功能結(jié)構(gòu)，畫出系統(tǒng)的功能結(jié)構(gòu)圖，設(shè)計的功能要全面、正確，能解決現(xiàn)實世界各類用戶的實際需要；3. 根據(jù)需求分析，確定所設(shè)計的系統(tǒng)涉及到的實體、各實體的屬性以及各實體之間的聯(lián)系，用 e-r 圖完成系統(tǒng)的概念模型設(shè)計， 設(shè)計的概念模型要能全面、真實的反應(yīng)現(xiàn)實世界，能滿足系統(tǒng)功能的需要；4. 根據(jù) e-r 圖轉(zhuǎn)換為 dbms支持的關(guān)系模型，作出數(shù)據(jù)庫系統(tǒng)的邏輯模型：1）數(shù)據(jù)庫的關(guān)系模式（使用關(guān)系模型規(guī)范化理論進行優(yōu)化，要求各關(guān)系至少達到 3nf）；2）確定各關(guān)系屬性的域；3）確定各關(guān)系的主碼、必要的約束、

5、關(guān)系之間的參照完整性等。5. 適當(dāng)?shù)倪x擇設(shè)計各類用戶的子模式；6. 根據(jù)邏輯模型、系統(tǒng)環(huán)境和用戶需求，設(shè)計數(shù)據(jù)庫的物理結(jié)構(gòu)。7. 使用 pb、 vfp、 vb、 vc、 vb.net、 c#、 java、 delphi、 asp、 jsp、 php或 asp.net等程序設(shè)計語言，進行相應(yīng)前臺主要模塊和菜單的設(shè)計，采用b/s或 c/s 模式，數(shù)據(jù)庫作為后臺服務(wù)器。8. 設(shè)計一組數(shù)據(jù)庫表的測試實例，對各項功能進行簡單的測試并寫出測試結(jié)果。9. 按照附件 1 中課程設(shè)計模板的格式， 編寫課程設(shè)計報告， 并使用 a4 紙打印、上交。10. 提交以下電子稿信息： 課程設(shè)計報告電子稿、 數(shù)據(jù)庫文件 (*

6、.mdf 和*.ldf文件 ) 、軟件源代碼和軟件使用說明3精品 料推薦二、需求分析2.1系統(tǒng)需求通過調(diào)查，要求系統(tǒng)需要有以下功能：（ 1） 要求有良好的人機界面；（ 2） 由于該系統(tǒng)使用對象多，要求有較好的權(quán)限管理；（ 3） 原始數(shù)據(jù)修改簡單方便，支持多條件修改；（ 4） 方便的數(shù)據(jù)查詢，支持多條件查詢；（ 5） 在相應(yīng)的權(quán)限下，刪除數(shù)據(jù)方便，數(shù)據(jù)穩(wěn)定性好；（ 6） 數(shù)據(jù)計算自動完成，盡量減少人工干預(yù)。系統(tǒng)中要求每個人銀行管理者都有一個系統(tǒng)帳號， 并每個帳號都有密碼， 系統(tǒng)的一切操作（如：增加存儲用戶，提高利率等）都由管理者執(zhí)行，而不是由存諸用戶執(zhí)行，也主是說存儲用戶并不直接與系統(tǒng)交互， 而

7、是通過管理員與系統(tǒng)交互。該系統(tǒng)主要有兩部份業(yè)務(wù)功能，存款與取款。儲戶填寫的存款單或取款單由業(yè)務(wù)員輸入系統(tǒng)， 如果是存款則系統(tǒng)記錄存款人姓名，住址，電話號碼，身份證號碼，存款類型，存款日期，到期日期，利率及密碼（可選）等信息，如果是取款而且存款時留有密碼，則系統(tǒng)首先核對儲戶密碼，若密碼正確或存款時未留密碼， 則系統(tǒng)計算得利息并打印出利息清單給儲戶。2.2數(shù)據(jù)字典數(shù)據(jù)名字：注冊申請表數(shù)據(jù)名字：儲戶信息表數(shù)據(jù)來源：儲戶數(shù)據(jù)來源：儲戶數(shù)據(jù)數(shù)目據(jù)的目：的儲：戶身信份息驗證數(shù)據(jù)組成：姓名+密碼 +住址 +身份證號碼 +現(xiàn)有金額數(shù)據(jù)組成：姓名+密碼 +住址 +身份證號碼數(shù)據(jù)名字：利息清單數(shù)據(jù)來源：系統(tǒng)數(shù)據(jù)目

8、的：儲戶數(shù)據(jù)組成：利息+姓名 +取款時間 +取款金額4精品 料推薦數(shù)據(jù)名字：存單數(shù)據(jù)來源：存款信息表數(shù)據(jù)目的：儲戶數(shù)據(jù)組成：姓名 +到期時間 +存入類型 +存入時間 +利率 + 存入金額數(shù)據(jù)名字：取款單數(shù)據(jù)來源：儲戶數(shù)據(jù)目的：儲戶信息表數(shù)據(jù)組成：姓名 +到期時間 +存入類型 +存入時間 +利率 + 取款金額 +身份證號數(shù)據(jù)名字：存款單數(shù)據(jù)目的：存款信息表數(shù)據(jù)組成：姓名+到期時間 +存入類型 +存入時間 +利率 +存入金額 +身份證號三、系統(tǒng)總體設(shè)計3.1 系統(tǒng)總體設(shè)計思路銀行儲蓄系統(tǒng)的主要功能實現(xiàn)儲戶開戶登記、辦理定期存款帳、 辦理定期取款手續(xù)、辦理活期存款帳、辦理活期取款手續(xù)、實現(xiàn)利息計算等

9、。每個功能模塊都和銀行的業(yè)務(wù)量直接有關(guān)，采用銀行儲蓄系統(tǒng)的目的是提高儲蓄服務(wù)的質(zhì)量，提高信息管理的精度， 進而提高銀行在客戶心目中的信譽，樹立良好的銀行服務(wù)形象。各子功能分析如下：儲蓄項目管理功能該功能實現(xiàn)了銀行管理人員對銀行內(nèi)部制定和調(diào)整儲蓄項目信息的管理。包括對儲蓄項目增加、修改、刪除、查詢等等。儲戶信息管理功能該功能實現(xiàn)了對銀行信息的管理，該功能包括開戶、銷戶等等。儲戶服務(wù)管理功能5精品 料推薦該功能實現(xiàn)了對儲戶服務(wù)的具體化，也是儲戶需求量最大的服務(wù)項目。主要包括存款、取款和轉(zhuǎn)賬以及修改密碼和查詢余額等功能。操作人員管理功能該功能主要是系統(tǒng)管理人員對操作人員的管理。包括添加操作人員、 刪

10、除操作人員、修改用戶名或密碼等功能。系統(tǒng)維護功能該功能主要是對該系統(tǒng)的維護。包括關(guān)于和退出系統(tǒng)兩項內(nèi)容。由于業(yè)務(wù)員的操作與用戶的操作基本相似，可以簡單化地認為系統(tǒng)只與業(yè)務(wù)員交互，基于這個思想，將有利與簡化以后系統(tǒng)程序的設(shè)計與開發(fā)。精化圖如下銀行存儲管理系統(tǒng)用戶操作業(yè)務(wù)員操作系統(tǒng)輸出開存取查戶款款詢計保 存更打算新 用新印利戶 信用存密碼驗證息息戶單信息提提提提交交交交用存取打用戶款款印戶申單單清查請單詢表表銀行儲蓄系統(tǒng)功能模塊圖6精品 料推薦3.2 概念模型設(shè)計3.2.1局部 e-r 圖根據(jù)數(shù)據(jù)項和數(shù)據(jù)結(jié)構(gòu)，可設(shè)計規(guī)劃出儲戶實體、管理員實體和系統(tǒng)實體的e-r 圖。其中，圖（ 1）所示為儲戶實體

11、 e-r 圖，圖（ 2）所示為管理員實體 e-r 圖，圖（ 3）所示為存款實體 e-r 圖，圖（ 4）所示為取款實體 e-r 圖，賬號身份證號姓名住址登錄密碼儲戶性別儲戶實體 e-r 圖（ 1）員工號管理員姓名管理員實體e-r 圖（ 2）金額存款類型到期日期賬號姓名存款日期存款存款實體 e-r 圖（ 3）7精品 料推薦金額賬號取款日期取款姓名取款實體e-r 圖(4)3.2.2全局 e-r 圖姓名登 錄 密碼1金額存款類型到期日期存款日期打印存員工號單金額存款類型到期日期存款日期1住址身份證號碼賬號性別儲戶1nnn金額存查取款詢款取款日期nnn管理員姓名打清單信息印nnn清單取款日期存查取款詢款

12、金額1111系統(tǒng)8精品 料推薦3.3邏輯結(jié)構(gòu)設(shè)計1儲戶（儲戶賬號、姓名、密碼、身份證號、性別、賬戶余額、開戶日期、住址）2管理員（員工號、姓名）3活期存取款（儲戶姓名、員工號、賬戶金額、存款類型、到期日期、存取款日期、利息）4查詢（儲戶姓名、員工號）5定期取款（儲戶姓名、賬號、金額、取款日期）6定期存款（儲戶姓名、賬號、金額、存款日期、存儲年數(shù)、利率）3.4 數(shù)據(jù)庫建立實施3.4.1建立數(shù)據(jù)庫數(shù)據(jù)庫在一個銀行儲蓄系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的好壞將直接對應(yīng)用系統(tǒng)的效率以及實現(xiàn)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計可以提高數(shù)據(jù)存儲的效率， 保證數(shù)據(jù)的完整性和一致性。 同時合理的數(shù)據(jù)庫也

13、將有利于程序的實現(xiàn)。本設(shè)計采用sql server2000 來建立數(shù)據(jù)庫。在創(chuàng)建數(shù)據(jù)庫時，首先啟動 microsoft sql server，然后創(chuàng)建名為 bankdb的數(shù)據(jù)庫。創(chuàng)建數(shù)據(jù)庫的具體步驟如下：（1）選擇“開始” / 程序 /microsoft sql server/企業(yè)管理器命令，打開sqlserver 數(shù)據(jù)庫的運行環(huán)境，在此環(huán)境中單擊“數(shù)據(jù)庫文件”右擊“新建數(shù)據(jù)庫”進行數(shù)據(jù)庫的創(chuàng)建，建立數(shù)據(jù)庫如圖所示：9精品 料推薦創(chuàng)建數(shù)據(jù)庫3.4.2建立關(guān)系表在 bankdb數(shù)據(jù)庫單擊新建表，則可建立表。如圖所示：創(chuàng)建表設(shè)計表如圖所示：10精品 料推薦儲戶設(shè)計表（iuser ）活期存取設(shè)計表(

14、hqcq)定期取設(shè)計表（dqq）定期存設(shè)計表（dqc）11精品 料推薦權(quán)限設(shè)計表 (user_info)表中的內(nèi)容如圖所示：儲戶表（ iuser ）活期存取表 (hqcq)定期取表（ dqq）定期存表（ dqc ）權(quán)限表 (user_info)12精品 料推薦四、系統(tǒng)實現(xiàn)1、這是窗體登錄主界面，用戶登錄后可以保障數(shù)據(jù)的安全性，用戶登錄需要用戶名和密碼，保證輸入的正確。步驟一：首先輸入注冊的用戶名，再輸入正確的密碼。登錄界面如圖所示：登錄界面步驟二：點擊“登錄”按鈕進行登錄驗證，如果輸入的賬號信息正確，則會出現(xiàn)程序主界面， 表明成功登錄系統(tǒng)， 如果輸入的用戶名不存在或密碼錯誤，則會給出錯誤提示信

15、息。2、這是銀行管理員操作主界面， 主要有瀏覽儲戶信息、 添加儲戶信息（開戶）、刪除儲戶信息（銷戶）、修改密碼等操作。如圖所示：13精品 料推薦主界面3、當(dāng)對新用戶進行開戶時， 點擊主界面中的銀行信息管理，再點擊其下面的子模塊添加儲戶信息，輸入賬號、姓名、密碼、省份證號等，單擊“確定添加”按鈕則會提示添加成功。如圖所示:添加儲戶信息界面4、當(dāng)對用戶進行瀏覽時， 點擊主界面中的銀行信息管理，再點擊其下面的子14精品 料推薦模塊瀏覽儲戶信息，可顯示賬號、姓名、密碼、省份證號、余額等儲戶信息，單擊“首記錄”“上一記錄”“下一記錄”“末記錄”按鈕，則可對不同的儲戶進行查看信息并且會出現(xiàn)提示信息，是最后

16、一條記錄，還是首記錄。如圖所示:瀏覽儲戶信息界面5、當(dāng)修改密碼時，點擊主界面中的銀行信息管理，再點擊其下面的子模塊修改密碼信息，可進行密碼修改，首先顯示原密碼，點擊“確定”按鈕，其次顯示新密碼，并輸入確認密碼，最后點擊“確定”按鈕，則可完成密碼修改。如圖所示15精品 料推薦原密碼新密碼6、當(dāng)刪除儲戶信息時，點擊主界面中的銀行信息管理，再點擊其下面的子模塊刪除儲戶信息，可對儲戶進行刪除，即銷戶，其下面又分為兩個子模塊，一是按16精品 料推薦姓名刪除，二是按卡號刪除，二者結(jié)果一樣，即達到了刪除儲戶信息的目的。如圖所示：按姓名刪除界面按卡號刪除界面17精品 料推薦五、系統(tǒng)評價本系統(tǒng)是關(guān)于 c/s 模

17、式的設(shè)計，由于這次的銀行儲蓄系統(tǒng)個人能力有限我沒有完全滿足老師的要求，但是我所做出的模塊和功能基本上都能實現(xiàn)。1當(dāng)操作員輸入正確的用戶名和密碼時，便可登錄到主界面，對儲戶進行一系列的管理及操作。2對本系統(tǒng)存在的缺點 :（ 1）部分數(shù)據(jù)通過實際觀察假設(shè)得來，沒有確鑿的文獻作為依據(jù)。（ 2）考慮的因素不是十分充分，與實際情況存在一定差距。（ 3）模型中未充分考慮具體的人流到達隨機性，而是用計算整體平均討論。（ 4）所設(shè)計的界面沒有進行美工設(shè)計。3. 對本銀行儲蓄系統(tǒng)的建議：（ 1）實行服務(wù)臺彈性數(shù)量制度，通過模型的改進二得出在周六與周日客流量比較少的情況下可減少窗口的開放，開設(shè)三個窗口即可，在一天

18、的各個時段也可彈性改變窗口的數(shù)量。（ 2）細分顧客，設(shè)置不同的服務(wù)柜面。（ 3）可采用排隊與叫號混合使用，在周一到周五客流量比較多時為提高顧客滿意度可采用排隊叫號系統(tǒng)，在周六周日客流量比較少時考慮飛號現(xiàn)象可采用排隊系統(tǒng)。（ 4）在顧客等待服務(wù)時間，服務(wù)人員可為顧客完成一些輔助性的工作。18精品 料推薦六、課程設(shè)計心得、總結(jié)通過這次的數(shù)據(jù)庫設(shè)計，我總結(jié)了很多，同時也學(xué)到了很多有關(guān)數(shù)據(jù)庫的知識，因為這是我的一次親身嘗試并且是一次真真正正的設(shè)計有關(guān)數(shù)據(jù)庫的進步，之前雖然學(xué)過數(shù)據(jù)庫但只是一些簡單的 sql語句，并沒有真正地去完成一次有關(guān)和前臺的連接設(shè)計， 之前所學(xué)的遠遠不夠這次設(shè)計需要， 但我并沒有灰

19、心， 雖然過程很艱難， 但我還是堅持了下來并沒有放棄， 通過不斷地努力， 在圖書館里借閱有關(guān)書籍，因為在這次設(shè)計之前我對 vb不是很了解，需要老師和同學(xué)的幫助，慢慢的對 vb有了一定了解，對銀行儲蓄系統(tǒng)所需主要功能有了一定的了解，從學(xué) vb6.0 的基礎(chǔ)開始，如何創(chuàng)建工程、窗體、模塊，如何添加標簽、文本框、按鈕等，以及它們發(fā)生什么事件及其如何響應(yīng)事件， 再次主要是如何將前臺和后臺數(shù)據(jù)庫 sqlserver2000 綁定，如何配置數(shù)據(jù)源，如何在 vb里添加使用 ado數(shù)據(jù)控件連接數(shù)據(jù)庫等等， 這些都是我一開始設(shè)計出現(xiàn)的主要問題， 我就不斷地查閱資料和網(wǎng)上搜索， 真的是功夫不負有心人， 出現(xiàn)的問題

20、逐個地被解決， 每解決好一個問題都會很興奮，而且也學(xué)到很多。在這段時間里，我對 vb從不知到最后做出個小系統(tǒng)， 深深體會到，沒有你做不到的， 只有你想不到的， 只要你不放棄，認真的去對待， 就會得到你想要的結(jié)果， 雖然這次的設(shè)計沒能完全達到老師的要求，只是完成了一部分的功能模塊， 但我確實通過自己查閱資料， 解決問題的能力得到了很大的提高，對系統(tǒng)的設(shè)計有了新的認識，最后，通過這次的設(shè)計，我已掌握了系統(tǒng)的設(shè)計流程， 同時也掌握了一些相關(guān)技術(shù)， 增強了動手能力并積累了一定的經(jīng)驗，從而為以后的工作奠定了基礎(chǔ)。19精品 料推薦參考文獻：1 曾長軍、朱劍峰sqlserver 數(shù)據(jù)庫原理及應(yīng)用 北京 :

21、人民郵電出版社 ,20072 楊繼平、吳華 sql server2000 北京：清華大學(xué)出版社， 20003 劉韜 visual basic6.0 數(shù)據(jù)庫系統(tǒng)開發(fā)實例北京：人民郵電出版社， 20024 劉耀儒新概念 sql server2000 教程北京：科海集團公司， 20015 王立豐 visual basic 中標項目案例導(dǎo)航北京：科學(xué)出版社， 20036 姚蔚 visualbasic 數(shù)據(jù)庫開發(fā)及工程實例北京：人民郵電出版社，200320精品 料推薦致謝通過這次的數(shù)據(jù)庫設(shè)計，我學(xué)到了很多，不僅是知識上的獲得同時也得到了精神上的支持， 很感謝彭老師給我們這次實際動手操作的機會，讓我們?nèi)ンw

22、驗一下做設(shè)計所出現(xiàn)的種種問題，讓我學(xué)到了不少經(jīng)驗， 對數(shù)據(jù)庫這門課有了進一步的加深和學(xué)習(xí)。還有雖然我的同學(xué)也不是很了解vb但我一提出問題她們都會在百忙中抽出時間幫我去想， 去網(wǎng)上找資料，真的很感謝她們， 由于時間特緊張，我只能在晚上去做設(shè)計， 一做就是一兩點， 我也給我的室友們帶來了不便，但她們很能體諒我，給我創(chuàng)造條件去學(xué)習(xí)，而且還督促我、問我做到哪一個環(huán)節(jié)了，實現(xiàn)了沒有啊等等， 也給我?guī)砹瞬簧俚挠職猓?讓我更加堅信地去做下去， 最后終于做完后，讓她們看看我的成果，感覺很好，沒有白費，如果沒有她們做堅強后盾，我也不會完成的那么快， 在這里我忠誠的對彭老師和幫助我的同學(xué)說聲謝謝！21精品 料推

23、薦附錄vb6.0 連數(shù)據(jù)庫1. 使用 ado(activex data object)數(shù)據(jù)控件連接sql server 數(shù)據(jù)庫連接方式在連接數(shù)據(jù)庫前，首先要在visual basic 6.0菜單中 “工程 ” 引“用 ”中選擇microsoft activex data objects 2.8 library和 microsoft activex data objectsrecordset 2.8 library這兩個組件。2.通過配置 odbc 環(huán)境，進行數(shù)據(jù)源的注冊，對數(shù)據(jù)庫進行連接、訪問和操作。2.1 odbc 數(shù)據(jù)源分為以下三類：（ 1）用戶 dsn ：只有創(chuàng)建數(shù)據(jù)源的用戶才可以使用他

24、們自己創(chuàng)建的數(shù)據(jù)源，而且只能在當(dāng)前的計算機上使用。（ 2）系統(tǒng) dsn ：任何使用你的計算機的用戶和程序都可以使用的dsn 。（ 3）文件 dsn ：除了具有系統(tǒng) dsn 的功能之外，還能被其它用戶在其它計算機上使用。2.2 創(chuàng)建 odbc 數(shù)據(jù)源的步驟（ 1 打開開始 /設(shè)置 /控制面板 /管理工具 /odbc 數(shù)據(jù)源。（ 2 雙擊 odbc 圖標，啟動 odbc 數(shù)據(jù)源。（ 3 換到 “用戶 dsn”標簽，單擊 “添加 ”。選擇 sqlserver 作為數(shù)據(jù)源的驅(qū)動程序。（ 4 為數(shù)據(jù)源命名 bankdb ，按提示操作即可創(chuàng)建 odbc 數(shù)據(jù)源。2.3 創(chuàng)建數(shù)據(jù)庫連接創(chuàng)建數(shù)據(jù)源是進行有源數(shù)

25、據(jù)庫連接的第一步，下面同樣是運用ado 對象模型的主要元素 connection （連接）進行源數(shù)據(jù)庫連接。connectionstring是 connection 對象的屬性名稱，提供數(shù)據(jù)提供者或服務(wù)提供者打開到數(shù)據(jù)源的連接所需要的特定信息，包括database 、diver 、dsn 等。（ 1） database ：字符串表達式，指定服務(wù)器上的數(shù)據(jù)庫名稱。（ 2） diver: 字符串表達式，指定驅(qū)動程序（ 3） server: 指定服務(wù)器名稱。（ 4） dsn ：字符串表達式，指定連接的 odbc 數(shù)據(jù)源名稱。利用已配置好的 odbc 數(shù)據(jù)源進行連接。22精品 料推薦創(chuàng)建 odbc 數(shù)

26、據(jù)源名稱為 bankdb ，通過 ado 與數(shù)據(jù)庫 student 進行連接，代碼如下：public user_id as stringpublic function chaxun(sqlstr as string) as adodb.recordset dim cn as new adodb.connectiondim cn_str as stringcn_str = diver=sql server;server=.;dsn=bankdb; database=bankdbcn.open cn_strdim rs as new adodb.recordsetrs.open sqlstr, c

27、n, adopendynamic, adlockoptimisticset chaxun = rsend function2.4 登錄代碼如下 ;private sub command1_click()dim rst as new adodb.recordsetdim str as stringstr = select * from user_info where user_id= + text1.text + set rst = chaxun(str)if not rst.eof thenif trim(rst.fields(1) = text2.text thenuser_id = tex

28、t1.textmain.showme.hideelsemsgbox 密碼錯誤！ , vbokonly + vbexclamationend ifelsemsgbox 賬戶名錯誤！ , vbokonly + vbexclamationend if23精品 料推薦end sub2.5 主界面代碼如下：private sub 按卡號刪除 _click()scch.showscch.label2.caption = 卡號 end subprivate sub 按姓名刪除 _click()scch.showscch.label2.caption = 姓名 end subprivate sub 瀏覽儲戶信

29、息 _click()llch.showend subprivate sub 添加儲戶信息 _click()tjch.showend subprivate sub 修改個人密碼 _click()xgmm.showend sub2.6 添加儲戶代碼如下：private sub command1_click()dim rst as new adodb.recordsetdim str as stringstr = select * from iuserset rst = chaxun(str)rst.addnewrst.fields(0) = text1.textrst.fields(1) = te

30、xt2.textrst.fields(2) = text3.textrst.fields(3) = text4.text24精品 料推薦rst.fields(4) = text5.textrst.fields(5) = text6.textrst.updatemsgbox 添加成功！ , vbokonly + vbexclamationend sub2.6 瀏覽儲戶信息代碼 :dim rst as new adodb.recordsetprivate sub command1_click()rst.movefirstdisplayend subprivate sub command2_clic

31、k()rst.movepreviousif rst.bof thenmsgbox 已經(jīng)是第一條記錄了！ , vbokonly + vbexclamationrst.movefirstend ifdisplayend subprivate sub command3_click()rst.movenextif rst.eof thenmsgbox 已經(jīng)是最后一條記錄了！, vbokonly + vbexclamationrst.movelastend ifdisplayend subprivate sub command4_click()rst.movelastdisplay25精品 料推薦end

32、 subprivate sub form_load()dim str as stringstr = select*from iuserset rst = chaxun(str)displayend subprivate sub display()text1.text = rst.fields(0)text2.text = rst.fields(1)text3.text = rst.fields(2)text4.text = rst.fields(3)text5.text = rst.fields(4)text6.text = rst.fields(5)end sub2.7 刪除儲戶信息代碼如下

33、 :dim rs as new adodb.recordsetdim str as stringif label2.caption = 姓名 thenstr = select*from iuser where cname= + text1.text + elsestr = select * from iuser where cno= + text1.text + end ifset rs = chaxun(str)if rs.eof thenmsgbox 沒有要刪除的信息！ , vbokonly + vbexclamation elsewhile not rs.eofrs.deleters.m

34、ovenext26精品 料推薦wendmsgbox 刪除成功！ , vbokonly + vbexclamationend ifend subprivate sub command2_click()unload meend subprivate sub form_load()end sub2.8 修改儲戶密碼代碼如下 :dim rs as new adodb.recordsetprivate sub command1_click()dim str as stringstr = select * from user_info where user_id= + text1.text + set rs = chaxun(str)if trim(rs.fields(1) = text1.text thenlabel2.visible = falselabel3.visible = truelabel4.visible = truetext1.visible = falsetext2.visible = truetext3.visible = truecommand1.visible = falsecomma