無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 本文配套程序下載地址 ： 無憂無慮畢設(shè)網(wǎng) ()-大學(xué)生畢業(yè)設(shè)計(jì)站 ,免費(fèi)畢業(yè)設(shè)計(jì)論文 ,無憂無慮畢設(shè)網(wǎng) 大學(xué)生畢業(yè)設(shè)計(jì) ,出售各類畢業(yè)設(shè)計(jì)源碼 ,論文 ,程序源碼 ,網(wǎng)站源碼 ,免費(fèi)視頻教程 ,我們將竭誠為您服務(wù)！ 目錄 摘要 3 關(guān)鍵字 : 管理信息系統(tǒng)、教務(wù) 管理、 Visual Basic 應(yīng)用。 3 Abstract 4 Key words: 5 Management information system, educational administration management, Visual Basic application. 5 第一章 緒論 6 1.1. 選題的背景 6 1.2. 目的和意義 7 1.3. 系統(tǒng)完成和實(shí)現(xiàn)的工作 8 第二章 平臺簡介 9 2.1. Delphi 簡介 9 2.1.1. 數(shù)據(jù)庫訪問方法 10 2.1.2. 數(shù)據(jù)庫組件 11 2.2. 數(shù)據(jù)庫簡介 11 2.2.1. SQL 語言 11 2.2.2. 數(shù)據(jù)庫 15 2.3. 系統(tǒng)運(yùn)行環(huán)境 16 2.3.1. 硬件環(huán)境 16 2.3.2. 軟件環(huán)境 17 第三章 系統(tǒng)總計(jì)設(shè)計(jì) 17 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 3.1. 系統(tǒng)的主要功能要求 17 3.1.1. 系統(tǒng)主要模塊 17 3.1.2. 系統(tǒng)安全性 17 3.1.3. 口令權(quán)限識別 18 3.1.4. 口令存取 18 3.2. 主要功能模塊描述 18 3.2.1. 課程表信息 18 3.2.2. 總課表信息 19 3.2.3. 教師信息管理 19 3.2.4. 教師課酬管理 19 3.2.5. 教師課酬發(fā)放 19 3.2.6. 教師課酬統(tǒng)計(jì) 19 3.2.7. 試卷檔案登記 20 第四章 系統(tǒng)詳細(xì)設(shè)計(jì)分析 20 4.1. 需求分析 20 4.1.1. 目標(biāo)系統(tǒng)功能說明 20 4.1.2. 用戶需求分析 20 4.2. 系統(tǒng)結(jié)構(gòu) 21 4.3. 系統(tǒng) E-R 圖 22 4.4. 數(shù)據(jù)庫設(shè)計(jì) 23 4.5. 系統(tǒng)數(shù)據(jù)流圖 30 第五章 系統(tǒng)的實(shí)現(xiàn) 33 5.1. 登陸窗體的設(shè)計(jì) 33 5.2. 程序主界面設(shè)計(jì) 36 5.3. 用戶管理窗口的設(shè)計(jì) 48 5.4. 計(jì)科系教務(wù)管理系統(tǒng)的實(shí)現(xiàn) 56 5.4.1. 系統(tǒng)管理 56 5.4.2. 教務(wù)信息管理： 57 5.4.3. 數(shù)據(jù)查詢： 67 5.4.4. 系統(tǒng)幫助： 69 第六章 系統(tǒng)使用方法 70 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 摘要 隨著信息技術(shù)在管理上越來越深入而廣泛的應(yīng)用，管理信息系統(tǒng)的實(shí)施在技術(shù)上已逐步成熟。管理信息系統(tǒng)是一個不斷發(fā)展的新型學(xué)科，任何一個單位要生存要發(fā)展，要高效率地把內(nèi)部活動有機(jī)地組織起來，就必須建立與自身特點(diǎn)相適應(yīng)的管理信息系統(tǒng)。 本文介紹了在 Visual Basic6.0 環(huán)境下采用“自上而下地總體規(guī) 劃，自下而上地應(yīng)用開發(fā)”的策略開發(fā)一個管理信息系統(tǒng)的過程。通過分析我學(xué)校計(jì)科系的教務(wù)管理的不足，創(chuàng)建了一套行之有效的利用計(jì)算機(jī)進(jìn)行教務(wù)信息管理的方案。文章介紹了教務(wù)管理信息系統(tǒng)的系統(tǒng)分析部分，包括可行性分析、數(shù)據(jù)流程分析和需求分析等；系統(tǒng)設(shè)計(jì)部分主要介紹了系統(tǒng)功能設(shè)計(jì)和數(shù)據(jù)庫設(shè)計(jì)及代碼設(shè)計(jì)；系統(tǒng)實(shí)現(xiàn)部分說明了幾個主要模塊的算法，本系統(tǒng)界面友好，操作簡單，比較實(shí)用。 關(guān)鍵字 : 管理信息系統(tǒng)、教務(wù)管理、 Visual Basic 應(yīng)用。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： Abstract Is more and more thorough along with the information technology in the management and the widespread application, the management information system the implementation technically already gradually maturely.The management information system is the new discipline which develops unceasingly, any unit must survive must develop, wants the high efficiency to organize organically the internal activity, must establish the management information system which adapts with own characteristic. This article introduced environment uses Microsoft Visual Basci 6.0 ；from the top downward the overall plan in Visual under the Basic6.0, from bottom to top applies the development”； the strategy develops a management information system the process.Through analyzes my school to count the branch department the educational administration management insufficiency, founded a set of effective use computer to carry on the educational administration information management the plan.The article introduced the 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： educational administration management information system system analysis part, including feasibility analysis, data flow analysis and demand analysis and so on； The system design part mainly introduced the system function design and the database design and the code design； The system realization part explained several main module algorithms, this system contact surface is friendly, the operation is simple, quite practical. Key words: Management information system, educational administration management, Visual Basic application. 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 第一章 緒論 1.1. 選題的背景 隨 著數(shù)據(jù)庫技術(shù)、網(wǎng)絡(luò)技術(shù)和科學(xué)管理方法的發(fā)展，計(jì)算機(jī)在管理上的應(yīng)用日益廣泛，管理信息系統(tǒng)逐漸成熟起來，并且給管理帶來了新的革命。管理信息系統(tǒng)是以人為主導(dǎo)的，通過運(yùn)用計(jì)算機(jī)、網(wǎng)絡(luò)通信設(shè)備及其它辦公設(shè)備對信息進(jìn)行收集、運(yùn)輸、加工、存儲、更新、維護(hù)，支持高層決策、中層控制、基層運(yùn)作的人機(jī)系統(tǒng)。管理信息系統(tǒng)最大的特點(diǎn)是高度集中，能將組織中的數(shù)據(jù)和信息集中起來，進(jìn)行快速處理，統(tǒng)一使用，利用定量化的科學(xué)管理方法，通過預(yù)測、計(jì)劃優(yōu)化、 管理、調(diào)節(jié)和控制等手段來支持決策。一個中心數(shù)據(jù)庫和計(jì)算機(jī)網(wǎng)絡(luò)系統(tǒng)是管理信息系統(tǒng) (Managemant Information System,MIS)的重要標(biāo)志。 MIS 的處理方式是在數(shù)據(jù)庫和網(wǎng)絡(luò)基礎(chǔ)上的分布式處理。隨著計(jì)算機(jī)網(wǎng)絡(luò)和通訊技術(shù)的發(fā)展，不僅能把組織內(nèi)部的各級管理連接起來，而且能夠克服地理界限，把分散在不同地區(qū)的計(jì)算機(jī)網(wǎng)絡(luò)互連，形成跨地區(qū)的各種業(yè)務(wù)信息系統(tǒng)和管理信息系統(tǒng)。目前，雖然有許多學(xué)校已開始運(yùn)用 計(jì)算機(jī) 進(jìn)行 學(xué)校教務(wù)的 管理 .學(xué)校的 教務(wù)管理 系統(tǒng)必須是一個完整統(tǒng)一、技術(shù)先進(jìn)、高效穩(wěn)定、安全可靠的系統(tǒng)。根 據(jù)國內(nèi)大學(xué)的現(xiàn)在管理模式，結(jié)合國際新的思想觀念，在校園網(wǎng)絡(luò)環(huán)境下建設(shè)先進(jìn)的、與國際水平接軌的信息化管理平臺。提高學(xué)校管理工作的現(xiàn)代化水平，使之成為學(xué)校公共信息服務(wù)體系的重要組成部分。教學(xué)教務(wù)管理系統(tǒng)是高校管理信息系統(tǒng)無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 建設(shè)的重要組成部分，是提高教學(xué)管理的質(zhì)量和效益乃至建設(shè)世界知名的高水平的大學(xué)的關(guān)鍵環(huán)節(jié)。教學(xué)教務(wù)信息處理的電腦化、網(wǎng)絡(luò)化，也是實(shí)現(xiàn)學(xué)校管理現(xiàn)代化和信息化的重要內(nèi)容。 1.2. 目的和意義 隨著計(jì)算機(jī)技術(shù)的不斷發(fā)展，計(jì)算機(jī)作為知識經(jīng)濟(jì)時代的產(chǎn)物，已被廣泛應(yīng)用于社會各個行業(yè)和領(lǐng)域。 目前，我國的科技水平高速 發(fā)展，計(jì)算機(jī)作為今天使用最廣的現(xiàn)代化工具已深入到各個領(lǐng)域，并且正在成為未來社會 信息社會的重要支柱。在這樣的大背景下，現(xiàn)代學(xué)校教務(wù)的管理方式，資源建設(shè)等方面都發(fā)生了重大變化，這種變化表現(xiàn)在教務(wù)工作，管理和服務(wù)平臺發(fā)生的變化，教務(wù)管理不再是傳統(tǒng)的手工操作，人工管理，而是全面實(shí)行計(jì)算機(jī)管理。 此次畢業(yè)設(shè)計(jì)是對我兩年來所學(xué)專業(yè)知識的一個總結(jié)。它使我提高了自身解決實(shí)際問題的能力。但由于本人知識水有限，系統(tǒng)設(shè)計(jì)中還存在著很多不足，請各位領(lǐng)導(dǎo)批評指正，以便我今后改進(jìn)。此外，該系統(tǒng)能夠順利的完成離不開各位老師對我的幫 助，在此深表感謝。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 1.3. 系統(tǒng)完成和實(shí)現(xiàn)的工作 現(xiàn)代高校教務(wù)管理一般采取二級管理模式：校級教務(wù)處和各二級院系教務(wù)科。鑒于本校的實(shí)際情況我校教務(wù)處側(cè)重于校級教務(wù)處對數(shù)據(jù)的維護(hù)和管理以及從整體的角度進(jìn)行數(shù)據(jù)分析和數(shù)據(jù)統(tǒng)計(jì)。包括數(shù)據(jù)的錄入、查詢、打印以及從局部的角度進(jìn)行數(shù)據(jù)分析和數(shù)據(jù)統(tǒng)計(jì)以及對數(shù)據(jù)進(jìn)行各種處理，對全校的教務(wù)管理工作任務(wù)進(jìn)行全盤的規(guī)劃，最后拿出一個管理全校教務(wù)工作的合理方案來。 前臺 : :采用 Delphi 應(yīng)用程序平臺 . 后臺 : 采用 Microsoft SQLSERVER2000 數(shù) 據(jù)庫平臺 . 實(shí)現(xiàn)本校的計(jì)科系教務(wù)管理系統(tǒng) . 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 第二章 平臺簡介 2.1. Delphi 簡介 Delphi是一個極有代表性的面向?qū)ο箝_發(fā)工具；它將面向?qū)ο蟮某绦蛟O(shè)計(jì)方法與數(shù)據(jù)庫技術(shù)；網(wǎng)絡(luò)技術(shù)以及可視化；事件驅(qū)動，代碼自動生成等先進(jìn)技術(shù)完美的結(jié)合在一起，使用它可以直觀的，快速地開發(fā)，高質(zhì)量的 windows應(yīng)用程序。Delphi強(qiáng)大的易用的特點(diǎn)得到程序員的青睞。 Delphi7.0除了保留以前版本的強(qiáng)大功能之處，更在數(shù)據(jù)庫程序開發(fā)方面提供了強(qiáng)有力的支持，使程序員完全可能輕松開發(fā)出復(fù)雜 且功能強(qiáng)大的數(shù)據(jù)庫程序。 Delphi類可以粗略地分成兩部分：一部分是組件類，這些組件類通常以某種方式出現(xiàn)在組件面板上，當(dāng)用戶從組件面板上點(diǎn)取一個類的圖標(biāo)后，在程序中就自動生成了該類的對象（非可視組件除外）；另一部分是功能類，這此功能類的對象通常出現(xiàn)在程序代碼中，起著不可代替的作用，但是這些功能類在組件面板上是找不到的。在 Delphi中，每一個類的祖先都是 Tobject類 ,整個類的層次結(jié)構(gòu)就像一棵倒掛的樹，在最頂層的樹根即為 Tobject類。這樣，按照面向?qū)ο缶幊痰幕舅枷?，就使得用戶可?Tobject類這 個類型代替任何其它類的數(shù)據(jù)類型。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 2.1.1. 數(shù)據(jù)庫訪問方法 BDE方法：它提供了存取各種文型和客戶 /服務(wù)器型數(shù)據(jù)庫的驅(qū)動器程序。該方法直接訪問 Paradox和 Dbase等數(shù)據(jù)庫或通過 DOBC（ Open DataBase connecivity,開放數(shù)據(jù)庫）來訪問 Access和 PoxPro等數(shù)據(jù)庫，還可通過內(nèi)嵌方式訪問 SQL Servr、Oracle和 DB2等大型數(shù)據(jù)庫。 ADO方法： ADO方法是微軟提供的一種數(shù)據(jù)庫訪問技術(shù)。通過 ADO技術(shù)可方便的訪問各種類型的數(shù)據(jù)庫，尤其對于 OLEDB類型的數(shù)據(jù)庫， ADO更是訪問數(shù)據(jù) 庫的標(biāo)準(zhǔn)接口。 Delphi通過 ADO技術(shù)可讓開發(fā)者快速訪問關(guān)系或非關(guān)系型數(shù)據(jù)庫，但使用時需安裝 ADO的數(shù)據(jù)庫引擎。 MIDAS方法： MIDAS方法是 Delphi用于開發(fā)多層應(yīng)用系統(tǒng)的中間透明引擎。通過 MIDAS，開發(fā)者可使用相同的組件來存取不同的后臺應(yīng)用程序服務(wù)器。這些后臺應(yīng)用服務(wù)器程序包括 COM+/DCOM應(yīng)用程序服務(wù)器、 MTS中間件或 CORBA應(yīng)用程序服務(wù)器。 MIDAS方法實(shí)現(xiàn)了真正意義上的客戶端程序與后臺數(shù)據(jù)庫的分離，但MIDAS的靈活性很差，與數(shù)據(jù)感應(yīng)控件關(guān)聯(lián)過于密切，限制了程序員的創(chuàng)造性。 dbExpress 方法： Delphi 7.0提供了新一代的跨平臺數(shù)據(jù)訪問引擎dbExpress方法，它由一組新控件、技術(shù)和驅(qū)動程序組成，并通過這些組成部分和各種數(shù)據(jù)源連鏈接。如配合不同的數(shù)據(jù)庫動態(tài)鏈接庫文件，還可處理后臺數(shù)據(jù)庫數(shù)據(jù)。因此也是 Delphi和 Kylix的核心數(shù)據(jù)訪問。 綜上所述，雖然 Delphi的各個版本提供多種數(shù)據(jù)庫的連接和訪問方法，但在同一個應(yīng)用程序中，開發(fā)者幾乎不可能同時選用多種連接方法，因而選擇合適方法是一個必須在開發(fā)前仔細(xì)考慮的問題。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 2.1.2. 數(shù)據(jù)庫組件 用 Delphi7.0開發(fā)數(shù)據(jù)庫應(yīng)用，重點(diǎn) 是和各種數(shù)據(jù)庫組件打交道，控件組有：BDE控件組、 ADO控件組、 Date Controls控件組和 dbExpress控件組。 1ADO是Micrsoft公司關(guān)于各種類型數(shù)據(jù)的高等界面，后來逐漸演變成滿足所有數(shù)據(jù)訪問需要的完整解決辦法。 ADO的對象模型是所有數(shù)據(jù)訪問接口對象模型中最簡單的一種。它主要控件有： TTADOConnection控件， TADOCommand控件， ADODateSet控件， TADOTable控件， TADOQuery控件， TADOStoeProc控件。 Delphi的 ADO組件無需依靠 BDE而 是使用 ADO技術(shù)，提供了可以通過數(shù)據(jù)控制組件訪問數(shù)據(jù)的新方法。唯一的要求是在使用 ADO組件時必須運(yùn)行 ADO/OLE DB。 ADO組件的使用使得DELPHI在訪問數(shù)據(jù)的類型和采用的技術(shù)方面都有了很大的突破 2.2. 數(shù)據(jù)庫簡介 2.2.1. SQL 語言 SQL 基礎(chǔ) : SQL(Structured Query Language，結(jié)構(gòu)查詢語言 )是一個功能強(qiáng)大的數(shù)據(jù)庫語言。 SQL通常使用于數(shù)據(jù)庫的通訊。 ANSI（美國國家標(biāo)準(zhǔn)學(xué)會）聲稱， SQL 是關(guān)系數(shù)據(jù)庫管理系統(tǒng)的標(biāo)準(zhǔn)語言。 SQL 語句通常用于完成一些數(shù)據(jù)庫的操作任務(wù)，比如在數(shù)據(jù)庫中 更新數(shù)據(jù)，或者從數(shù)據(jù)庫中檢索數(shù)據(jù)。使用 SQL的常見關(guān)系數(shù)據(jù)庫管理系統(tǒng)有： Oracle、 Sybase、 Microsoft SQL Server、 Access、 Ingress 等等。雖然絕大多數(shù)的數(shù)據(jù)庫系統(tǒng)使用 SQL，但是它們同樣有它們自立另外的專有擴(kuò)展功能用于它們的系統(tǒng)。但是，標(biāo)準(zhǔn)的 SQL 命令，比如無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： Select、 Insert、 Update、 Delete、 Create和 Drop常常被用于完成絕大多數(shù)數(shù)據(jù)庫的操作。 MS SQL Server 就是用的 Transact- SQL。 SQL語言有著非常突出的優(yōu)點(diǎn)。 非過程化語言： SQL 是一個非過程化的語言，因?yàn)樗淮翁幚硪粋€記錄，對數(shù)據(jù)提供自動導(dǎo)航。 SQL 允許用戶在高層的數(shù)據(jù)結(jié)構(gòu)上工作，而不對單個記錄進(jìn)行操作，可操作記錄集，所有 SQL 語句接受集合作為輸入，返回集合作為輸出。 SQL的集合特性允許一條 SQL語句的結(jié)果作為另一條 SQL語句的輸入。 SQL 不要求用戶指定對數(shù)據(jù)的存放方法， 這種特性使用戶更易集中精力于要得到的結(jié)果；所有 SQL語句使用查詢優(yōu)化器，它是 RDBMS的一部分，由它決定對指定數(shù)據(jù)存取的最快速度的手段，查詢優(yōu)化器知道 存在什么索引，在哪兒使用索引合適，而用戶則從不需要知道表是否有索引、有什么類型的索引。 統(tǒng)一的語言： SQL 可用于所有用戶的 DB 活動模型，包括系統(tǒng)管理員、數(shù)據(jù)庫管理員、 應(yīng)用程序員、決策支持系統(tǒng)人員及許多其它類型的終端用戶。 SQL為許多任務(wù)提供了命令，其中包括： 查詢數(shù)據(jù)； 在表中插入、修改和刪除記錄； 建立、修改和刪除數(shù)據(jù)對象； 控制對數(shù)據(jù)和數(shù)據(jù)對象的存??； 保證數(shù)據(jù)庫一致性和完整性； 以前的數(shù)據(jù)庫管理系統(tǒng)為上述各類操作提供單獨(dú)的語言，而 SQL 將全部任務(wù)統(tǒng)一在一種語言中。 所有關(guān)系數(shù)據(jù)庫的公共 語言：由于所有主要的關(guān)系數(shù)據(jù)庫管理系統(tǒng)都支持無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： SQL 語言，用戶可將使用 SQL 的技能從一個 RDBMS(關(guān)系數(shù)據(jù)庫管理系統(tǒng) )轉(zhuǎn)到另一個，所有用 SQL 編寫的程序都是可以移植的。 SQL 語句 : SQL 功能強(qiáng)大，是一種完備的數(shù)據(jù)處理語言，不僅用于數(shù)據(jù)庫查詢，而且用于數(shù)據(jù)庫中的數(shù)據(jù)修改和更新，概括起來，它可以分成以下幾組： DML（ Data Manipulation Language，數(shù)據(jù)操作語言）：用于檢索或者修改數(shù)據(jù)； DDL（ Data Definition Language，數(shù)據(jù)定義語言）： 用于定義數(shù)據(jù)的結(jié)構(gòu)， 比如 創(chuàng)建、修改或者刪除數(shù)據(jù)庫對象； DCL（ Data Control Language，數(shù)據(jù)控制語言）：用于定義數(shù)據(jù)庫用戶的權(quán)限。 DML組可以細(xì)分為以下的幾個語句： SELECT：用于檢索數(shù)據(jù)； INSERT：用于增加數(shù)據(jù)到數(shù)據(jù)庫； UPDATE：用于從數(shù)據(jù)庫中修改現(xiàn)存的數(shù)據(jù)； DELETE：用于從數(shù)據(jù)庫中刪除數(shù)據(jù)。 DDL語句可以用于創(chuàng)建用戶和重建數(shù)據(jù)庫對象。下面是 DDL命令： CREATE TABLE， ALTER TABLE， DROP TABLE， CREATE INDEX， DROP INDEX DDL 與 DML: 數(shù)據(jù)定義語言 DDL：它是用來創(chuàng)建和修改數(shù)據(jù)庫結(jié)構(gòu)的一種語句，包括 Create、 Alter 和 Drop 語句。數(shù)據(jù)操作語言 DML：包括數(shù)據(jù)查詢與數(shù)據(jù)更新。數(shù)據(jù)查詢主要是由 Select 語句完成，這一點(diǎn)不再贅述。而數(shù)據(jù)更新所造成的風(fēng)險大大超過數(shù)據(jù)查詢。數(shù)據(jù)庫管理系統(tǒng)必須在更改期內(nèi)保護(hù)所存儲的數(shù)據(jù)的一致性，確保有效的數(shù)據(jù)進(jìn)入數(shù)據(jù)庫，數(shù)據(jù)庫必須保持一致性， DBMS 還必須協(xié)調(diào)多用戶的并行更新，以確保用戶和它們的更改不至于影響 其它用戶的作業(yè)。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 用于修改數(shù)據(jù)庫內(nèi)容的 SQL 語句主要有以下三個： (1) Insert，向一個表中加入新的數(shù)據(jù)行 (2) Delete，從一個表中刪除數(shù)據(jù)行 (3) Update，更改數(shù)據(jù)庫中已經(jīng)存在的數(shù)據(jù) Insert標(biāo)準(zhǔn)語法： INSERT INTO table name (col1, col2.) VALUES (value1, value2.) Insert 語句還可以將多行數(shù)據(jù)添加到目標(biāo)表中去，在這種形式的 Insert 語句中，新行的數(shù)據(jù)值不是在語句正文中明確地指定的，而是語句中指定的一個數(shù)據(jù)庫查詢。添加的值來自數(shù)據(jù)庫自身的行，在某些特定的狀態(tài)下，這是非常有用的。多行 Insert 語句為拷貝數(shù)據(jù)提供了一種緊湊而高效的方法，但我在自己做的圖書管理系統(tǒng)中沒有使用這種方法，我在系統(tǒng)中是使用循環(huán)依照上面的用法來完成多個記錄的插入。 Update語句用于更新單表中選定行的一列或多列的值。要更新的目標(biāo)表在語句中定義， Set子句則指定要更新哪些列并計(jì)算它們的值。 Update 語句總是包含 Where 語句，而且 Update 語句比較危險，所以您必須明確地認(rèn)識到 Where 語句的重要性， Where 語句被用來指定需要更新的行。 標(biāo)準(zhǔn)語法： UPDATE table name SET columnname1 = value1 , columname2 = value2. WHERE search condition Delete 語句標(biāo)準(zhǔn)語法： 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： DELETE FROM table name WHERE condition 復(fù) 雜操作實(shí)現(xiàn) : 在信息管理系統(tǒng)中，我們往往會遇到歸類、匯總、映射、索引、子查詢等復(fù)雜操作，相應(yīng)的支持與實(shí)現(xiàn)如下： GROUP BY子句語法為： SELECT column1, SUM(column2) FROM list-of-tables GROUP BY column-list； 這個 GROUP BY 子句將集中所有的行在一起，它包含了指定例的數(shù)據(jù)以及允許合計(jì)函數(shù)來計(jì)算一個或者多個列。在本人的系統(tǒng)中在顯示數(shù)據(jù)時用到了此語句來對查詢所 得的內(nèi)容排序然后再顯示。 組合條件和布爾運(yùn)算符 ,以下的 SQL語句中就含有組合條件： SELECT column1, SUM(column2) FROM list-of-tables WHERE condition1 AND condition2； 有些時候，需要一起瀏覽多個查詢的結(jié)果、組合它們的輸出，我們可以使用 UNION關(guān)鍵字。 2.2.2. 數(shù)據(jù)庫 數(shù)據(jù)庫處理在信息系統(tǒng)的研究中一直是非常重要的主題，然而，近年來，隨著 World Wide Web(WWW)的猛增及 Internet 技術(shù)的迅速發(fā) 展，使得數(shù)據(jù)庫技術(shù)之時成為最熱門技術(shù)之一。數(shù)據(jù)庫技術(shù)能使 Internet 應(yīng)用超越具有早期應(yīng)用特點(diǎn)的簡單的發(fā)布。同時， Internet 技術(shù)提供了一種向用戶發(fā)布數(shù)據(jù)庫內(nèi)容的標(biāo)準(zhǔn)化的訪問方法。這些技術(shù)沒有脫離經(jīng)典數(shù)據(jù)庫技術(shù)的要求。它們只是加重了數(shù)無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 據(jù)庫技術(shù)的重要性。 數(shù)據(jù)庫的設(shè)計(jì)和開發(fā)及包括藝術(shù)有包括工程。理解用戶的需求，然后，把它們轉(zhuǎn)變?yōu)橛行У臄?shù)據(jù)庫設(shè)計(jì)是一個藝術(shù)過程。把設(shè)計(jì)轉(zhuǎn)變?yōu)閷?shí)際的數(shù)據(jù)庫，并且這些數(shù)據(jù)庫帶有功能完備、高效能的應(yīng)用，是一個工程過程。 數(shù)據(jù)庫的目的是幫助人們跟蹤事務(wù)。經(jīng)典的數(shù)據(jù)庫應(yīng)用涉及諸如訂單 、顧客、工作、員工、學(xué)生、電話之類的項(xiàng)，或其它數(shù)據(jù)量較大、需要密起關(guān)注的事務(wù)。最近，由于數(shù)據(jù)庫的普及，數(shù)據(jù)庫技術(shù)已經(jīng)被應(yīng)用到了新的領(lǐng)域，諸如用于Internet 的數(shù)據(jù)庫或用于公司內(nèi)聯(lián)網(wǎng)的數(shù)據(jù)庫。數(shù)據(jù)庫也被越來越多地應(yīng)用于生成和維護(hù)多媒體應(yīng)用程序上。 2.3. 系統(tǒng)運(yùn)行環(huán)境 基于以上對系統(tǒng)各種的分析和定義，建議系統(tǒng)采用一下配置，已確定系統(tǒng)的穩(wěn)定、高效運(yùn)行。 2.3.1. 硬件環(huán)境 (1) 最低配置 C233以上 CPU， 32MB 以上內(nèi)存， 2.1GB硬盤。 (2) 建議配置 C2.4以上 CPU， 256MB內(nèi)存， 80GB硬盤。 (3) 打印機(jī)一臺 (4) UPS不間斷電源一臺（避免數(shù)據(jù)因突然停電等意外情況下的丟失 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 2.3.2. 軟件環(huán)境 PC工作站 Win98/2000/xp 操作系統(tǒng) 第三章 系統(tǒng)總計(jì)設(shè)計(jì) 3.1. 系統(tǒng)的主要功能要求 根據(jù)用戶口令判斷用戶的權(quán)限，具有基本的信息錄入功能和添加、刪除、修改功能，并能根據(jù)錄入的信息生成課程表、總課表、課酬表、課酬統(tǒng)計(jì)表、試卷檔案表，并能生成打印報(bào)表和 Excel數(shù)據(jù)文檔等功能。 3.1.1. 系統(tǒng)主要模塊 主要功能模塊有：用戶管理，角色管理，數(shù)據(jù)字典，課程表信息，總課表信息，教師信息管理，教師課酬 管理，教師課酬發(fā)放，教師課酬統(tǒng)計(jì)，試卷檔案管理，課程名稱設(shè)置，教師信息查詢，課程信息查詢，教師課酬查詢 等。 3.1.2. 系統(tǒng)安全性 計(jì)算機(jī)系統(tǒng)的安全治理是一個龐大、復(fù)雜、面廣的系統(tǒng)工程。安全的核心是人，必須以人為核心進(jìn)行安全管理。采用各種先進(jìn)的安全技術(shù)，使系統(tǒng)免受非法攻擊，排除沒有訪問權(quán)限的使用者竊取機(jī)密信息，確保系統(tǒng)安全可靠的運(yùn)行。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 針對 學(xué)校教務(wù) 管理系統(tǒng)的特點(diǎn)，為了加強(qiáng)其安全性，系統(tǒng)采用一定的保密措施。 3.1.3. 口令權(quán)限識別 口令識別是一種低成本，易實(shí)現(xiàn)的用戶識別技術(shù)。在計(jì)算機(jī)系統(tǒng)內(nèi)廣泛的使用，在口令識別機(jī)制中，計(jì)算機(jī)系 統(tǒng)給每個用戶分配一個用戶標(biāo)識和一個口令。用戶標(biāo)識唯一確定一個用戶是公開的；口令用于證實(shí)用戶，是保密的，顯示為 *號。 3.1.4. 口令存取 系統(tǒng)要識別每個用戶的口令，就必須把每個用戶的口令存放起來，形成口令表，通常以文件或數(shù)據(jù)庫形式存放。如果以明文的形式存放，則很容易被熟悉系統(tǒng)的人偷取，為了提高基于口令的身份識別方案的堅(jiān)強(qiáng)度，應(yīng)該在口令方案中引入家密機(jī)制。 3.2. 主要功能模塊描述 系統(tǒng)的各個功能模塊相互協(xié)同共同構(gòu)成一個完整的教務(wù)管理系統(tǒng) . 3.2.1. 課程表信息 該設(shè)計(jì)的功能主要是完成 課程表 的管理，它包括 課程表錄入生成和 查詢，及其維護(hù)和 打印 及生成 Excel文檔 等功能。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 3.2.2. 總課表信息 該設(shè)計(jì)的功能主要是完成 學(xué)期總課表 的管理，它包括 學(xué)期課表錄入生成和 查詢，及其維護(hù)和打印 及生成 Excel文檔 等功能。 該模塊的錄入量較多，在設(shè)計(jì)上更加方便用戶在較短時間內(nèi)完成大量的工作。 3.2.3. 教師信息管理 該設(shè)計(jì)的功能主要是完成教師信息的管理和維護(hù) 。 3.2.4. 教師課酬管理 該設(shè)計(jì)主要 是對教師課酬的及時登記入庫 ，它包括對 教師課酬的登記、錄入、查詢、 報(bào)表打印 、及 Excel生成 等功能 ，也為后續(xù)的教師課酬發(fā)放提供數(shù)據(jù)源 。 3.2.5. 教師課酬發(fā)放 該設(shè)計(jì)的功能主要對 教師課酬的發(fā)放進(jìn)行登記和管理 。 它 根據(jù)教師課程登記表提供的數(shù)據(jù)加以錄入部分信息，進(jìn)行維護(hù)和管理。提供了錄入、查詢、 報(bào)表打印 、及 Excel生成 等功能 ，也為后續(xù)的教師課酬統(tǒng)計(jì)管理提供數(shù)據(jù)依據(jù)。為教師課酬發(fā)放提供數(shù)據(jù)。 3.2.6. 教師課酬統(tǒng)計(jì) 該設(shè)計(jì) 完全依據(jù)課酬登記表的數(shù)據(jù)進(jìn)而進(jìn)行統(tǒng)計(jì)維護(hù)、管理和錄入部分必須的外加數(shù)據(jù)。該設(shè)計(jì)也提供了錄入、查詢、 報(bào)表打印 、及 Excel生成 等功能 。主要是為學(xué)期教師課酬統(tǒng)計(jì)工作提供方便。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 3.2.7. 試卷檔案登記 該設(shè)計(jì) 主要是實(shí)現(xiàn)對教學(xué)考試試卷電子檔案的管理，該設(shè)計(jì)也提供了錄入、查詢、 報(bào)表打印 、及 Excel生成 等功能 。為日常教學(xué)考試工作提 供方便。 第四章 系統(tǒng)詳細(xì)設(shè)計(jì)分析 1.1. 需求分析 4.1.1. 目標(biāo)系統(tǒng)功能說明 本教務(wù)管理系統(tǒng)針對客戶提供強(qiáng)大的軟件功能，主要維護(hù)日常教務(wù)管理工作的基本信息等，能為教務(wù)教學(xué)提供更好的數(shù)據(jù)支持。軟件的功能基本是通用的。提供系統(tǒng)用戶管理、角色管理、數(shù)據(jù)字典管理、課程表管理、總課表管理、教師課酬管理統(tǒng)計(jì)、試卷檔案管理和生成報(bào)表 Excel 數(shù)據(jù)文檔，查詢幫助等功能。 4.1.2. 用戶需求分析 本教務(wù)管理系統(tǒng) 是基于 Windows操作系統(tǒng)基礎(chǔ)上，通過對 既定數(shù)據(jù)條件 研究和分析并結(jié)合對 學(xué)校教務(wù) 管理進(jìn)行分析提出來的。對原有 教務(wù)管理系統(tǒng) 的非 圖形界面操作 和 功能不強(qiáng)的數(shù)據(jù)庫系統(tǒng)的不穩(wěn)定性、不可擴(kuò)充性、難以移植等 和 原有系統(tǒng)功能覆蓋面不廣等缺陷相應(yīng)提出了一些要求。 1、 求系統(tǒng)目前流行的數(shù)據(jù)庫系統(tǒng) SQL Server 2000 作為底層數(shù)據(jù)庫，使其具備很強(qiáng)的穩(wěn)定性、擴(kuò)充性、移植性等優(yōu)良性能。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 2、 求系統(tǒng)以功能強(qiáng)大的 Windows 系列操作系統(tǒng)作為操作系統(tǒng)平臺，使其具備優(yōu)良的可視化圖形操作界面，大力提高系統(tǒng)的可操作性和交互性盡量減少操作員的負(fù)擔(dān)，讓他們更方便、更快捷、更簡單的進(jìn)行操作。 3、 求擴(kuò)大系統(tǒng)功能覆蓋面。它的功能要求能進(jìn)行圖書的編目建庫、瀏覽數(shù) 據(jù)、檢索與統(tǒng)計(jì)數(shù)據(jù)、以及打印數(shù)據(jù)等功能的綜合管理。并能實(shí)現(xiàn)控制各用戶系統(tǒng)權(quán)限，從而保證系統(tǒng)的安全性能。 4、 求提高系統(tǒng)的可維護(hù)性。系統(tǒng)的數(shù)據(jù)要求能隨時進(jìn)行備份與恢復(fù)，基于家庭圖書管理系統(tǒng)的局限性這里就不要求數(shù)據(jù)能與其他數(shù)據(jù)庫進(jìn)行交流（及共享數(shù)據(jù)）。 1.2. 系統(tǒng)結(jié)構(gòu) 計(jì)科教務(wù) 管理系統(tǒng)結(jié)構(gòu)圖 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 計(jì) 科 教 務(wù) 管 理 系 統(tǒng)系 統(tǒng) 管理教 務(wù) 信息 管 理查 詢 幫 助用戶管理角色管理數(shù)據(jù)字典課程表信息總課表信息教師信息管理教師課酬管理教師課酬發(fā)放教師課酬統(tǒng)計(jì)試卷檔案登記課程名稱設(shè)置教師信息查詢課程信息查詢教師課酬查詢關(guān)于幫助 1.3. 系統(tǒng) E-R 圖 計(jì)科教務(wù) 管理系統(tǒng) E-R 圖 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 參 照教 師 課 酬發(fā) 放 表統(tǒng) 計(jì)教 師 課 酬統(tǒng) 計(jì) 表教 師對 應(yīng)對 應(yīng) 對 應(yīng)對 應(yīng)課 程 表 / 總課 表試 卷 檔 案登 記 表教 師 課 酬登 記 表11n 1n1n1n1nn 1.4. 數(shù)據(jù)庫設(shè)計(jì) 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 數(shù)據(jù)庫設(shè)計(jì)主要是進(jìn)行數(shù)據(jù)庫的邏輯設(shè)計(jì)，即將數(shù)據(jù)按一定的分類、分組系統(tǒng)和邏輯層次組織起來，是面向用戶的。數(shù)據(jù)庫設(shè)計(jì)時需要綜合企業(yè)各個部門的存檔數(shù)據(jù)和數(shù)據(jù)需求，分析各個數(shù)據(jù)之間的關(guān)系，按照 DBMS 提供的功能和描述工具，設(shè)計(jì)出規(guī)模適當(dāng)、正確反映數(shù)據(jù)關(guān)系、數(shù)據(jù)冗余少、存取效率高、能滿足多種查詢要求的數(shù)據(jù)模型。 數(shù)據(jù)庫設(shè)計(jì)的步驟是： （ 1） 數(shù)據(jù)庫結(jié)構(gòu)定義：目前的數(shù)據(jù)庫管理系統(tǒng)（ DBMS）有的是支持聯(lián)機(jī)事務(wù)處理 CLTP（負(fù)責(zé)對事務(wù)數(shù)據(jù)進(jìn)行采集、處理、存儲）的操作型 DBMS，有的可支持?jǐn)?shù)據(jù)倉庫、有聯(lián)機(jī) 分析處理 CLAP（指為支持決策的制定對數(shù)據(jù)的一種加工操作）功能的大型 DBMS，有的數(shù)據(jù)庫是關(guān)系型的、有的可支持面向?qū)ο髷?shù)據(jù)庫。針對選擇的 DBMS，進(jìn)行數(shù)據(jù)庫結(jié)構(gòu)定義。 （ 2） 數(shù)據(jù)表定義：數(shù)據(jù)表定義指定義數(shù)據(jù)庫中數(shù)據(jù)表的結(jié)構(gòu)，數(shù)據(jù)表的邏輯結(jié)構(gòu)包括：屬性名稱、類型、表示形式、缺省值、校驗(yàn)規(guī)則、是否關(guān)鍵字、可否為空等。關(guān)系型數(shù)據(jù)庫要盡量按關(guān)系規(guī)范化要求進(jìn)行數(shù)據(jù)庫設(shè)計(jì)，但為使效率高，規(guī)范化程度應(yīng)根據(jù)應(yīng)用環(huán)境和條件來決定。數(shù)據(jù)表設(shè)計(jì)不僅要滿足數(shù)據(jù)存儲的要求，還要增加一些如反映有關(guān)信息、操作責(zé)任、中間數(shù)據(jù)的字段或臨時 數(shù)據(jù)表。 （ 3） 存儲設(shè)備和存儲空間組織：確定數(shù)據(jù)的存放地點(diǎn)、存儲路徑、存儲設(shè)備等，備份方案，對多版本如何保證一致性和數(shù)據(jù)的完整性。 （ 4） 數(shù)據(jù)使用權(quán)限設(shè)置：針對用戶的不同使用要求，確定數(shù)據(jù)的用戶使用權(quán)限，確保數(shù)據(jù)安全。 （ 5） 數(shù)據(jù)字典設(shè)計(jì)：用數(shù)據(jù)字典描述數(shù)據(jù)庫的設(shè)計(jì)，便于維護(hù)和修改。 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 為了更好地組織數(shù)據(jù)和設(shè)計(jì)出實(shí)際應(yīng)用數(shù)據(jù)庫，應(yīng)該注意如下問題： 規(guī)范化地重組數(shù)據(jù)結(jié)構(gòu)：對數(shù)據(jù)進(jìn)行規(guī)范化表達(dá)，這在后面將會具體討論。 關(guān)系數(shù)據(jù)結(jié)構(gòu)的建立：在進(jìn)行了數(shù)據(jù)基本結(jié)構(gòu)的規(guī)范化重組后，還必須建立整體數(shù)據(jù)的關(guān)系結(jié)構(gòu)。這一 步設(shè)計(jì)完成后數(shù)據(jù)庫和數(shù)據(jù)結(jié)構(gòu)設(shè)計(jì)工作基本完成，只待系統(tǒng)實(shí)現(xiàn)時將數(shù)據(jù)分析和數(shù)據(jù)字典的內(nèi)容代入到所設(shè)計(jì)的數(shù)據(jù)整體關(guān)系結(jié)構(gòu)中，一個規(guī)范化數(shù)據(jù)庫系統(tǒng)結(jié)構(gòu)就建立起來了。 建立關(guān)系數(shù)據(jù)結(jié)構(gòu)涉及三方面內(nèi)容：確定關(guān)聯(lián)的關(guān)鍵指標(biāo)項(xiàng)并建立關(guān)聯(lián)表；確定單一的父系記錄結(jié)構(gòu)；建立整個數(shù)據(jù)庫的關(guān)系結(jié)構(gòu)。 基于之上的分析系統(tǒng)的數(shù)據(jù)庫結(jié)構(gòu)具體如下 表 -1 用戶表 字段 類型 大小 允許為空 Uno Varchar 10 Uname Varchar 10 Usex Varchar 4 UpassWord Varchar 10 UBirth Datetime 8 Uphone Varchar 12 是 Uemail Varchar 20 Uaddress Varchar 50 Umemo Varchar 50 是 表 -2 用戶角色表 字段 類型 大小 允許為空 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： Rno varchar 10 Rname varchar 100 Rpower varchar 10 是 Rmemo varchar 50 是 表 -3 功能表 字段 類型 大小 允許為空 Fno varchar 10 Fname varchar 100 Flevel int 4 是 Fpage varchar 50 是 FMemo varchar 100 是 表 -4 教師信息表 字段 類型 大小 允許為空 tno int 4 tname varchar 20 tpost varchar 15 是 tsex varchar 10 ttel varchar 30 是 tbool varchar 10 是 tmemo varchar 50 是 tage varchar 20 是 tadress varchar 30 是 表 -5 總課表 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 字段 類型 大小 允許為空 tcno int 4 tcscode int 4 是 tcname varchar 20 是 tcpost varchar 20 是 tcdepartment varchar 20 是 tcclass varchar 20 是 tclessonname varchar 20 是 tclessoncount int 4 是 tccoefficient char 10 是 tcsc char 10 是 tcclessons int 4 是 tcsum varchar 20 是 tcreduce varchar 30 是 tcworksum varchar 30 是 tcmemo varchar 50 是 表 -6 課程表 字段 類型 大小 允許為空 tcno int 4 tweek varchar 20 是 tweekcount varchar 30 是 tname varchar 20 是 tadress varchar 50 是 表 -7 課酬登記 表 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 字段 類型 大小 允許為空 tcno int 4 tcscode int 4 是 tcname varchar 20 是 tcpost varchar 20 是 tcdepartment varchar 20 是 tcclass varchar 20 是 tclessonname varchar 20 是 tclessoncount int 4 是 tccoefficient char 10 是 tcsc char 10 是 tcclessons int 4 是 tcsum varchar 20 是 tcreduce varchar 30 是 tcworksum varchar 30 是 tcmemo varchar 50 是 tctime varchar 20 是 tcout varchar 10 是 trstandard varchar 10 是 tremuneration varchar 30 是 trtaxrate varchar 10 是 trtax varchar 20 是 trwages varchar 20 是 表 -8 課酬發(fā)放表 字段 類型 大小 允許為空 trno int 4 tcno int 4 是 trstandard varchar 30 是 tremuneration varchar 30 是 trtaxrate varchar 30 是 trtax varchar 30 是 trwages varchar 30 是 trmemo varchar 50 是 trtime varchar 30 是 traward varchar 30 是 trsignature varchar 30 是 trlessonscount int 4 是 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 表 -9 課酬統(tǒng)計(jì)表 字段 類型 大小 允許為空 trno int 4 tcno int 4 是 trstandard varchar 30 是 tremuneration varchar 30 是 trtaxrate varchar 30 是 trtax varchar 30 是 trwages varchar 30 是 trmemo varchar 50 是 trtime varchar 30 是 traward varchar 30 是 trsignature varchar 30 是 trlessonscount int 4 是 tcdepartment varchar 30 是 tcname varchar 20 是 tcpost varchar 20 是 tcout varchar 10 是 表 -10 課名表 字段 類型 大小 允許為空 tscode int 4 tlesson varchar 30 是 表 -11 試卷登記表 字段 類型 大小 允許為空 ttestno varchar 30 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： tlessonname varchar 30 是 tname varchar 30 是 tclassname varchar 30 是 ttestcount varchar 30 是 tquestion varchar 30 是 tmemo varchar 50 是 1.5. 系統(tǒng)數(shù)據(jù)流圖 0 層數(shù)據(jù)流圖 ： 用 戶計(jì) 科 教 務(wù) 管 理系 統(tǒng)用 戶 命 令用 戶 操 作 信 息顯 示 信 息顯 示 面 板 1 層數(shù)據(jù)流圖： 用 戶 命 令 處 理4系 統(tǒng) 配 置5配 置 命 令用 戶 信 息 權(quán) 限 記 錄配 置 數(shù) 據(jù)口 令啟 動 命 令啟 動 / 停 止處 理2口 令 核 對3口 令口 令 有 效口 令 無 效系 統(tǒng) 操 作1啟動/停止信息顯示用 戶 權(quán) 限 數(shù) 據(jù)顯 示 信 息用 戶 操 作 信 息用 戶 命 令 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 2 層數(shù)據(jù)流圖： 操 作 權(quán) 限 處 理1 . 1權(quán) 限 處 理 信 息操 作 信 息操 作 數(shù) 據(jù) 記 錄權(quán) 限 數(shù) 據(jù)操 作 處 理1 . 2操 作 數(shù) 據(jù)操 作 信 息顯 示 信 息 處 理1 . 3處 理 信 息 顯 示 信 息啟 動 信 息停 止 信 息 3 層數(shù)據(jù)流圖 : 用 戶 信 息 處理1 . 2 . 1用 戶 操 作 信 息用 戶 記 錄用 戶 操 作 數(shù) 據(jù)角 色 信 息角 色 信 息 處理1 . 2 . 2角 色 記 錄角 色 操 作 數(shù) 據(jù)處 理 信 息功 能 權(quán) 限 記 錄權(quán) 限 操 作 數(shù) 據(jù)處 理 信 息 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 信 息 處 理1 . 2 . 3試 卷 檔 案 / 課 程 表 / 總課 表 / 教 師 信 息 / 課 程名 操 作 信 息數(shù) 據(jù) 庫 記 錄操 作 數(shù) 據(jù)處 理 信 息 課 酬 登 記 信息 處 理1 . 2 . 4課 酬 操 作 信 息課 酬 登 記 記 錄課 酬 登 記 操 作 數(shù) 據(jù)課 酬 登 記 信 息課 酬 發(fā) 放 信息 處 理1 . 2 . 5課 酬 信 息 記 錄課 酬 發(fā) 放 操 作 數(shù) 據(jù)處 理 信 息課 酬 統(tǒng) 計(jì) 記 錄課 酬 統(tǒng) 計(jì) 操 作 數(shù) 據(jù)課 酬 統(tǒng) 計(jì)信 息 處 理1 . 2 . 6課 酬 發(fā) 放 信 息處 理 信 息 處 理 信 息 查 詢 信 息 處 理1 . 2 . 7查 詢 操 作 信 息 處 理 信 息查 詢 信 息 記 錄查 詢 操 作 數(shù) 據(jù) 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 第五章 系統(tǒng)的實(shí)現(xiàn) 5.1. 登陸窗體的設(shè)計(jì) 在登陸界面進(jìn)行系統(tǒng)用戶的驗(yàn)證 ,只有合法用用才可以登陸系統(tǒng) 如 圖 5-1 圖 5-1 “登陸 ”的主要功能代碼為 : 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： procedure TLogonForm.Button1Click(Sender: TObject)； begin if (edit1.text=) then begin application.MessageBox(用戶名不能為空 ,錯誤提示 ,mb_ok)； count:=count+1； if (count=3) then begin application.MessageBox(用戶名或密碼輸入錯誤三次，系統(tǒng)即將退出！ ,提示 ,mb_ok)； application.Terminate； end； edit2.Text:=； edit1.SetFocus； end else if checkuser(edit1.Text,edit2.Text)=false then begin application.MessageBox(用戶名或密碼輸入有誤 ,錯誤提示 ,mb_ok)； count:=count+1； if (count=3) then begin application.MessageBox(用戶名或密碼輸入錯誤三次，系統(tǒng)即將退出！ ,提示 ,mb_ok)； application.Terminate； end； edit2.Text:=； edit1.SetFocus； end else if checkuser(edit1.Text,edit2.Text)=true then begin logonForm.Close； end ； end； function TLogonForm.checkuser(uname, upwd: string): boolean； var userquery:TAdoquery； sqlstr:string； begin userquery:=TAdoquery.Create(self)； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： with userquery do begin connection :=dm.ADOConnection1； sqlstr:=select * from Tuser where UName=:uname and UPassWord=:upwd； sql.Text:=sqlstr； parameters.ParamByName(uname).Value:=uname； parameters.ParamByName(upwd).Value:=upwd； active:=true； try if recordcount0 then begin result:=true； dm.uno:=fieldbyname(uno).AsString； dm.uname:=fieldbyname(uname).AsString； end else result:=false； finally close； free； end； end； end； procedure TLogonForm.Edit1KeyPress(Sender: TObject； var Key: Char)； begin if key=#13 then Perform(WM_NEXTDLGCTL, 0, 0)； end； procedure TLogonForm.Edit2KeyPress(Sender: TObject； var Key: Char)； begin if key=#13 then begin button1.Click； end； end； procedure TLogonForm.FormShow(Sender: TObject)； begin edit1.SetFocus； end； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： procedure TLogonForm.FormCloseQuery(Sender: TObject； var CanClose: Boolean)； begin if dm.uno= then application.Terminate ； end； end. 5.2. 程序主界面設(shè)計(jì) 系統(tǒng)的主界面設(shè)計(jì)結(jié)果如 圖 5-2 圖 5-2 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 系統(tǒng)各個功能模塊都在主界面模塊里調(diào)用 比如 點(diǎn)擊 “用戶角色 ” 系統(tǒng)將進(jìn)入 系統(tǒng)角色管理頁面 如圖 5-3 圖 5-3 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： “角色管理 ” 模塊的主要功能那代碼為 : private function getAutoRno: string；/自動獲取角色編號 procedure ControlTheEnablePro(isSaved: Boolean)；/控制按鈕面板的 Enable 屬性 procedure SaveTvToRoleFunc()；/通過樹增加角色功能 /鼠標(biāo)滾動 DBGrid 的數(shù) 據(jù)跟著改變 procedure GridMouseWheel(Sender: TObject； Shift: TShiftState； WheelDelta: Integer； MousePos: TPoint； var Handled: Boolean)； Private declarations public procedure CheckTv()； function isRnameExist(Rname: string): Boolean； Public declarations end； TControlAccess = class(TControl)； var RoleForm: TRoleForm； Isparentnode:Boolean=false； flag: integer=0； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： implementation uses DataModul, mainunit,Math, public_unit, User_M； $R *.dfm procedure TRoleForm.FormCreate(Sender: TObject)； begin adoquery1.Open； ControlTheEnablePro(true)； with adoquery1 do begin edit1.Text := fieldByName(Rno).AsString； edit2.Text := fieldByName(Rname).AsString； edit3.Text := fieldByname(Rmemo).AsString； end； TControlAccess(DBGrid1).OnMouseWheel := GridMouseWheel； end； procedure TRoleForm.FormClose(Sender: TObject； var Action: TCloseAction)； begin adoquery1.Close； Action := caFree； RoleForm := nil； end； /procedure RoleForm.ControlTheEnablePro(isSaved: Boolean)； /begin /end； /自動獲取角色編號 /* function TRoleForm.getAutoRno: string； var adoqury: TADOQuery； t: integer； begin adoqury := TADOQuery.Create(self)； with adoqury do begin Connection := dm.ADOConnection1； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： SQL.Text := SELECT MAX(Rno) as Rno FROM TRole； Open； t := StrToInt(fieldbyName(Rno).AsString)； t := 1000 + t + 1； result := Copy(IntToStr(t), 2, 3)； end； adoqury.Free； end； /* procedure TRoleForm.SaveTvToRoleFunc； var sqlStr: string； Node: TfcTreeNode； i: integer； begin for i := 0 to fcTreeView.Items.Count - 1 do begin Node := fcTreeView.Itemsi； if Node.Checked then begin sqlStr := INSERT TRoleFunction(Rno, Fno) VALUES( +QuotedStr(edit1.Text) + , +QuotedStr(Node.StringData) +)； ToExecSQL(sqlStr, DM.ADOConnection1)； end； end； end； procedure TRoleForm.FormShow(Sender: TObject)； var PNode, CNode: TfcTreeNode； PRoleFunQry, CRoleFunQry: TADOQuery； pFname, pFno, cFname, cFno: string； begin PRoleFunQry := TADOQuery.Create(self)； CRoleFunQry := TADOQuery.Create(self)； with PRoleFunQry do begin Connection := DM.ADOConnection1； SQL.Text := SELECT FNO, FName From TFunction WHERE Flevel=0； open； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： while not Eof do begin pFname := fieldByName(FName).AsString； pFno := fieldByName(FNo).AsString； PNode := fcTreeView.Items.Add(nil, pFname)； PNode.StringData := pFno； PNode.StringData2 := pFname； PNode.CheckboxType := tvctCheckbox； with CRoleFunQry do begin Connection := DM.ADOConnection1； SQL.Text := SELECT FNO, FName From TFunction + WHERE Flevel=1 AND Fpater= + QuotedStr(pFno)； Open； While not Eof do begin cFname := fieldByName(FName).AsString； cFno := fieldByName(FNo).AsString； CNode := fcTreeView.Items.AddChild(PNode, cFname)； CNode.StringData := CFno； CNode.StringData2 := cFname； CNode.CheckboxType := tvctCheckbox； Next； end； end； Next； end； end； PRoleFunQry.Free； CRoleFunQry.Free； CheckTv； fcTreeView.FullExpand； end； procedure TRoleForm.fcTreeViewToggleCheckbox(TreeView: TfcCustomTreeView； Node: TfcTreeNode)； var i:integer； Ischildnode:integer； begin if isparentnode=true then exit； if node.Parent=nil then begin 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： if node.Checked then for i:=0 to node.Count-1 do node.Itemi.Checked:=true else for i:=0 to node.Count-1 do node.Itemi.Checked:=false； end else begin Ischildnode:=0； for i:=0 to node.Parent.Count - 1 do if node.Parent.Itemi.Checked=true then Ischildnode:=1； isparentnode:=true； if Ischildnode=1 then node.Parent.Checked:=true else node.Parent.Checked:=false； Isparentnode:=false； end； end； procedure TRoleForm.CheckTv； var RoleFunQry: TADOQuery； Fno: string； i: Integer； begin RoleFunQry := TADOQuery.Create(self)； with RoleFunQry do begin Connection := DM.ADOConnection1； SQL.Text := SELECT FNO FROM TRoleFunction WHERE Rno= + QuotedStr(adoquery1.fieldByName(Rno).AsString)； Open； While not Eof do begin Fno := fieldbyName(Fno).AsString； for i := 0 to fcTreeView.Items.Count - 1 do begin if(fcTreeView.Itemsi.StringData = Fno) and (fcTreeView.Itemsi.Parentnil)then fcTreeView.Itemsi.Checked := True； end； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： Next； end； end； RoleFunQry.Free； end； procedure TRoleForm.ADOQuery1AfterScroll(DataSet: TDataSet)； var i: integer； begin for i := 0 to fcTreeView.Items.Count - 1 do begin fcTreeView.Itemsi.Checked := False； end； CheckTv； with adoquery1 do begin edit1.Text := fieldByName(Rno).AsString； edit2.Text := fieldByName(Rname).AsString； edit3.Text := fieldByname(Rmemo).AsString； end； end； procedure TRoleForm.Edit2KeyPress(Sender: TObject； var Key: Char)； begin if key=#13 then begin if edit2.Text = then application.MessageBox(請輸入角色名稱 , 提示消息 , MB_ICONINFORMATION) else if isRnameExist(edit2.Text) then Application.MessageBox( 角色名已存在 , 角色名不可以重復(fù) !, 提示消息 , MB_ICONINFORMATION) else Perform(WM_NEXTDLGCTL, 0, 0)； end； end； procedure TRoleForm.BitBtn1Click(Sender: TObject)； var i: integer； begin flag:=1； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： for i := 0 to fcTreeView.Items.Count - 1 do begin fcTreeView.Itemsi.Checked := false； end； ControlTheEnablePro(false)； clearText(self)； edit1.Text := getAutoRno； edit2.SetFocus； end； procedure TRoleForm.BitBtn2Click(Sender: TObject)； var sqlStr: string； RoleQry:Tadoquery； begin if messagebox(handle, 您 確 定 要 刪 除 嗎 ？ , 提示 ,MB_YESNO + MB_ICONQUESTION)=ID_yes then begin RoleQry:= Tadoquery.Create(self)； with RoleQry do begin Connection := DM.ADOConnection1； sql.Text :=select distinct R.Rno from TRole R +inner join TUserRole UR on R.Rno=UR.Rno +inner join TUser U on UR.Uno=U.Uno +where R.Rno =+ QuotedStr(adoquery1.fieldbyname(Rno).AsString)； Open； if(adoquery1.FieldByName(Rno).AsString = 001) then application.MessageBox(系統(tǒng)管理員不能被刪除 !,警告 , mb_IconError) else if RoleQry.RecordCount0 then begin application.MessageBox(該角色暫時不能被刪除 !,警告 , mb_IconError)； end else if Application.MessageBox(確認(rèn)刪除 , 刪除消息 , MB_ICONQUESTION + MB_YESNO) = ID_YES then begin sqlStr:= DELETE TRoleFunction WHERE Rno= + QuotedStr(adoquery1.fieldbyname(Rno).AsString)； ToExecSQL(sqlStr, DM.ADOConnection1)； sqlStr := DELETE TRole WHERE Rno= + QuotedStr(adoquery1.fieldbyname(Rno).AsString)； adoquery1.Close； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： ToExecSQL(sqlStr, DM.ADOConnection1)； adoquery1.Open； Application.MessageBox(刪除成功 , 提示消息 ,MB_ICONINFORMATION)； end； end； RoleQry.Free； ControlTheEnablePro(true)； end； end； procedure TRoleForm.BitBtn3Click(Sender: TObject)； begin /if(adoquery1.FieldByName(Rno).AsString = 001) then / application.MessageBox(系統(tǒng)管理員不能被修改 !,警告 , mb_IconError) / else / begin flag:=2； ControlTheEnablePro(false)； edit2.SetFocus； / end； end； procedure TRoleForm.BitBtn4Click(Sender: TObject)； begin flag:=0； ControlTheEnablePro(true)； adoquery1.Close； adoquery1.Open； CheckTv； end； procedure TRoleForm.BitBtn5Click(Sender: TObject)； var sqlStr: string； begin if edit2.Text= then begin Application.MessageBox(輸入角色名稱 , 提示消息 , MB_ICONINFORMATION)； edit2.SetFocus； end else If isTvChecked(fcTreeView)=false then begin 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： application.MessageBox(請選擇樹分配權(quán)限 , 提示消息 , MB_ICONINFORMATION)； fcTreeView.SetFocus； end else begin if flag=1 then begin if isRnameExist(edit2.Text) then begin Application.MessageBox( 角色名已存在 !, 提示消息 , MB_ICONINFORMATION)； edit2.SetFocus； end else begin adoquery1.Close； sqlStr := INSERT TRole(Rno, Rname, RMemo) VALUES( + QuotedStr(edit1.Text) + , + QuotedStr(edit2.Text) + , + QuotedStr(edit3.Text) +)； ToExecSQL(sqlStr, DM.adoconnection1)； SaveTvToRoleFunc；/對角色 功能表 的編號同時添加上去 adoquery1.Open； Application.MessageBox( 角 色 添 加 成 功 , 提 示 消 息,MB_ICONINFORMATION)； end； end； if flag=2 then begin adoquery1.Close； sqlStr := UPDATE TRole SET Rname= + QuotedStr(edit2.Text) + , + Rmemo= + QuotedStr(edit3.Text) + WHERE Rno= + QuotedStr(edit1.Text)； ToExecSQL(sqlStr, DM.adoconnection1)； /刪除角色功能 sqlStr := DELETE TRolefunction WHERE Rno= + QuotedStr(edit1.Text)； ToExecSQL(sqlStr, DM.adoconnection1)； /增加角色功能 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： SaveTvToRoleFunc； adoquery1.Open； Application.MessageBox( 角 色 修 改 成 功 , 提 示 消 息,MB_ICONINFORMATION)； end； ControlTheEnablePro(true)； flag:=0； end； end； function TRoleForm.isRnameExist(Rname: string): Boolean； var SqlStr: string； tempQry: TADOQuery； begin sqlStr := SELECT * FROM TRole WHERE Rname= + QuotedStr(edit2.Text)； tempQry := ToGetDataSQL(SqlStr, DM.adoconnection1)； if tempQry.RecordCount 0 then result := true else result := false； end； procedure TRoleForm.BitBtn6Click(Sender: TObject)； begin close； end； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： 5.3. 用戶管理窗口的設(shè)計(jì) 系統(tǒng)用戶管理的主要功能是實(shí)現(xiàn)系統(tǒng)用戶的管理 ,權(quán)限管理 ,等 如 圖 5-3 圖 5-4 在 ”用戶管理 ” 模塊里可以對系統(tǒng)的用戶方便的進(jìn)行管理 : 主要功能代碼為 : procedure TUserForm.FormCreate(Sender: TObject)； begin enable(self)； edNO.Enabled:=true； edName1.Enabled:=true； ControlTheEnablePro(true)； adoqUser.Open； 無憂無慮畢設(shè)網(wǎng) ():畢業(yè)設(shè)計(jì)源碼下載 畢業(yè)設(shè)計(jì)源碼下載： StatusBar1.Panels0.Text:= 當(dāng)前的記錄數(shù) : + IntToStr(adoqUser.RecordCount+1) + 條 ； StatusBar1.Panels1.Text := 操作用戶管理窗口 ； StatusBar1.Panels2.Text := 請慎重操作 ！ ； TControlAccess(DBGrid).OnMouseWheel := GridMouseWheel； end； /鼠標(biāo)滾動 DBGrid 的數(shù)據(jù)跟著改變 procedure TUserForm.GridMouseWheel(Sender: TObject； Shift: TShiftState； WheelDelta: Integer； MousePos: TPoint； var Handled: Boolean)； begin TDBGrid(Sender).DataSource.DataSet.MoveBy(-WheelDelta div WHEEL_DELTA)； Handled := True； end； procedure TUserForm.FormShow(Sender: TObject)； var userQry: T