【正文】 完美WORD格式 教務(wù)管理系統(tǒng)數(shù)據(jù)庫(SQL Server 2008 + delphi7)實驗報告班級：7 姓名：787 學(xué)號：787 指導(dǎo)教師： 完成日期： 目錄第一章 系統(tǒng)概述……………………………………………3第二章 系統(tǒng)分析……………………………………………3 第三章 系統(tǒng)設(shè)計……………………………………………4第四章 系統(tǒng)功能……………………………………………9第五章 系統(tǒng)實現(xiàn)……………………………………………9第六章 源程序附錄…………………………………………15第七章 參考文獻……………………………………………73第一章 系統(tǒng)概述 學(xué)校學(xué)生管理信息系統(tǒng)是針對學(xué)校人事處的大量業(yè)務(wù)處理工作而開發(fā)的管理軟件，是典型的管理信息系統(tǒng)（Management Information System）。它是一個教育單位不可缺少的部分,它的內(nèi)容對于學(xué)校的決策者和管理者來說都至關(guān)重要,它能夠為用戶提供充足的信息和快捷的查詢手段。能有效的幫助學(xué)校和老師掌握學(xué)生的情況，為學(xué)生提供成績跟課程方面的查詢。 本系統(tǒng)是以delphi7編輯用戶界面，以SQL server 2008為數(shù)據(jù)源后臺而成的學(xué)生信息管理系統(tǒng)。本系統(tǒng)是以計算機為基礎(chǔ)，由人和計算機結(jié)合的對信息進行收集、存儲、維護、加工、傳遞和使用的一種管理系統(tǒng)，其目的是使人流、物流、資金流和信息流處于最佳狀態(tài)，以最少的資源投入獲得最佳的綜合效益。本系統(tǒng)主要包括學(xué)生信息管理模塊、教師信息管理模塊、課程信息管理模塊、成績信息管理模塊和系統(tǒng)維護模塊等部分。在校務(wù)管理中，為有關(guān)部門提供完整、綜合、共享的信息，對于學(xué)校的教育管理、教務(wù)和科研等都有很大的實用價值。第二章 系統(tǒng)分析 問題定義 隨著科學(xué)技術(shù)的不斷提高，計算機科學(xué)日漸成熟，其強大功能已為人們深刻認(rèn)識，它已進入人們生活的各個領(lǐng)域，并發(fā)揮了越來越重要的作用，針對人工管理的缺點，最好的解決辦法就是借助計算機技術(shù)提供一個電子化的學(xué)生信息管理平臺。為了更好地管理學(xué)生和教職工的資料文檔，我開發(fā)一個軟件工程學(xué)生信息管理系統(tǒng)。教師和學(xué)生可以應(yīng)用該系統(tǒng)實現(xiàn)如下功能：可隨時查詢出不同系及各系教師與各系學(xué)生情況，系、教師與學(xué)生各反映如下情況：系：系號、系名、系負(fù)責(zé)人、專業(yè)數(shù)等。教師：工號、姓名、性別、職稱、工齡、出生年月、基本工資等。學(xué)生：學(xué)號、姓名、性別、年齡等。為簡單起見教師與學(xué)生區(qū)分系別，而課程不分系，課程需反映如下信息：課程代號、課程名、課時數(shù)、必修課、學(xué)分。學(xué)生入學(xué)時新生需錄入登記，登記后即可選課學(xué)習(xí)課程(一學(xué)期約20學(xué)分)。一門只由一位教師上，一位教師可上多門課，滿30人才開課。學(xué)生選每門課有個成績，若成績不及格則補考后還需記錄補考成績。1)在某數(shù)據(jù)庫管理系統(tǒng)中建立各關(guān)系模式對應(yīng)的庫表，并設(shè)計所需的視圖、索引等。2)能對各庫表進行輸入、修改、刪除、添加、查詢、打印等基本操作。3)新生入校登記后可即時選課，老生每學(xué)期開始前可選課或作選課調(diào)整，一般要選共約20學(xué)分的若干門課程。4)能明細查詢某學(xué)生的選課情況及某課程的選修學(xué)生情況。5)能統(tǒng)計查詢出某學(xué)生的成績單(包括總成績、平均成績、不及格門數(shù)等)及某門課的選課人數(shù)、最高分、最低分、平均成績等統(tǒng)計信息。6)能分析出某教師的教學(xué)質(zhì)量情況(可根據(jù)該教師所任所有課優(yōu)良數(shù)平均超過一定百分比來粗略評定)。7)其他你認(rèn)為子系統(tǒng)應(yīng)有的查詢、統(tǒng)計功能。8)要求子系統(tǒng)設(shè)計得界面友好，功能選擇方便合理，并適當(dāng)考慮子系統(tǒng)在其安全性、完整性、備份、恢復(fù)等方面的功能要求可行性分析1．項目目標(biāo)：學(xué)生和老師可以方便的進行各自所需要的信息管理活動，同時可以查詢和修改各自的信息，以便學(xué)校管理。2．運行環(huán)境：（1）以Windows98 以上/ME/2000/XP作為學(xué)生選課管理系統(tǒng)的后臺操作系統(tǒng)。（2）前臺開發(fā)程序為DELPHI，SQL Server 2008。（3）后臺數(shù)據(jù)SQL Server 2008。（4）主要硬件設(shè)備：PC機一臺。3．技術(shù)可行性:本系統(tǒng)僅僅簡單的實現(xiàn)了教務(wù)管理系統(tǒng)的基本功能和需求，具有一定的實用性。但真正意義上的大型信息管理存儲還是不太現(xiàn)實。對于大量信息的維護也不具有很強的穩(wěn)定性。但是操作簡單，適合小型的學(xué)生信息管理，維護也更為方便。技術(shù)要求也不是很高，有一點delphi和SQL server 技術(shù)基礎(chǔ)就行了。：成本低，出錯率低，使學(xué)校實現(xiàn)現(xiàn)代化網(wǎng)絡(luò)教學(xué)管理。第三章 系統(tǒng)設(shè)計根據(jù)該系統(tǒng)的需求，數(shù)據(jù)庫采用Microsoft SQL Server 2008 ，它完全設(shè)和本系統(tǒng)的工作需求，它所支持的字段數(shù)據(jù)類型包括數(shù)值、字符、日期時間及二進制和圖片等類型，是當(dāng)前的主流數(shù)據(jù)庫產(chǎn)品之一。它還具有性能穩(wěn)定、便于操作維護和具有較好的安全可靠性等特點，是作為服務(wù)器端數(shù)據(jù)庫平臺的理想選擇。根據(jù)系統(tǒng)的需求，系統(tǒng)用到的各種數(shù)據(jù)表如下圖所示。學(xué)生信息表 教師信息表 課程信息表 管理信息表 教師課程表成績信息表表與表之間的關(guān)系如下圖所示： 成績評定查詢成績查詢課程查詢新增刪除修改查詢查詢修改密碼修改密碼修改密碼個人信息個人信息個人信息網(wǎng)上選課開通選課修改新增刪除修改新增刪除管理員教職工學(xué)生 ER 關(guān)系圖第四章 系統(tǒng)功能1. 學(xué)生模塊此模塊為學(xué)生操作模塊。學(xué)生可以通過此模塊實現(xiàn)查看個人信息、修改密碼、查看課程信息、才查看成績信息、網(wǎng)上選課（在管理員開通選課前提下）諸多功能。2. 教職工模塊此模塊為教職工操作模塊。教職工可以通過此模塊實現(xiàn)查看個人信息、修改密碼、查看課程信息、輸入學(xué)生平時成績和期末成績諸多功能。3. 系統(tǒng)管理員模塊此模塊為系統(tǒng)管理員操作模塊。系統(tǒng)管理員可以通過此模塊實現(xiàn)查看管理員信息、修改密碼、查看、新增、修改、刪除學(xué)生信息、查看、新增、刪除、修改教職工信息、查看、新增、刪除、修改課程信息、開通、關(guān)閉選課諸多功能。第五章 系統(tǒng)實現(xiàn)（1）查看個人信息（2）修改密碼（3）成績查詢（4）課程查詢（5）網(wǎng)上選課 選課提示選課界面已選提示 成功提示 刪除提示4. 教職工界面（1） 個人信息（同學(xué)生界面）（2） 修改密碼（同學(xué)生界面）（3） 課程查詢（同學(xué)生界面）（4） 成績評定5. 管理員界面（1） 個人信息（同學(xué)生界面）（2） 修改密碼（同學(xué)生界面）（3） 學(xué)生查詢管理 （4） 學(xué)生信息修改（5） 教師信息查詢（6） 教師信息修改（7） 課程信息查詢（8） 課程信息修改（9） 成績查詢第六章 源程序附錄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)退出整個系統(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。賬 號 39。 1::=39。工 號 39。 else :=39。學(xué) 號 39。end。 end。procedure (Sender: TObject)。begin if = then begin case of 0:begin 。 。 :=39。select * from 管理信息表 where 賬號=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。用戶名或密碼錯誤，請重新登錄39。)。 end else begin 。 。 :=False。 end。 end。 1:begin 。 。 :=39。select * from 管理信息表 where 賬號=39。39。39。++39。3