ASPNET學(xué)生貸款管理系統(tǒng)的設(shè)計(jì)

1、摘要 管理信息系統(tǒng)（Management Information System，簡(jiǎn)稱(chēng) MIS）是一個(gè)以人為主導(dǎo)， 利用計(jì)算機(jī)硬件、軟件、網(wǎng)絡(luò)通信設(shè)備以及其他辦公設(shè)備，進(jìn)行信息的收集、傳輸、 加工、儲(chǔ)存、更新和維護(hù)，以企業(yè)戰(zhàn)略競(jìng)優(yōu)、提高效益和效率為目的，支持企業(yè)的 高層決策、中層控制、基層運(yùn)作的集成化的人機(jī)系統(tǒng)。 學(xué)生貸款管理系統(tǒng)的設(shè)計(jì)，對(duì)數(shù)據(jù)和信息進(jìn)行規(guī)范化處理，從而實(shí)現(xiàn)信息資源 的有效利用和學(xué)校內(nèi)部的信息共享，實(shí)現(xiàn)網(wǎng)絡(luò)化管理和電子管理，實(shí)現(xiàn)一個(gè)小型的 貸款管理系統(tǒng)。本文從理論和實(shí)踐兩方面出發(fā)，對(duì)學(xué)生貸款進(jìn)行了全面的探討。論 文首先系統(tǒng)而又比較全面地聯(lián)系當(dāng)今計(jì)算機(jī)技術(shù)的發(fā)展及銀行學(xué)生貸款的實(shí)際

2、情況， 闡述了管理信息系統(tǒng)的模式，尤其是對(duì)學(xué)生貸款管理系統(tǒng)模式進(jìn)行了深入研究，提 出了學(xué)生貸款管理系統(tǒng)的發(fā)展目標(biāo)和框架。接著就構(gòu)建一個(gè)基于 B/S 架構(gòu)的應(yīng)用系 統(tǒng)學(xué)生貸款管理系統(tǒng)，并使用 Visual Studio 2005 進(jìn)行開(kāi)發(fā)。按照軟件工程的要 求，對(duì)系統(tǒng)進(jìn)行需求分析，總體設(shè)計(jì)，詳細(xì)設(shè)計(jì)，編碼與測(cè)試，在此基礎(chǔ)上將理論 知識(shí)與開(kāi)發(fā)技術(shù)運(yùn)用到系統(tǒng)的實(shí)現(xiàn)過(guò)程當(dāng)中，完成了學(xué)生貸款系統(tǒng)平臺(tái)的構(gòu)建。 關(guān)鍵詞：銀行；學(xué)生貸款；ASP.NET；管理信息系統(tǒng) Abstract The Management Information System (Management Information Syste

3、m is called MIS) is by the artificial leadership, using the computer hardware, the software, the network service equipment as well as other office equipment, carrying on the information collection, the transmission, the processing, the storage, the renewal and the maintenance, to enterprise strategi

4、c competition optimal, and raises the benefit and the efficiency as the goal, supporting enterprises high-level decision-making, the intermediate deck control, the basic unit operation of integrated human-machine System. The student loan management system for the design of data and information, stan

5、dardized treatment, so as to achieve the information the effective utilization of resources and sharing information, the internal school network management is realized and electronic management, implement a small loan management system. Based on the theory and practice of two aspects, the paper disc

6、ussed comprehensively to student loans. It firstly system and quite comprehensively contact current computer technology and the development of bank student loans, expounds the actual situation of the management information system model, especially for student loans management system model is studied

7、, the student loan management system proposed the development goals and framework. Then build a based on B/S structure application system - student loan management system, and using Visual Studio 2005 in development. According to the software engineering requirements, the requirement analysis, overa

8、ll design, detailed design, code, and test, based on this theory knowledge and developing technology will apply to system realization process, completed the student loan system platform building. Keywords: Bank; The student loans; ASP.NET; Management information system 目 錄 第 1 章 緒論.1 1.1 課題研發(fā)的目的與意義

9、.1 1.2 課題研發(fā)的背景 .1 1.3 可行性分析 .1 第 2 章 系統(tǒng)需求分析.2 2.1 用戶(hù)功能需求分析 .2 2.2 系統(tǒng)性能要求 .2 2.3 業(yè)務(wù)流程分析 .2 第 3 章 系統(tǒng)總體設(shè)計(jì).4 3.1 系統(tǒng)功能模塊分析 .4 3.1.1 后臺(tái)管理 .4 3.1.2 學(xué)生信息管理管理 .4 3.1.3 學(xué)生貸款管理 .4 3.2 實(shí)體聯(lián)系圖 .4 3.3 系統(tǒng)總體設(shè)計(jì) .6 第 4 章 系統(tǒng)詳細(xì)設(shè)計(jì).8 4.1 開(kāi)發(fā)工具簡(jiǎn)介 .8 4.2 數(shù)據(jù)庫(kù)設(shè)計(jì) .8 4.3 用戶(hù)界面設(shè)計(jì) .10 4.3.1 登錄界面 .10 4.3.2 系統(tǒng)管理界面 .11 4.3.3 學(xué)生信息管理界面

10、.13 4.3.4 學(xué)生貸款管理界面 .16 第 5 章 軟件測(cè)試和調(diào)試.24 5.1 黑盒測(cè)試法 .24 第 6 章 結(jié)論.26 參考文獻(xiàn).27 致 謝.28 第 1 章 緒論 1.1 課題研發(fā)的目的與意義 隨著國(guó)家綜合實(shí)力的增強(qiáng)，對(duì)整體的國(guó)民素質(zhì)的要求也就越來(lái)越高，而首先要做的 就是對(duì)教育事業(yè)的投入。自從國(guó)家開(kāi)放“綠色通道”以來(lái)，助學(xué)貸款在高校中已成為重 要的一部分，為許多無(wú)力負(fù)擔(dān)高額費(fèi)用的家庭提供了很大的幫助。隨著貸款金額和數(shù)量 的增多，如何能找到一個(gè)方便查詢(xún)，統(tǒng)計(jì)，存儲(chǔ)量大等功能的管理系統(tǒng)是首要的問(wèn)題。 高校中大多數(shù)助學(xué)管理中心的管理員和統(tǒng)計(jì)人員主要使用傳統(tǒng)的手工記賬工具，雖然運(yùn) 用計(jì)

11、算器等輔助工具進(jìn)行計(jì)算、統(tǒng)計(jì)、制作報(bào)表，但采用這種工作方式工作量大、效率 低、易出錯(cuò)、準(zhǔn)確性差、及時(shí)性差，而且有很多報(bào)表需要存檔，查找繁瑣。同時(shí)，這種 方式提供的信息量不夠大，且比較單一，不能滿(mǎn)足現(xiàn)代管理工作對(duì)大量數(shù)據(jù)和信息進(jìn)行 分析的需求。 1.2 課題研發(fā)的背景 1997 年，中國(guó)高等教育成功實(shí)現(xiàn)從免費(fèi)教育向成本補(bǔ)償制度的過(guò)渡。在高等教育規(guī) 模的迅速擴(kuò)大和公共財(cái)政預(yù)算約束的條件下，加大高等教育成本補(bǔ)償力度，有利于在較 大程度上緩和日益緊縮的高等教育財(cái)政和經(jīng)費(fèi)供求矛盾，從而滿(mǎn)足居民對(duì)高等教育的旺 盛需求，但另一方面，迅速提高的學(xué)費(fèi)水平，已經(jīng)嚴(yán)重影響低收入家庭接受高等教育的 機(jī)會(huì)和積極性，成為

12、影響社會(huì)不穩(wěn)定的重要潛在因素。因此，必須建立一套適當(dāng)?shù)膶W(xué)生 資助機(jī)制幫助困難學(xué)生順利的完成學(xué)業(yè)，以保證教育機(jī)會(huì)的公平和效率，助學(xué)貸款政策 應(yīng)運(yùn)而生。 1.3 可行性分析 本系統(tǒng)在上述背景下，建立一個(gè)針對(duì)學(xué)生助學(xué)貸款的小型網(wǎng)絡(luò)平臺(tái)，本系統(tǒng)具有速 度快、精度高、存儲(chǔ)信息量大的特點(diǎn)，能夠提高工作人員的工作效率，降低學(xué)校成本和 管理費(fèi)用，使管理人員從大量的繁瑣的手工勞動(dòng)中解脫出來(lái)。還可以對(duì)數(shù)據(jù)和信息進(jìn)行 規(guī)范化處理，從而實(shí)現(xiàn)了信息資源的有效利用和學(xué)校內(nèi)部數(shù)據(jù)信息的共享，實(shí)現(xiàn)網(wǎng)絡(luò)化 管理和電子管理。 該系統(tǒng)采用 VS2005 軟件作為工具進(jìn)行系統(tǒng)開(kāi)發(fā),VS2005 工具軟件以其功能強(qiáng)大、使 用靈活的數(shù)據(jù)

13、窗口，在數(shù)據(jù)庫(kù)應(yīng)用程序開(kāi)發(fā)領(lǐng)域占據(jù)了優(yōu)勢(shì)地位，這些特點(diǎn)為開(kāi)發(fā)功能 全面的應(yīng)用程序創(chuàng)造了良好的條件，因此利用它作為開(kāi)發(fā)學(xué)生貸款管理系統(tǒng)的工具是完 全可行的。 第 2 章 系統(tǒng)需求分析 2.1 用戶(hù)功能需求分析 開(kāi)發(fā)該系統(tǒng)時(shí)，首先需要了解用戶(hù)的各個(gè)方面的需求，以及將來(lái)可能的需求，通過(guò) 對(duì)中國(guó)家助學(xué)貸款政策特征分析，中國(guó)助學(xué)貸款問(wèn)題的了解，以及助學(xué)貸款的未來(lái)，還 有所亟待解決的問(wèn)題。調(diào)查結(jié)果如下： 員工：不僅可以修改個(gè)人密碼，還能進(jìn)行學(xué)生信息管理和學(xué)生貸款管理。 管理員：擁有一般員工的所有權(quán)限；可以對(duì)員工權(quán)限進(jìn)行管理等；可以使用系統(tǒng)的 一切功能；并且應(yīng)該能夠保證系統(tǒng)的安全性； 2.2 系統(tǒng)性能要求

14、1.安全性 該系統(tǒng)的安全性主要是防止他人非法進(jìn)入系統(tǒng)，從而保證了數(shù)據(jù)的安全性，數(shù)據(jù)存 儲(chǔ)的完整性和數(shù)據(jù)的可靠性。設(shè)置三種不同的身份進(jìn)行登錄，即員工和普通用戶(hù)；該系 統(tǒng)采用 Access 作為數(shù)據(jù)庫(kù)平臺(tái)，既可以被應(yīng)用程序訪(fǎng)問(wèn)，又可在后臺(tái)操作，完成對(duì)數(shù)據(jù) 的整理等。Access 在本質(zhì)上是一個(gè)關(guān)系型數(shù)據(jù)庫(kù)管理系統(tǒng)，關(guān)系型數(shù)據(jù)庫(kù)有著嚴(yán)密的數(shù) 學(xué)理論基礎(chǔ)。 在 Access 數(shù)據(jù)庫(kù)中，數(shù)據(jù)的邏輯結(jié)構(gòu)表現(xiàn)為滿(mǎn)足一定條件的二維表，以統(tǒng)一的“關(guān) 系”來(lái)描述數(shù)據(jù)對(duì)象之間的聯(lián)系，結(jié)構(gòu)簡(jiǎn)單、表現(xiàn)力強(qiáng)，符合人們對(duì)現(xiàn)實(shí)世界事物的認(rèn) 識(shí)規(guī)律。Access 有以下一些特點(diǎn)： 簡(jiǎn)單的用戶(hù)界面 方便的操作手段 豐富的數(shù)據(jù)對(duì)象

15、 精美的窗體和報(bào)表 強(qiáng)大的數(shù)據(jù)共享 耐心的 office 助手 2.方便性 本系統(tǒng)的界面友好,操作方便，能夠達(dá)到所見(jiàn)即所得的效果,方便用戶(hù)的使用。 2.3 業(yè)務(wù)流程分析 依據(jù)系統(tǒng)的需求分析，得到系統(tǒng)的流程圖如圖 2-1 所示： 修 改 學(xué) 生 信 息 錄 入 貸 款 學(xué) 生 信 息 錄 入 貸 款 基 本 信 息 貸 款 信 息 查 詢(xún) 修 改 貸 款 信 息 管理員 登錄 后臺(tái)管理 權(quán)限管理 員工 學(xué)生 信息 表 貨款 信息 表 貸 款 信 息 排 行 密碼修改 管理 人員 表 查 詢(xún) 學(xué) 生 信 息 查 看 過(guò) 往 貸 款 過(guò)往 貸款 表 還 款 圖圖 2-12-1 系統(tǒng)流程圖系統(tǒng)流程圖

16、第 3 章 系統(tǒng)總體設(shè)計(jì) 通過(guò)使用學(xué)生貸款管理系統(tǒng)，使學(xué)生貸款管理工作系統(tǒng)化、規(guī)范化、自動(dòng)化，從而 達(dá)到提高學(xué)生貸款管理效率的目的。 系統(tǒng)開(kāi)發(fā)的總體任務(wù)是使學(xué)校助學(xué)貸款管理人員可以輕松快捷地完成學(xué)生貸款的管 理任務(wù)。 3.1 系統(tǒng)功能模塊分析 本系統(tǒng)分為 3 大功能模塊，包括后臺(tái)管理、學(xué)生信息管理和學(xué)生貸款管理模塊。 3.1.1 后臺(tái)管理 對(duì)用戶(hù)信息進(jìn)行管理維護(hù)；更改用戶(hù)密碼和權(quán)限；登錄時(shí)判斷用戶(hù)密碼是否正確， 每個(gè)用戶(hù)按照不同的級(jí)別享有不同的權(quán)限。 3.1.2 學(xué)生信息管理管理 對(duì)學(xué)生信息進(jìn)行管理維護(hù)；學(xué)生信息的錄入、查詢(xún)和修改； 3.1.3 學(xué)生貸款管理 可以進(jìn)行貸款信息錄入、修改和查詢(xún)，

17、也可以進(jìn)行還款處理和查看過(guò)往貸款 3.2 實(shí)體聯(lián)系圖 通過(guò)需求分析，現(xiàn)定義以下每個(gè)實(shí)體的屬性： 學(xué)生信息表（ID，學(xué)號(hào)，姓名，入學(xué)年月，身份證號(hào)，性別，出生年月，省市，地 縣，郵編，家庭電話(huà)，寢室電話(huà)，移動(dòng)電話(huà)，系，專(zhuān)業(yè)，班級(jí)，獎(jiǎng)懲情況，備注信息） 管理人員（ID，用戶(hù)名，密碼，權(quán)限） 貸款信息（學(xué)號(hào)，貸款編號(hào)，貸款金額，貸款銀行，銀行賬號(hào)，應(yīng)還款日期，利率， 備注信息） 過(guò)往貸款（貸款編號(hào)，學(xué)號(hào)，貸款銀行，銀行賬號(hào)，貸款賬號(hào)，貸款日期，還款記 錄） 1. 學(xué)生信息實(shí)體屬性圖如圖 3-1 所示： 。 。 。 。 。 。 。 。 ID學(xué)號(hào)姓名備注 信息 學(xué)生實(shí)體 圖圖 3-13-1 學(xué)生信息實(shí)體

18、屬性圖學(xué)生信息實(shí)體屬性圖 2. 管理人員信息實(shí)體屬性圖如圖 3-2 所示： 管理人員實(shí)體 ID 用戶(hù)名 密碼權(quán)限 圖圖 3-23-2 管理人員信息實(shí)體屬性圖管理人員信息實(shí)體屬性圖 3. 貸款信息實(shí)體屬性圖如圖 3-3 所示： 貸款實(shí)體 學(xué)號(hào)貸款編號(hào)貸款金額。 。 。 。 。 。 圖圖 3-33-3 貸款信息實(shí)體屬性圖貸款信息實(shí)體屬性圖 4. 過(guò)往貸款信息實(shí)體屬性圖如圖 3-4 所示： 過(guò)往貸款實(shí)體 貸款編號(hào)學(xué)號(hào)貸款銀行還款記錄。 。 。 。 。 。 圖圖 3-43-4 過(guò)往貸款信息實(shí)體屬性圖過(guò)往貸款信息實(shí)體屬性圖 實(shí)體之間關(guān)系的 E-R 圖如圖 3-5 所示： 學(xué)生 學(xué)院班級(jí) 貸款記錄 擁有

19、屬于 屬于 1n n 1 1 n 圖圖 3-53-5 總的實(shí)體聯(lián)系圖總的實(shí)體聯(lián)系圖 3.3 系統(tǒng)總體設(shè)計(jì) 系統(tǒng)設(shè)置了兩種身份的登錄，包括管理員和普通員工。其中管理員和普通員工需依 靠用戶(hù)名和密碼登錄。以管理員的身份登錄，可以操作數(shù)據(jù)庫(kù)中所有的功能模塊，而以 員工身份登錄只是在此功能上對(duì)一些模塊給予限制而已。如圖 36 就是系統(tǒng)的總體結(jié)構(gòu) 框圖： 學(xué) 生 貸 款 管 理 系 統(tǒng) 系統(tǒng)管理 學(xué)生信息管理 學(xué)生貸款管理 用戶(hù)權(quán)限管理 用戶(hù)信息修改 學(xué)生信息錄入 學(xué)生信息查詢(xún) 學(xué)生信息修改 查看過(guò)往貸款 貸款信息錄入 貸款信息修改 貸款信息查詢(xún) 貸款信息排行 還 款 圖圖 3-63-6 系統(tǒng)總體結(jié)構(gòu)框

20、圖系統(tǒng)總體結(jié)構(gòu)框圖 第 4 章 系統(tǒng)詳細(xì)設(shè)計(jì) 4.1 開(kāi)發(fā)工具簡(jiǎn)介 VS2005 是由 Microsoft Visual Studio 微軟一個(gè)開(kāi)發(fā)平臺(tái)，Microsoft 正在解決日益增 加的應(yīng)用程序復(fù)雜性及其設(shè)計(jì)、開(kāi)發(fā)和部署所必需的生命周期問(wèn)題。而 Visual Studio 2005 擴(kuò)展了 Microsoft 的優(yōu)秀功能，即通過(guò)提供與業(yè)務(wù)緊密集成的、可擴(kuò)展的、能夠增 加成功幾率的生命周期工具，從而為用戶(hù)提供高效的工具。 對(duì)于使用 VS2005 的優(yōu)點(diǎn)有以下幾點(diǎn)： 1、對(duì) WEB 編程方面，取消了原 2003 中的項(xiàng)目的概念后使得將一個(gè) Web 應(yīng)用程序 移到別的地方要方便得多。 2、直

21、接支持用戶(hù)自定義的控件在引用頁(yè)中的設(shè)計(jì)時(shí)支持（可視化） 3、將驗(yàn)證控件進(jìn)行分組，這樣使得頁(yè)面驗(yàn)證更加方便。 4、用戶(hù)管理這一套比較好用，對(duì)于一個(gè)項(xiàng)目來(lái)說(shuō)這一部分可以少寫(xiě)不少的代碼。 5、針對(duì) aspx 頁(yè)面中的提示功能比 2003 中有了很大的變化。 6、直接支持 XHTML 7、去掉了 2003 中的給每個(gè)頁(yè)面的隱藏在后面的類(lèi)加了一個(gè)與當(dāng)前項(xiàng)目相關(guān)的命名 空間，而增加了一個(gè)全局的命名空間，這樣更加適合多個(gè)項(xiàng)目之間進(jìn)行共享。 8、將頁(yè)面編譯成單個(gè)的裝配件程序集，這樣也利于系統(tǒng)的啟動(dòng)、運(yùn)行速度。 9、修改了用戶(hù)自定義控件中的默認(rèn)的相對(duì)路徑模式，這個(gè)做省得在 2003 里面將路 徑弄亂了。 10、

22、MasterPage 作為整個(gè)站點(diǎn)的模板效果不錯(cuò)，省得在 2003 中定義一大堆的用戶(hù)控 件，然后每個(gè)頁(yè)面都放一個(gè)，修改一個(gè)風(fēng)格全部頁(yè)面都要做調(diào)整。 4.2 數(shù)據(jù)庫(kù)設(shè)計(jì) 數(shù)據(jù)庫(kù)在一個(gè)信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的好壞將直接 對(duì)應(yīng)用系統(tǒng)的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)可以提高數(shù)據(jù)存儲(chǔ) 的效率，保證數(shù)據(jù)的完整和一致。 本系統(tǒng)主要用到了以下 4 張表： 1.學(xué)生信息 表表 4-14-1 學(xué)生信息表學(xué)生信息表 2.貸款信息 表表 4-24-2 貸款信息表貸款信息表 3.管理人員信息 表表 4-34-3 管理人員信息表管理人員信息表 4.過(guò)往貸款信息 表表 4-44

23、-4 過(guò)往貸款信息表過(guò)往貸款信息表 4.3 用戶(hù)界面設(shè)計(jì) 4.3.1 登錄界面 1. 系統(tǒng)登錄界面 管理員和員工通過(guò)輸入用戶(hù)名和密碼進(jìn)行登錄，兩個(gè)文本框?yàn)楸靥铐?xiàng)，否則就 會(huì)提示錯(cuò)誤，而新員工可以通過(guò)注冊(cè)鏈接到注冊(cè)頁(yè)面。如圖 4-1 所示： 圖圖 4-14-1 登錄界面登錄界面 登錄 Click 事件主要代碼如下： Do While dr.Read() If Trim(dr.Item(用戶(hù)名) = Trim(TextBox1.Text) And Trim(dr.Item(密 碼) = Trim(TextBox2.Text)And Trim(dr.Item(權(quán)限) = 管理員 Then Respo

24、nse.Redirect(main.html) Else If Trim(dr.Item(用戶(hù)名) = Trim(TextBox1.Text) And Trim(dr.Item(密碼) = Trim(TextBox2.Text) And Trim(dr.Item(權(quán)限) = 員工 Then Response.Redirect(main1.html) Else Label3.Text = 不存在該用戶(hù)！ End If Loop 2. 系統(tǒng)主界面 管理員擁有最高權(quán)限，可以使用系統(tǒng)內(nèi)的所有功能；而一般員工操作受到相應(yīng)的限 制，即后臺(tái)控制中只能進(jìn)行密碼修改，不能進(jìn)行權(quán)限設(shè)置。如圖 4-2 所示： 圖圖

25、 4-24-2 系統(tǒng)主界面系統(tǒng)主界面 4.3.2 系統(tǒng)管理界面 1. 修改密碼 普通員工只能修改個(gè)人密碼，無(wú)法修改他人的密碼，確保其他員工信息安全。具體 實(shí)現(xiàn)如圖 4-3 所示： 圖圖 4-34-3 修改密碼界面修改密碼界面 “修改”按鈕 clicked 事件代碼如下: Do While dr.Read() If Trim(dr.Item(用戶(hù)名) = Trim(TextBox1.Text) And Trim(dr.Item(密碼) = Trim(TextBox2.Text) Then conn1.Open() cmd1.ExecuteNonQuery() conn1.Close() Labe

26、l5.Text = 修改成功！ Exit Do Else Label5.Text = 你輸入的原密碼不正確或不存在此用戶(hù)！ End If Loop 2.權(quán)限管理 通過(guò)使用 DataGrid 控件，綁定數(shù)據(jù)庫(kù)，并對(duì)數(shù)據(jù)進(jìn)行更新、刪除操作。如圖 4-4 所 示： 圖圖 4-44-4 權(quán)限管理界面權(quán)限管理界面 “更新”事件的主要代碼： str = update 管理人員 set 用戶(hù)名= & name.Text & ,密碼= & mima.Text & ,權(quán)限= & qx.Text & where ID=& DataGrid1.DataKeys(CInt(e.Item.ItemIndex) Dim

27、cmd As New OleDbCommand(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() DataGrid1.EditItemIndex = -1 4.3.3 學(xué)生信息管理界面 1. 學(xué)生信息錄入 管理員和普通員工都能進(jìn)行學(xué)生信息錄入工作，該功能的實(shí)現(xiàn)，需要鏈接學(xué)生信息 表，并對(duì)該表進(jìn)行插入操作，所有項(xiàng)為必填項(xiàng)，確保信息完整。如圖 4-5 所示： 圖圖 4-54-5 學(xué)生信息錄入界面學(xué)生信息錄入界面 “錄入”事件的主要代碼： str = insert into 學(xué)生信息表(學(xué)號(hào),姓名,身份證號(hào),出生年月,省市,地縣,備

28、注信息,寢室電話(huà),郵編,系,專(zhuān)業(yè),家庭電話(huà),移動(dòng)電話(huà),班級(jí),獎(jiǎng)懲情況,入學(xué)年月,性 別,畢業(yè)時(shí)間) values( & TextBox2.Text & , & TextBox3.Text & , & TextBox4.Text & ,# & CDate(DropDownList2.SelectedValue & - & DropDownList3.SelectedValue & - & DropDownList4.SelectedValue) & #, & DropDownList1.Text & , & TextBox8.Text & , & TextBox9.Text & , & Text

29、Box10.Text & , & TextBox11.Text & , & DropDownList6.SelectedValue & , & DropDownList7.SelectedValue & , & TextBox14.Text & , & TextBox15.Text & , & TextBox16.Text & , & TextBox17.Text & ,# & CDate(DropDownList8.SelectedValue & - & DropDownList9.SelectedValue & - & DropDownList10.SelectedValue) & #,

30、& DropDownList5.Text & ,# & CDate(DropDownList11.SelectedValue & - & DropDownList12.SelectedValue & - & DropDownList13.SelectedValue) & #) Dim cmd As New OleDbCommand(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() Label5.Text = 學(xué)生信息錄入成功！ 2. 學(xué)生信息修改 通過(guò)使用 DataGrid 控件，連接數(shù)據(jù)庫(kù)中的學(xué)生信息表，實(shí)現(xiàn)對(duì)數(shù)據(jù)的修改，還可

31、以 通過(guò)查詢(xún)按鈕來(lái)查找需要修改信息的學(xué)生。如圖 4-6 所示： 圖圖 4-64-6 修改學(xué)生信息界面修改學(xué)生信息界面 “修改”事件的主要代碼： a = Trim(Request.QueryString(學(xué)號(hào)) str = Update 學(xué)生信息表 set 學(xué)號(hào)= & TextBox2.Text & ,姓名= & TextBox3.Text & ,身份證號(hào)= & TextBox4.Text & ,出生年月= & CDate(TextBox5.Text) & ,省市= & TextBox7.Text & ,地縣= & TextBox8.Text & ,備注信息= & TextBox9.Text &

32、 ,寢室電話(huà)= & TextBox10.Text & ,郵編= & TextBox11.Text & ,系= & TextBox12.Text & ,專(zhuān)業(yè)= & TextBox13.Text & ,移動(dòng)電話(huà)= & TextBox15.Text & ,家庭電話(huà)= & TextBox14.Text & ,班級(jí)= & TextBox16.Text & ,獎(jiǎng)懲情況= & TextBox17.Text & ,入學(xué)年月= & CDate(TextBox18.Text) & ,性別= & TextBox19.Text & where 學(xué)號(hào)= & a & Dim cmd As New OleDbCommand

33、(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() 3. 學(xué)生信息查詢(xún) 查詢(xún)學(xué)生信息的方式分為【按姓名查詢(xún)】和 【按學(xué)號(hào)查詢(xún)】 （搜索系統(tǒng)支持模糊查 詢(xún)）最新登記學(xué)生列表，點(diǎn)擊詳細(xì)信息即可查看該學(xué)生的詳細(xì)資料，如圖 4-7 所示： 圖圖 4-74-7 學(xué)生信息查詢(xún)界面學(xué)生信息查詢(xún)界面 “查詢(xún)”事件的主要代碼： Dim cmd1 As New OleDbCommand(select 學(xué)號(hào),姓名,身份證號(hào),系,專(zhuān)業(yè),性 別,移動(dòng)電話(huà),寢室電話(huà) from 學(xué)生信息表 where 學(xué)號(hào)= + TextBox1.Text + , conn

34、) Dim cmd2 As New OleDbCommand(select 學(xué)號(hào),姓名,身份證號(hào),系,專(zhuān)業(yè), 性別,移動(dòng)電話(huà),寢室電話(huà) from 學(xué)生信息表 where 姓名= + TextBox1.Text + , conn) Dim adp1 As New OleDbDataAdapter(cmd1) Dim adp2 As New OleDbDataAdapter(cmd2) Dim ds As New DataSet If Label1.Text = 學(xué)號(hào) Then adp1.Fill(ds, 學(xué)生信息表) Else adp2.Fill(ds, 學(xué)生信息表) End If DataGr

35、id1.DataSource = ds.Tables(學(xué)生信息表).DefaultView DataGrid1.DataBind() 4.3.4 學(xué)生貸款管理界面 1. 還款 該功能的實(shí)現(xiàn)需要考慮三個(gè)數(shù)據(jù)表：貸款信息表、學(xué)生信息表和過(guò)往貸款表。通過(guò) 修改這些表的信息，實(shí)現(xiàn)還款。如圖 4-8 所示： 圖圖 4-84-8 學(xué)生還款界面學(xué)生還款界面 “還款”事件的主要代碼： Do While dr.Read() If Trim(TextBox1.Text) = Trim(dr.Item(學(xué)號(hào)) And Trim(TextBox2.Text) = Trim(dr.Item(貸款編號(hào)) Then d =

36、 dr.Item(貸款編號(hào)) b = dr.Item(貸款日期) c = dr.Item(應(yīng)還款日期) l = dr.Item(利率) a = dr.Item(貸款金額) q = dr.Item(備注信息) End If Loop Dim p As Integer If DateDiff(DateInterval.Day, b, Now() DateDiff(DateInterval.Day, b, c) Then p = DateDiff(DateInterval.Day, b, Now() * CInt(l) If Abs(CInt(a) + CInt(p) - CInt(TextBox3

37、.Text) = 0 Then Dim cmd1 As New OleDbCommand(delete from 貸款信息表 where 貸款編號(hào)= & CInt(d), conn) Dim cmd5 As New OleDbCommand(delete from 學(xué)生信息表 where 學(xué)號(hào)= & Trim(TextBox1.Text) & , conn) conn.Open() cmd1.ExecuteNonQuery() cmd5.ExecuteNonQuery() conn.Close() Else Dim str1 As String str1 = CStr(Abs(CInt(a)

38、+ CInt(p) - CInt(TextBox3.Text) Dim cmd2 As New OleDbCommand(update 貸款信息表 set 貸款金額= + str1 + ,實(shí)際還款日期=# & Now() & #,備注信息= & q & , & Now() & 還款 & TextBox3.Text & where 貸款編號(hào)= & CInt(d), conn) conn.Open() cmd2.ExecuteNonQuery() conn.Close() End If Else If Abs(CInt(a) - CInt(TextBox3.Text) = 0 Then Dim c

39、md4 As New OleDbCommand(delete from 貸款信息表 where 貸款編號(hào)= & CInt(d), conn) Dim cmd6 As New OleDbCommand(delete from 學(xué)生信息表 where 學(xué)號(hào)= & Trim(TextBox1.Text) & , conn) conn.Open() cmd4.ExecuteNonQuery() cmd6.ExecuteNonQuery() conn.Close() Else Dim cmd3 As New OleDbCommand(update 貸款信息表 set 貸款 金額= + CStr(Abs(

40、CInt(a) - CInt(TextBox3.Text) + ,實(shí) 際還款日期=# & Now() & #,備注信息= & q & , & Now() & 還款 & TextBox3.Text & where 貸款編號(hào)= & CInt(d), conn) conn.Open() cmd3.ExecuteNonQuery() conn.Close() End If End If Dim cmd7 As New OleDbCommand(update 過(guò)往貸款 set 還款記錄= & q & , & Now() & 還款 & TextBox3.Text & where 學(xué)號(hào)= & TextBox

41、1.Text & , conn) conn.Open() cmd7.ExecuteNonQuery() conn.Close() Label1.Visible = False Label2.Text = 操作已完成 2. 貸款信息錄入 通過(guò)訪(fǎng)問(wèn)貸款信息表和過(guò)往貸款表，對(duì)這兩個(gè)表進(jìn)行插入或更新操作，實(shí)現(xiàn)貸款信 息的錄入。如圖 4-9 所示： 圖圖 4-94-9 學(xué)生貸款錄入界面學(xué)生貸款錄入界面 “提交”事件的主要代碼： Do While dr.Read() If dr.Item(學(xué)號(hào)) = TextBox1.Text Then b = True End If Loop conn1.Close()

42、 If b = True Then If c = False Then str = insert into 貸款信息表 (學(xué)號(hào),貸款項(xiàng)目,貸款金額,貸款 銀行,銀行賬號(hào),貸款日期,應(yīng)還款日期,利率,備注信息) values( & TextBox1.Text & , & DropDownList1.SelectedValue & , & TextBox3.Text & , & DropDownList2.SelectedValue & , & TextBox5.Text & ,# & Now() & #, & s & , & TextBox9.Text & , & Now() & 貸款 & Te

43、xtBox3.Text & ) Dim cmd As New OleDbCommand(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() str = insert into 過(guò)往貸款 (學(xué)號(hào),貸款項(xiàng)目,貸款金額,貸款銀行, 銀行賬號(hào),貸款日期,還款記錄) values( & TextBox1.Text & , & DropDownList1.SelectedValue & , & TextBox3.Text & , & DropDownList2.SelectedValue & , & TextBox5.Text & ,# &

44、Now() & #, & Now() & 貸款 & TextBox3.Text & ) Dim cmd3 As New OleDbCommand(str, conn) conn.Open() cmd3.ExecuteNonQuery() conn.Close() Else Dim cmd As New OleDbCommand(update 貸款信息表 set 貸款金額= & CStr(CInt(a) + CInt(TextBox3.Text) & ,備注信息= & x & , & Now() & 貸款 & TextBox3.Text & where 學(xué)號(hào)= & TextBox1.Text &

45、 , conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() Dim cmd2 As New OleDbCommand(update 過(guò)往貸款 set 貸款金額= & CStr(CInt(a) + CInt(TextBox3.Text) & ,還款記錄= & x & , & Now() & 貸款 & TextBox3.Text & where 學(xué)號(hào)= & TextBox1.Text & , conn) conn.Open() cmd2.ExecuteNonQuery() conn.Close() End If 3. 貸款信息修改 通過(guò)訪(fǎng)問(wèn)貸款信

46、息表，使用 DataGrid 控件，對(duì)該表進(jìn)行修改操作，還可以使用查詢(xún) 按鈕來(lái)查找需要修改貸款信息的學(xué)生。如圖 4-10 所示： 圖圖 4-104-10 學(xué)生貸款信息修改界面學(xué)生貸款信息修改界面 “修改”事件的主要代碼： str = update 貸款信息表 set 學(xué)號(hào)= & TextBox1.Text & ,貸款項(xiàng)目= & TextBox2.Text & ,貸款金額= & TextBox3.Text & ,貸款銀行= & TextBox4.Text & ,銀行賬號(hào)= & TextBox5.Text & ,貸款日期= & CDate(TextBox6.Text) & ,應(yīng)還款日期= & CD

47、ate(TextBox7.Text) & ,利率= & TextBox8.Text & where 學(xué)號(hào)= & Request.QueryString(學(xué)號(hào)) & Dim cmd As New OleDbCommand(str, conn) conn.Open() cmd.ExecuteNonQuery() conn.Close() 4. 貸款信息查詢(xún) 查詢(xún)學(xué)生貸款信息的方式分為【按貸款編號(hào)查詢(xún)】 、 【按貸款時(shí)間查詢(xún)】和【按貸 款銀行查詢(xún)】 （搜索系統(tǒng)支持模糊查詢(xún)）最新登記學(xué)生貸款信息，點(diǎn)擊詳細(xì)信息即可查看 該學(xué)生的詳細(xì)資料，如圖 4-11 所示： 圖圖 4-114-11 學(xué)生貸款信息查詢(xún)界

48、面學(xué)生貸款信息查詢(xún)界面 “查詢(xún)”事件的主要代碼： str1 = select * from 貸款信息表 where 貸款編號(hào)= & TextBox1.Text str2 = select * from 貸款信息表 where 貸款日期=# + TextBox1.Text + # str3 = select * from 貸款信息表 where 貸款銀行= + TextBox1.Text + Dim cmd1 As New OleDbCommand(str1, conn) Dim cmd2 As New OleDbCommand(str2, conn) Dim cmd3 As New OleDb

49、Command(str3, conn) Dim adp1 As New OleDbDataAdapter(cmd1) Dim adp2 As New OleDbDataAdapter(cmd2) Dim adp3 As New OleDbDataAdapter(cmd3) Dim ds As New DataSet If Label1.Text = 貸款編號(hào) Then adp1.Fill(ds, 綜合) Else If Label1.Text = 貸款時(shí)間 Then adp2.Fill(ds, 綜合) Else adp3.Fill(ds, 綜合) End If DataGrid2.DataSo

50、urce = ds.Tables(綜合).DefaultView DataGrid2.DataBind() 5. 貸款信息排行 通過(guò)訪(fǎng)問(wèn)貸款信息表，使用 DataGrid 控件顯示數(shù)據(jù)，按貸款時(shí)間對(duì)數(shù)據(jù)進(jìn)行排列， 點(diǎn)擊詳細(xì)信息即可查看該學(xué)生貸款的詳細(xì)資料，如圖 4-12 所示： 圖圖 4-124-12 學(xué)生貸款信息排行界面學(xué)生貸款信息排行界面 6. 查看過(guò)往貸款 通過(guò)訪(fǎng)問(wèn)過(guò)往貸款表，使用 DataGrid 控件顯示數(shù)據(jù)，按貸款時(shí)間對(duì)數(shù)據(jù)進(jìn)行排列， 點(diǎn)擊查詢(xún)按鈕即可搜索到所查看學(xué)生的貸款信息，點(diǎn)擊詳細(xì)信息即可查看貸款詳細(xì)資料。 如圖 4-13 所示： 圖圖 4-134-13 查看過(guò)往貸款界面查看過(guò)往貸款界面 “查詢(xún)”事件的主要代碼： Dim cmd As New OleDbCommand(select * from 過(guò)往貸款 where 學(xué)號(hào)= & TextBox1.Text & , conn) Dim adp As New OleDbDataAdapter(cmd) Dim ds