【正文】 精選資料教務(wù)管理系統(tǒng)數(shù)據(jù)庫(SQL Server 2008 + delphi7)實(shí)驗(yàn)報(bào)告班級(jí)：7 姓名：787 學(xué)號(hào)：787 指導(dǎo)教師： 完成日期： 目錄第一章 系統(tǒng)概述……………………………………………3第二章 系統(tǒng)分析……………………………………………3 第三章 系統(tǒng)設(shè)計(jì)……………………………………………4第四章 系統(tǒng)功能……………………………………………9第五章 系統(tǒng)實(shí)現(xiàn)……………………………………………9第六章 源程序附錄…………………………………………15第七章 參考文獻(xiàn)……………………………………………73第一章 系統(tǒng)概述 學(xué)校學(xué)生管理信息系統(tǒng)是針對(duì)學(xué)校人事處的大量業(yè)務(wù)處理工作而開發(fā)的管理軟件，是典型的管理信息系統(tǒng)（Management Information System）。它是一個(gè)教育單位不可缺少的部分,它的內(nèi)容對(duì)于學(xué)校的決策者和管理者來說都至關(guān)重要,它能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄?。能有效的幫助學(xué)校和老師掌握學(xué)生的情況，為學(xué)生提供成績(jī)跟課程方面的查詢。 本系統(tǒng)是以delphi7編輯用戶界面，以SQL server 2008為數(shù)據(jù)源后臺(tái)而成的學(xué)生信息管理系統(tǒng)。本系統(tǒng)是以計(jì)算機(jī)為基礎(chǔ)，由人和計(jì)算機(jī)結(jié)合的對(duì)信息進(jìn)行收集、存儲(chǔ)、維護(hù)、加工、傳遞和使用的一種管理系統(tǒng)，其目的是使人流、物流、資金流和信息流處于最佳狀態(tài)，以最少的資源投入獲得最佳的綜合效益。本系統(tǒng)主要包括學(xué)生信息管理模塊、教師信息管理模塊、課程信息管理模塊、成績(jī)信息管理模塊和系統(tǒng)維護(hù)模塊等部分。在校務(wù)管理中，為有關(guān)部門提供完整、綜合、共享的信息，對(duì)于學(xué)校的教育管理、教務(wù)和科研等都有很大的實(shí)用價(jià)值。第二章 系統(tǒng)分析 問題定義 隨著科學(xué)技術(shù)的不斷提高，計(jì)算機(jī)科學(xué)日漸成熟，其強(qiáng)大功能已為人們深刻認(rèn)識(shí)，它已進(jìn)入人們生活的各個(gè)領(lǐng)域，并發(fā)揮了越來越重要的作用，針對(duì)人工管理的缺點(diǎn)，最好的解決辦法就是借助計(jì)算機(jī)技術(shù)提供一個(gè)電子化的學(xué)生信息管理平臺(tái)。為了更好地管理學(xué)生和教職工的資料文檔，我開發(fā)一個(gè)軟件工程學(xué)生信息管理系統(tǒng)。教師和學(xué)生可以應(yīng)用該系統(tǒng)實(shí)現(xiàn)如下功能：可隨時(shí)查詢出不同系及各系教師與各系學(xué)生情況，系、教師與學(xué)生各反映如下情況：系：系號(hào)、系名、系負(fù)責(zé)人、專業(yè)數(shù)等。教師：工號(hào)、姓名、性別、職稱、工齡、出生年月、基本工資等。學(xué)生：學(xué)號(hào)、姓名、性別、年齡等。為簡(jiǎn)單起見教師與學(xué)生區(qū)分系別，而課程不分系，課程需反映如下信息：課程代號(hào)、課程名、課時(shí)數(shù)、必修課、學(xué)分。學(xué)生入學(xué)時(shí)新生需錄入登記，登記后即可選課學(xué)習(xí)課程(一學(xué)期約20學(xué)分)。一門只由一位教師上，一位教師可上多門課，滿30人才開課。學(xué)生選每門課有個(gè)成績(jī)，若成績(jī)不及格則補(bǔ)考后還需記錄補(bǔ)考成績(jī)。1)在某數(shù)據(jù)庫管理系統(tǒng)中建立各關(guān)系模式對(duì)應(yīng)的庫表，并設(shè)計(jì)所需的視圖、索引等。2)能對(duì)各庫表進(jìn)行輸入、修改、刪除、添加、查詢、打印等基本操作。3)新生入校登記后可即時(shí)選課，老生每學(xué)期開始前可選課或作選課調(diào)整，一般要選共約20學(xué)分的若干門課程。4)能明細(xì)查詢某學(xué)生的選課情況及某課程的選修學(xué)生情況。5)能統(tǒng)計(jì)查詢出某學(xué)生的成績(jī)單(包括總成績(jī)、平均成績(jī)、不及格門數(shù)等)及某門課的選課人數(shù)、最高分、最低分、平均成績(jī)等統(tǒng)計(jì)信息。6)能分析出某教師的教學(xué)質(zhì)量情況(可根據(jù)該教師所任所有課優(yōu)良數(shù)平均超過一定百分比來粗略評(píng)定)。7)其他你認(rèn)為子系統(tǒng)應(yīng)有的查詢、統(tǒng)計(jì)功能。8)要求子系統(tǒng)設(shè)計(jì)得界面友好，功能選擇方便合理，并適當(dāng)考慮子系統(tǒng)在其安全性、完整性、備份、恢復(fù)等方面的功能要求可行性分析1．項(xiàng)目目標(biāo)：學(xué)生和老師可以方便的進(jìn)行各自所需要的信息管理活動(dòng)，同時(shí)可以查詢和修改各自的信息，以便學(xué)校管理。2．運(yùn)行環(huán)境：（1）以Windows98 以上/ME/2000/XP作為學(xué)生選課管理系統(tǒng)的后臺(tái)操作系統(tǒng)。（2）前臺(tái)開發(fā)程序?yàn)镈ELPHI，SQL Server 2008。（3）后臺(tái)數(shù)據(jù)SQL Server 2008。（4）主要硬件設(shè)備：PC機(jī)一臺(tái)。3．技術(shù)可行性:本系統(tǒng)僅僅簡(jiǎn)單的實(shí)現(xiàn)了教務(wù)管理系統(tǒng)的基本功能和需求，具有一定的實(shí)用性。但真正意義上的大型信息管理存儲(chǔ)還是不太現(xiàn)實(shí)。對(duì)于大量信息的維護(hù)也不具有很強(qiáng)的穩(wěn)定性。但是操作簡(jiǎn)單，適合小型的學(xué)生信息管理，維護(hù)也更為方便。技術(shù)要求也不是很高，有一點(diǎn)delphi和SQL server 技術(shù)基礎(chǔ)就行了。：成本低，出錯(cuò)率低，使學(xué)校實(shí)現(xiàn)現(xiàn)代化網(wǎng)絡(luò)教學(xué)管理。第三章 系統(tǒng)設(shè)計(jì)根據(jù)該系統(tǒng)的需求，數(shù)據(jù)庫采用Microsoft SQL Server 2008 ，它完全設(shè)和本系統(tǒng)的工作需求，它所支持的字段數(shù)據(jù)類型包括數(shù)值、字符、日期時(shí)間及二進(jìn)制和圖片等類型，是當(dāng)前的主流數(shù)據(jù)庫產(chǎn)品之一。它還具有性能穩(wěn)定、便于操作維護(hù)和具有較好的安全可靠性等特點(diǎn)，是作為服務(wù)器端數(shù)據(jù)庫平臺(tái)的理想選擇。根據(jù)系統(tǒng)的需求，系統(tǒng)用到的各種數(shù)據(jù)表如下圖所示。學(xué)生信息表 教師信息表 課程信息表 管理信息表 教師課程表成績(jī)信息表表與表之間的關(guān)系如下圖所示： 成績(jī)?cè)u(píng)定查詢成績(jī)查詢課程查詢新增刪除修改查詢查詢修改密碼修改密碼修改密碼個(gè)人信息個(gè)人信息個(gè)人信息網(wǎng)上選課開通選課修改新增刪除修改新增刪除管理員教職工學(xué)生 ER 關(guān)系圖第四章 系統(tǒng)功能1. 學(xué)生模塊此模塊為學(xué)生操作模塊。學(xué)生可以通過此模塊實(shí)現(xiàn)查看個(gè)人信息、修改密碼、查看課程信息、才查看成績(jī)信息、網(wǎng)上選課（在管理員開通選課前提下）諸多功能。2. 教職工模塊此模塊為教職工操作模塊。教職工可以通過此模塊實(shí)現(xiàn)查看個(gè)人信息、修改密碼、查看課程信息、輸入學(xué)生平時(shí)成績(jī)和期末成績(jī)諸多功能。3. 系統(tǒng)管理員模塊此模塊為系統(tǒng)管理員操作模塊。系統(tǒng)管理員可以通過此模塊實(shí)現(xiàn)查看管理員信息、修改密碼、查看、新增、修改、刪除學(xué)生信息、查看、新增、刪除、修改教職工信息、查看、新增、刪除、修改課程信息、開通、關(guān)閉選課諸多功能。第五章 系統(tǒng)實(shí)現(xiàn)（1）查看個(gè)人信息（2）修改密碼（3）成績(jī)查詢（4）課程查詢（5）網(wǎng)上選課 選課提示選課界面已選提示 成功提示 刪除提示4. 教職工界面（1） 個(gè)人信息（同學(xué)生界面）（2） 修改密碼（同學(xué)生界面）（3） 課程查詢（同學(xué)生界面）（4） 成績(jī)?cè)u(píng)定5. 管理員界面（1） 個(gè)人信息（同學(xué)生界面）（2） 修改密碼（同學(xué)生界面）（3） 學(xué)生查詢管理 （4） 學(xué)生信息修改（5） 教師信息查詢（6） 教師信息修改（7） 課程信息查詢（8） 課程信息修改（9） 成績(jī)查詢第六章 源程序附錄unit Unit1。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls,Unit2, jpeg, DB, ADODB。type TForm1 = class(TForm) Button1: TButton。 Button2: TButton。 Panel1: TPanel。 Image1: TImage。 Label1: TLabel。 Label2: TLabel。 ADOConnection1: TADOConnection。 Timer1: TTimer。 procedure Button1Click(Sender: TObject)。 procedure Button2Click(Sender: TObject)。 procedure Timer1Timer(Sender: TObject)。 private { Private declarations } public { Public declarations } end。var Form1: TForm1。implementation{$R *.dfm}procedure (Sender: TObject)。begin (,nil,alNone)。 。 :=True。end。procedure (Sender: TObject)。begin if MessageDlg(39。確認(rèn)退出整個(gè)系統(tǒng)嗎？39。,mtConfirmation,[mbYes,mbNo],0)=mrYes then begin 。 end。end。procedure (Sender: TObject)。begin :=DateTimeToStr(Now)。end。end.unit Unit2。interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB,Unit3。type TForm2 = class(TForm) Label1: TLabel。 Label2: TLabel。 Label3: TLabel。 ComboBox1: TComboBox。 Edit1: TEdit。 Edit2: TEdit。 Button1: TButton。 Button2: TButton。 ADOConnection1: TADOConnection。 ADOQuery1: TADOQuery。 Label4: TLabel。 Button3: TButton。 Label5: TLabel。 Edit3: TEdit。 procedure ComboBox1Change(Sender: TObject)。 procedure Button1Click(Sender: TObject)。 procedure Button2Click(Sender: TObject)。 procedure FormCreate(Sender: TObject)。 procedure Button3Click(Sender: TObject)。 procedure FormShow(Sender: TObject)。 private { Private declarations } public { Public declarations } end。var Form2: TForm2。implementation uses Unit1,Unit8,Unit12。{$R *.dfm}procedure (Sender: TObject)。begin case of 0::=39。賬 號(hào) 39。 1::=39。工 號(hào) 39。 else :=39。學(xué) 號(hào) 39。end。 end。procedure (Sender: TObject)。begin if = then begin case of 0:begin 。 。 :=39。select * from 管理信息表 where 賬號(hào)=39。39。39。++39。39。39。 AND 密碼=39。39。39。++39。39。39。 AND 用戶名=39。39。39。++39。39。39。39。 。 if =0 then begin ShowMessage(39。用戶名或密碼錯(cuò)誤，請(qǐng)重新登錄39。)。 end else begin 。 。 :=False。 end。 end。 1:begin 。 。 :=39。select * from 管理信息表 where 賬號(hào)=39。39。39。++39。39。39。and 密碼 =39。39。39。++39。39。39。and 用戶名 =39。39。39。++39。39。3