數(shù)據(jù)庫課程設(shè)計(jì)成績管理系統(tǒng)說明書

1、溫州大學(xué)數(shù)據(jù)庫課程設(shè)計(jì)說明書題 目： 成績管理系統(tǒng)學(xué) 院： 機(jī)電工程學(xué)院專 業(yè)： 工業(yè)工程班 級： 09工業(yè)工程學(xué)生姓名： 學(xué) 號： 指導(dǎo)教師： 完成日期： 20120105目錄第一章 系統(tǒng)分析1建立新系統(tǒng)的必要性學(xué)生成績管理系統(tǒng)是一個(gè)教育單位不可缺少的部分,它的內(nèi)容對于學(xué)校的決策者和管理者來說都至關(guān)重要,所以學(xué)生成績管理系統(tǒng)應(yīng)該能夠?yàn)橛脩籼峁┏渥愕男畔⒑涂旖莸牟樵兪侄危菐啄昵?，各個(gè)學(xué)校的學(xué)生成績管理基本上都是靠手工進(jìn)行，隨著各個(gè)學(xué)校的規(guī)模增大，有關(guān)學(xué)生成績管理工作所涉及的數(shù)據(jù)量越來越大，有的學(xué)校不得不靠增加人力、物力來進(jìn)行學(xué)生成績管理。這種管理方式存在著許多缺點(diǎn),如:效率低、保密性差,另

2、外所用其時(shí)間長,產(chǎn)生大量的文件和數(shù)據(jù),這對于查找、更新和維護(hù)都帶來了不少的困難。如今學(xué)校的學(xué)生越來越多，成績管理的工作量越來越大，手工管理成績的弊端也越來越明顯。隨著科學(xué)技術(shù)的不斷提高,計(jì)算機(jī)科學(xué)日漸成熟,其強(qiáng)大的功能已為人們深刻認(rèn)識,它已進(jìn)入人類社會的各個(gè)領(lǐng)域并發(fā)揮著越來越重要的作用。作為計(jì)算機(jī)應(yīng)用的一部分，使用計(jì)算機(jī)對學(xué)生成績信息進(jìn)行管理,具有手工管理所無法比擬的優(yōu)點(diǎn)。例如:檢索迅速、查找方便、可靠性高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點(diǎn)能夠極大地提高學(xué)生成績管理的效率。 同時(shí)因?yàn)槌煽兲幚砭哂型ㄓ眯?，所以此套系統(tǒng)不僅可以處理高校成績，對于各級各類學(xué)校的成績處理也有一定的作用。為

3、此，只要掌握了此套成績管理系統(tǒng)的開發(fā)應(yīng)用，其他成績管理系統(tǒng)的開發(fā)應(yīng)用也就迎刃而解了。2業(yè)務(wù)流程分析（業(yè)務(wù)流程圖）學(xué)生用戶輸入用戶名及密碼流程開始教師用戶輸入用戶名及密碼管理員用戶輸入用戶名及密碼查詢成績錄入，修改成績增加，修改課程信息流程結(jié)束修改密碼修改密碼 3數(shù)據(jù)流程圖 學(xué)生查詢課程信息成績表教師管理員錄入，修改成績增加，修改課程信息修改學(xué)生用戶名及密碼表修改教師用戶名及密碼表4數(shù)據(jù)字典 數(shù)據(jù)項(xiàng)是數(shù)據(jù)庫的關(guān)系中不可分割的數(shù)據(jù)單位，下表分別列出了數(shù)據(jù)的名稱，數(shù)據(jù)類型，長度，取值能否為空，利用sql server 2000建立lrbray數(shù)據(jù)庫，其基本表清單及表結(jié)構(gòu)描述如下： 數(shù)據(jù)庫中用到的表：

4、數(shù)據(jù)庫表名備注user_messege學(xué)生用戶名及密碼表manager教師用戶名及密碼表pt管理員用戶名及密碼表student_messege學(xué)生信息表course成績表kcxx課程信息表 user_messege,manager,pt的三張數(shù)據(jù)表，結(jié)構(gòu)如下：字段名字段類型not null說明acharnot null用戶名bcharnot null密碼 studeng_messege 基本情況數(shù)據(jù)表，結(jié)構(gòu)如下：字段名字段類型not null說明snocharnot null學(xué)號（設(shè)為主鍵）snamechar姓名classchar班級course數(shù)據(jù)表，結(jié)構(gòu)如下：字段名字段類型not null

5、說明snocharnot null學(xué)號（設(shè)為主鍵）cnamechar課程名（設(shè)為主鍵）gradechar分?jǐn)?shù)kcxx數(shù)據(jù)表，結(jié)構(gòu)如下：字段名字段類型not null說明cnochar課程號cnamechar課程名（設(shè)為主鍵）第二章 系統(tǒng)設(shè)計(jì)1新系統(tǒng)功能設(shè)計(jì) 本系統(tǒng)是一個(gè)簡易的用于成績查詢的系統(tǒng)，其功能有： 教師對學(xué)生成績的錄入，包括課程名，課程號，成績； 學(xué)生對自己成績的查詢，包括課程名，成績； 管理員對課程信息的增加;系統(tǒng)功能模塊設(shè)計(jì)：；成績管理系統(tǒng)學(xué)生教師教務(wù)處查詢成績錄入，修改成績更改課程信息修改密碼修改密碼2數(shù)據(jù)庫設(shè)計(jì)（e-r） 學(xué)生用戶名密碼成績分?jǐn)?shù)管理員用戶名密碼密碼用戶名課程教師

6、課程名課程號mnm3.代碼設(shè)計(jì) 登錄窗口代碼：; unit unit1;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, db, adodb, stdctrls, jpeg, extctrls;type tform1 = class(tform) label1: tlabel; label2: tlabel; combobox1: tcombobox; edit1: tedit; groupbox1: tgroupbox; radiobutton1:

7、 tradiobutton; radiobutton2: tradiobutton; button1: tbutton; adoconnection1: tadoconnection; adoquery1: tadoquery; radiobutton3: tradiobutton; image1: timage; procedure button1click(sender: tobject); private private declarations public public declarations end;var form1: tform1;implementationuses uni

8、t5,unit6, unit4;vara,b:string;$r *.dfmprocedure tform1.button1click(sender: tobject);beginif radiobutton1.checked then/如果radiobutton1被選中，就執(zhí)行。begintry with adoquery1 do/這里就開始對adoquery進(jìn)行編輯了 begin close; sql.clear; sql.add(select * from user_master where a=:a and b=:b); parameters.parambyname(a).value:

9、=trim(combobox1.text);/比對用戶名 parameters.parambyname(b).value:=trim(edit1.text);/比對密碼 if combobox1.text = then begin application.messagebox(請輸入用戶名,提示信息,64);/用戶名為空時(shí)彈出提示 combobox1.setfocus; exit; end; if edit1.text = then begin application.messagebox(請輸入密碼,提示信息,64);/假如密碼為空時(shí)彈出提示 edit2.setfocus; exit; en

10、d; open; end; if adoquery1.recordcount0 then begin a:=combobox1.text; b:=edit1.text; application.messagebox(登錄成功,提示信息,64); form5.show;/彈出form4窗口，也就是我們上節(jié)課設(shè)計(jì)好的管理員窗口 self.hide; end else application.messagebox(輸入的用戶名或密碼錯(cuò)誤,提示信息,64); except application.messagebox(登錄失敗,提示信息,64); end; end else if radiobutto

11、n2.checked then/對應(yīng)第一個(gè)if，意思就是如果radiobutton1沒被選中，也就是radiobutton2被選中 begin try with adoquery1 do begin close; sql.clear; sql.add(select * from manager where a=:a and b=:b); parameters.parambyname(a).value:=trim(combobox1.text); parameters.parambyname(b).value:=trim(edit1.text); if combobox1.text = then

12、 begin application.messagebox(請輸入用戶名,提示信息,64); combobox1.setfocus; exit; end; if edit1.text = then begin application.messagebox(請輸入密碼,提示信息,64); edit1.setfocus; exit; end; open; end; if adoquery1.recordcount0 then begin a:=combobox1.text; b:=edit1.text; application.messagebox(登錄成功,提示信息,64); form6.sho

13、w;self.hide; end else application.messagebox(輸入的用戶名或密碼錯(cuò)誤,提示信息,64); except application.messagebox(登錄失敗,提示信息,64); end; end elsebegin try with adoquery1 do begin close; sql.clear; sql.add(select * from pt where a=:a and b=:b); parameters.parambyname(a).value:=trim(combobox1.text); parameters.parambynam

14、e(b).value:=trim(edit1.text); if combobox1.text = then begin application.messagebox(請輸入用戶名,提示信息,64); combobox1.setfocus; exit; end; if edit1.text = then begin application.messagebox(請輸入密碼,提示信息,64); edit1.setfocus; exit; end; open; end; if adoquery1.recordcount0 then begin a:=combobox1.text; b:=edit1

15、.text; application.messagebox(登錄成功,提示信息,64); form4.show;self.hide; end else begin application.messagebox(輸入的用戶名或密碼錯(cuò)誤,提示信息,64); end; finally end; end;end;end. 學(xué)生操作選擇窗口代碼： unit unit5;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, jpeg, extct

16、rls;type tform5 = class(tform) groupbox1: tgroupbox; label1: tlabel; button1: tbutton; button2: tbutton; image1: timage; procedure button1click(sender: tobject); procedure button2click(sender: tobject); private private declarations public public declarations end;var form5: tform5;implementationuses

17、unit2,unit7;$r *.dfmprocedure tform5.button1click(sender: tobject);beginform2.show;end;procedure tform5.button2click(sender: tobject);beginform7.show;end;end. 教師操作選擇窗口代碼： unit unit6;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, jpeg, extc

18、trls;type tform6 = class(tform) button1: tbutton; button2: tbutton; groupbox1: tgroupbox; label1: tlabel; image1: timage; procedure button1click(sender: tobject); procedure button2click(sender: tobject); private private declarations public public declarations end;var form6: tform6;implementationuses

19、 unit3,unit8;$r *.dfmprocedure tform6.button1click(sender: tobject);beginform3.show;end;procedure tform6.button2click(sender: tobject);beginform8.show;end;end. 學(xué)生修改密碼窗口代碼： unit unit7;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, db, adodb, stdctrls

20、, jpeg, extctrls;type tform7 = class(tform) edit1: tedit; edit2: tedit; edit3: tedit; label1: tlabel; label2: tlabel; label3: tlabel; button1: tbutton; button2: tbutton; adoconnection1: tadoconnection; adoquery1: tadoquery; datasource1: tdatasource; label4: tlabel; combobox1: tcombobox; image1: tima

21、ge; procedure button2click(sender: tobject); procedure button1click(sender: tobject); private private declarations public public declarations end;var form7: tform7;implementationuses unit5;$r *.dfmprocedure tform7.button2click(sender: tobject);beginform5.show;end;procedure tform7.button1click(sender

22、: tobject);begintry with adoquery1 do begin sql.clear; sql.add(select * from user_master where a=:a and b=:b); parameters.parambyname(a).value:=trim(combobox1.text); parameters.parambyname(b).value:=trim(edit1.text); adoquery1.open; if adoquery1.recordcount=0 then begin application.messagebox(請輸入原密碼

23、,提示信息,64); edit1.setfocus; exit; end; open; end; if edit3.text=edit2.text then begin adoquery1.sql.add(update user_master set b=+edit2.text+where b=+edit1.text+); adoquery1.execsql; adoquery1.free; application.messagebox(密碼修改成功,提示信息,64); edit1.text:=; edit2.text:=; edit3.text:=; close; end else appl

24、ication.messagebox(兩次輸入密碼不一致,提示信息,64); except application.messagebox(修改密碼失敗,提示信息,64); end;end;end. 教師修改密碼窗口代碼： unit unit8;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, db, adodb, jpeg, extctrls;type tform8 = class(tform) datasource1: tdat

25、asource; adoconnection1: tadoconnection; adoquery1: tadoquery; label1: tlabel; edit1: tedit; label2: tlabel; edit2: tedit; label3: tlabel; edit3: tedit; button1: tbutton; button2: tbutton; label4: tlabel; combobox1: tcombobox; image1: timage; procedure button2click(sender: tobject); procedure button

26、1click(sender: tobject); private private declarations public public declarations end;var form8: tform8;implementationuses unit6;$r *.dfmprocedure tform8.button2click(sender: tobject);beginform6.show;end;procedure tform8.button1click(sender: tobject);begin try with adoquery1 do begin sql.clear; sql.a

27、dd(select * from manager where a=:a and b=:b); parameters.parambyname(a).value:=trim(combobox1.text); parameters.parambyname(b).value:=trim(edit1.text); adoquery1.open; if adoquery1.recordcount=0 then begin application.messagebox(請輸入原密碼,提示信息,64); edit1.setfocus; exit; end; open; end; if edit3.text=e

28、dit2.text then begin adoquery1.sql.add(update manager set b=+edit2.text+where b=+edit1.text+); adoquery1.execsql; adoquery1.free; application.messagebox(密碼修改成功,提示信息,64); edit1.text:=; edit2.text:=; edit3.text:=; close; end else application.messagebox(兩次輸入密碼不一致,提示信息,64); except application.messagebox

29、(修改密碼失敗,提示信息,64); end;end;end.學(xué)生查詢成績窗口代碼： unit unit2;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, stdctrls, db, adodb, grids, dbgrids, buttons, jpeg, extctrls;type tform2 = class(tform) speedbutton1: tspeedbutton; statictext1: tstatictext; statict

30、ext2: tstatictext; dbgrid1: tdbgrid; adoconnection1: tadoconnection; adoquery1: tadoquery; datasource1: tdatasource; edit1: tedit; image1: timage; procedure speedbutton1click(sender: tobject); private private declarations public public declarations end;var form2: tform2;implementation$r *.dfmprocedu

31、re tform2.speedbutton1click(sender: tobject);varsqlstr:string;beginsqlstr:=select cname,grade from course where sno=+edit1.text+; adoquery1.close; /關(guān)閉adoquery1，以便于進(jìn)行sql語句更新 adoquery1.sql.clear; /清空sql語句 adoquery1.sql.add(sqlstr); adoquery1.open; /新sql有效end;end.教師查詢錄入窗口代碼： unit unit3;interfaceuses wi

32、ndows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, db, adodb, stdctrls, grids, dbgrids, extctrls, dbctrls, buttons, jpeg;type tform3 = class(tform) speedbutton1: tspeedbutton; statictext1: tstatictext; statictext2: tstatictext; datasource1: tdatasource; dbnavigator1: t

33、dbnavigator; dbgrid1: tdbgrid; edit1: tedit; adoconnection1: tadoconnection; adoquery1: tadoquery; image1: timage; procedure speedbutton1click(sender: tobject); private private declarations public public declarations end;var form3: tform3;implementation$r *.dfmprocedure tform3.speedbutton1click(send

34、er: tobject);varsqlstr:string;beginsqlstr:=select sno,grade from course where cname=+edit1.text+; adoquery1.close; /關(guān)閉adoquery1，以便于進(jìn)行sql語句更新 adoquery1.sql.clear; /清空sql語句 adoquery1.sql.add(sqlstr); adoquery1.open; /新sql有效end;end. 管理員更改課程信息窗口代碼： unit unit4;interfaceuses windows, messages, sysutils, v

35、ariants, classes, graphics, controls, forms, dialogs, stdctrls, grids, dbgrids, extctrls, dbctrls, buttons, db, adodb, jpeg;type tform4 = class(tform) datasource1: tdatasource; adoconnection1: tadoconnection; adoquery1: tadoquery; speedbutton1: tspeedbutton; statictext1: tstatictext; dbnavigator1: t

36、dbnavigator; dbgrid1: tdbgrid; statictext2: tstatictext; edit1: tedit; image1: timage; procedure speedbutton1click(sender: tobject); private private declarations public public declarations end;var form4: tform4;implementation$r *.dfmprocedure tform4.speedbutton1click(sender: tobject);varsqlstr:strin

37、g;beginsqlstr:=select * from kcxx where cname=+edit1.text+; adoquery1.close; /關(guān)閉adoquery1，以便于進(jìn)行sql語句更新 adoquery1.sql.clear; /清空sql語句 adoquery1.sql.add(sqlstr); adoquery1.open; /新sql有效end;end. 4.系統(tǒng)運(yùn)行環(huán)境硬件環(huán)境cpu 酷睿雙核i3處理器內(nèi)存 2gb硬盤 320gb軟件環(huán)境數(shù)據(jù)庫 sql server 2000delphi版本 delphi7.0操作系統(tǒng) windowsxp5.輸入輸出設(shè)計(jì)輸入：用戶名

38、，密碼輸出：三個(gè)用戶各自的界面輸入：學(xué)生自己的學(xué)號輸出：學(xué)生的課程及其對應(yīng)的成績輸入：課程名輸出：各學(xué)生的學(xué)號及該課程分?jǐn)?shù)輸入：課程名輸出：各課程的課程號及課程名第三章 系統(tǒng)實(shí)施1系統(tǒng)分工 此套成績管理系統(tǒng)中，sql server 2000 主要是存儲系統(tǒng)所需要的所有數(shù)據(jù)，包括學(xué)生用戶，教師用戶，管理員用戶的用戶名及密碼，所有課程的信息，所有學(xué)生的信息以及所有學(xué)生所有課程的成績表。delphi7.0主要是創(chuàng)建人機(jī)界面，包括學(xué)生用戶，教師用戶，管理員用戶的登錄界面，學(xué)生用戶的成績查詢界面，密碼修改界面；教師用戶的成績錄入，修改界面，密碼修改界面；管理員用戶的課程信息修改界面。最后通過由delph

39、i7.0調(diào)用sql server2000 調(diào)用數(shù)據(jù)庫實(shí)現(xiàn)系統(tǒng)功能。 此套系統(tǒng)中，系統(tǒng)按用戶類型的不同展開分工。其中學(xué)生用戶具有查詢成績，修改個(gè)人密碼的功能。教師用戶具有錄入，修改成績，修改個(gè)人密碼的功能。管理員用戶具有增加，修改課程信息的功能2模塊功能與處理過程設(shè)計(jì) 模塊1，登錄模塊： 輸入：用戶名及密碼 登錄類型選擇：選擇學(xué)生用戶，教師用戶或管理員用戶 登錄鍵：點(diǎn)擊后，數(shù)據(jù)庫驗(yàn)證用戶名及密碼并進(jìn)入用戶對應(yīng)的模塊 模塊2，成績查詢模塊： 輸入：學(xué)號 查詢鍵：點(diǎn)擊查詢后，界面顯示查詢的內(nèi)容 模塊3，成績錄入模塊： 輸入：課程名查詢鍵：點(diǎn)擊查詢后，界面顯示所要操作的內(nèi)容dbnavigator:：進(jìn)

40、行刪除，修改，錄入操作 模塊4，課程信息更改模塊： 輸入：課程名 查詢鍵：點(diǎn)擊后界面出現(xiàn)用戶可以操作的內(nèi)容dbnavigator:：進(jìn)行修改，錄入操作模塊5 學(xué)生用戶操作選擇模塊： 成績查詢鍵：點(diǎn)擊后進(jìn)入學(xué)生用戶的成績查詢界面 修改密碼鍵：點(diǎn)擊后進(jìn)入學(xué)生用戶的密碼修改界面模塊6 教師用戶操作選擇模塊： 成績錄入鍵：點(diǎn)擊后進(jìn)入教師用戶的成績錄入，修改，刪除界面 修改密碼鍵：點(diǎn)擊后進(jìn)入教師用戶的密碼修改界面模塊7 學(xué)生用戶密碼修改模塊 輸入：用戶名，原密碼，新密碼 修改鍵：點(diǎn)擊后，數(shù)據(jù)庫驗(yàn)證用戶名及原密碼，通過后提示密碼修改成功 返回鍵：點(diǎn)擊后，返回學(xué)生用戶操作選擇界面模塊8 教師用戶密碼修改模塊

41、： 輸入：用戶名，原密碼，新密碼 修改鍵：點(diǎn)擊后，數(shù)據(jù)庫驗(yàn)證用戶名及原密碼，通過后提示密碼修改成功 返回鍵：點(diǎn)擊后，返回教師用戶操作選擇界面3程序設(shè)計(jì)成績管理系統(tǒng)的登錄界面如圖1所示。系統(tǒng)的用戶分為三類：學(xué)生用戶，教師用戶和管理員用戶。下面分別以三類用戶的功能使用說明為例做詳細(xì)闡述。圖1.成績管理系統(tǒng)登錄界面1.學(xué)生用戶功能學(xué)生用戶的功能使用分為個(gè)人密碼修改和個(gè)人成績查詢，如圖2所示。圖2.學(xué)生操作選擇界面成績查詢 學(xué)生用戶登錄進(jìn)入系統(tǒng)后，出現(xiàn)圖2所示的操作選擇界面，點(diǎn)擊成績查詢選項(xiàng)，出現(xiàn)圖3所示的界面。用戶輸入自己的學(xué)號后，點(diǎn)擊查詢鍵即可在界面上查詢到自己所上各課程的成績。圖3.學(xué)生成績查詢

42、界面?zhèn)€人密碼修改 學(xué)生用戶登錄進(jìn)入系統(tǒng)后，出現(xiàn)圖2所示的操作選擇界面，點(diǎn)擊修改密碼選項(xiàng)，即出現(xiàn)圖4所示界面。學(xué)生用戶按提示輸入相應(yīng)的用戶名，原密碼，新密碼后點(diǎn)擊修改選項(xiàng)即可完成密碼修改任務(wù)。密碼修改完成后界面自動跳回到學(xué)生用戶的操作選擇界面，用戶可以查詢成績。若用戶中途改變主意不改密碼，則可以通過點(diǎn)擊返回選項(xiàng)，同樣返回學(xué)生用戶操作選擇界面。圖4.學(xué)生用戶密碼修改界面2.教師用戶功能 教師用戶的功能使用分為個(gè)人密碼修改和成績錄入，如圖5所示。圖5.教師用戶操作選擇界面成績錄入 教師用戶登錄進(jìn)入系統(tǒng)后，出現(xiàn)圖5所示的操作選擇界面，點(diǎn)擊成績錄入選項(xiàng)，出現(xiàn)圖6所示的界面。用戶輸入要錄入成績的課程名后，點(diǎn)擊查詢鍵即可在界面上顯示到所有學(xué)生這門課程成績錄入框，教師即可進(jìn)行成績錄入，修改，刪除等工作。圖6.教師用戶成績錄入界面?zhèn)€人密碼修改 教師用戶登錄進(jìn)入系統(tǒng)后，出現(xiàn)圖5所示的操作選擇界面，點(diǎn)擊修改密碼選項(xiàng)，即出現(xiàn)圖7所示界面。學(xué)生用戶按提示輸入相應(yīng)的用戶名，原密碼，新密碼后點(diǎn)擊修改選項(xiàng)即可完成密碼修改任務(wù)。密碼修改完成后界面自動跳回教師用戶的操作選擇界面，用戶可以成績的錄入，修改，刪除等操作。若用戶中途改變主意不改密碼，則可以通過點(diǎn)擊返回選項(xiàng)，同樣返回教師用戶操作選擇