數(shù)據(jù)庫課程設(shè)計說明書

1、課程設(shè)計說明書設(shè)計題目:_教學管理信息系統(tǒng)之教學成績管理子系統(tǒng)專業(yè):_物流工程_ _班級:_ 2014-2_設(shè)計人:2016年7月1日課程設(shè)計任務(wù)書學院交通學院專業(yè)物流工程班級2014-2姓名一、課程設(shè)計題目:教學管理信息系統(tǒng)之教學成績管理子系統(tǒng)二、課程設(shè)計主要參考資料:(1新編visual Basic程序設(shè)計案例教程清華大學出版社王曉軍等(2數(shù)據(jù)庫原理及應(yīng)用案例分析鄭玲利、林烈青等編著三、課程設(shè)計應(yīng)解決主要問題:(1_數(shù)據(jù)庫建立過程中各個表格包含的內(nèi)容以及表格之間關(guān)系建立 _(2_vb程序編各個登錄界面程序運行出錯,程序調(diào)試(3數(shù)據(jù)庫與控件的連接綁定,無法對數(shù)據(jù)庫內(nèi)容進行修改四、課程設(shè)計相關(guān)

2、附件(1 軟件源程序_(2 數(shù)據(jù)庫以及課程設(shè)計說明書指導教師簽字:_ 系主任簽字:_指導教師對課程設(shè)計的評語指導教師簽字:_ _年_月_日目錄1 引言 (11.1設(shè)計目的 (11.2設(shè)計背景 (11.3 支持軟件 (12 系統(tǒng)分析 (22.1 需求分析 (22.2 功能分析 (32.3可行性分析 (43 結(jié)構(gòu)設(shè)計 (43.1概念結(jié)構(gòu)設(shè)計 (43.2邏輯結(jié)構(gòu)設(shè)計 (63.3物理結(jié)構(gòu)設(shè)計 (84 系統(tǒng)設(shè)計 (94.1窗體設(shè)計 (94.2安全設(shè)計 (124.3系統(tǒng)測試 (125 總結(jié) (166 參考資料 (167 源程序清單 (161 引言1.1設(shè)計目的(1將學過的相關(guān)方法用于實際設(shè)計中,解決編程,

3、數(shù)據(jù)庫建立問題。(2熟練運用設(shè)計中常用的各種數(shù)據(jù)庫中功能、vb語言設(shè)計(3綜合運用理論和專業(yè)知識解決課程設(shè)計中的問題,掌握信息系統(tǒng)設(shè)計的基本方法和步驟。(4提高學生計算機應(yīng)用能力,熟練掌握office access和vb等軟件。(5提高自己動手的能力,能在設(shè)計中正確表達設(shè)計意圖。1.2設(shè)計背景隨著教學信息量的不斷增加,信息冗雜,教學信息系統(tǒng)必不可少。教學管理系統(tǒng)采用當前比較流行的編程技術(shù),可以實現(xiàn)數(shù)據(jù)的高效、動態(tài)、交互訪問。采用Visual Basic2000為主要開發(fā)平臺,實現(xiàn)的主要功能包括學生成績查詢、教師個人資料和教學成績查詢、添加修改學生、教師信息、刪除學生、教師信息、數(shù)據(jù)庫的還原、備

4、份、用戶信息的管理和維護及其它一些輔助功能。在數(shù)據(jù)庫的連接上采用ADO的數(shù)據(jù)庫訪問技術(shù)。在數(shù)據(jù)庫的建立上主要采用企業(yè)管理器作為關(guān)系數(shù)據(jù)庫的開發(fā)工具。1.3 支持軟件計算機硬件配置:CPU Intel Core2 Duo T6570(2.1GHz內(nèi)存 2GB1硬盤 250GB 5400轉(zhuǎn)顯卡ATI Mobility Radeon HD 4330操作系統(tǒng):Windows XP開發(fā)環(huán)境:V isual BasicAccess 20002 系統(tǒng)分析2.1 需求分析學生成績管理系統(tǒng)應(yīng)有三部分組成:學生、教師、管理員 圖2-1教學成績管理結(jié)構(gòu)圖登錄用戶信息需要有學生、教師以及管理員登錄 圖2-2登錄信息結(jié)

5、構(gòu)圖2.2 功能分析系統(tǒng)必須完成的功能有學生查詢功能、教師查詢功能、管理員查詢功能、添加功能、修改功能、刪除功能等。(1學生查詢功能為了方便學生查找成績等信息,將所有信息按照需要進行分類,并通過密碼驗證來操作。這樣學生就能很方便的找到自己所需要的信息。不可修改查詢內(nèi)容。(2學生密碼修改功能學生可以對自己的登錄密碼進行修改但不可對其余的修改(3教師查詢功能為了方便老師查找成績等信息,將所有信息按照需要進行分類,并通過密碼驗證來操作,可以對學生成績進行添加、修改。刪除功能。(4教師密碼修改教師可以對自己的登錄密碼進行修改方便自己記憶。(5管理員登錄功能管理員進行登錄后對所管理的信息系統(tǒng)進行教師個人

6、信息進行添加,刪除,更新等操作。2.3可行性分析必須考慮到系統(tǒng)響應(yīng)時間、系統(tǒng)需要的存儲容量及后援存儲、重新啟動和安全性等方面。(1經(jīng)濟可行性分析程序編程設(shè)計工作量小,功能容易實現(xiàn),節(jié)約人力、物力、財力的支出,大大減少成本。操作簡單易行,減少操作人員數(shù)目。(2操作可行性分析學生查詢成績和基本信息要簡單容易操作。教師對成績的查詢,錄入等操作簡單,管理員的信息量比較多,因此系統(tǒng)要操作方便,工作量小,大大減少工作人員工作量。(3技術(shù)可行性分析如今開發(fā)系統(tǒng)的計算機硬件已經(jīng)非常普及,可以完全支持系統(tǒng)運行;各方面的技術(shù)都非常成熟,相對來說開發(fā)此系統(tǒng)的技術(shù)也要求比較簡單,因此在技術(shù)方面是可行的。(4法律方面的

7、可行性全部軟件使用正版,保護開發(fā)者權(quán)益和自身信息安全性,機器配置通過正當途徑購得。3 結(jié)構(gòu)設(shè)計3.1概念結(jié)構(gòu)設(shè)計1.局部E-R模型設(shè)計教師,包括教師編號、姓名、性別,職稱,單位、密碼 3-1教師信息E-R圖課程,包括課程編號、課程名稱、學時、學分、教師編號 3-2課程信息E-R圖成績,包括學號、課程編號、成績 3-3成績信息E-R圖學生,包括學號、姓名、性別、生日、專業(yè)、密碼 3-4學生信息E-R圖3.2邏輯結(jié)構(gòu)設(shè)計關(guān)系模式學生(學號、姓名、性別、生日、專業(yè)、學院主鍵是學號教師(教師編號、姓名、性別,職稱,單位主鍵是教師編號成績(學號、姓名、專業(yè)、課程編號、課程名稱、學時、成績,主鍵是學號教師

8、密碼表(用戶名、密碼、姓名、性別、職稱、單位主鍵是用戶名學生密碼表(用戶、姓名、密碼主鍵是用戶基本信息表數(shù)據(jù)設(shè)置如下所示:表3-1學生信息表 3.3物理結(jié)構(gòu)設(shè)計1. 屬性存儲類型的確定不同DBMS系統(tǒng)的數(shù)據(jù)類型稍有不同,因此對于不同的DBMS系統(tǒng)應(yīng)該有不同的選擇和修改。2.存儲結(jié)構(gòu)的選擇選擇何種存儲結(jié)構(gòu),與選定的DBMS類型有關(guān),對于關(guān)系數(shù)據(jù)庫,用戶人為干預的事情很少,只能選定索引方法或給出輔助索引,以便在程序中可以按倒排文件方式查詢數(shù)據(jù),而存儲路徑是由系統(tǒng)安排的。3.表的索引結(jié)構(gòu)確定為了提高表的檢索速度,確定表的索引結(jié)構(gòu),可按默認的升序建立。4.存儲路徑的確定存儲路徑在邏輯上已經(jīng)由模式規(guī)定下

9、來了,由系統(tǒng)自動完成。4 系統(tǒng)設(shè)計4.1窗體設(shè)計 圖4-1登錄界面表4-1對象的屬性列表 圖4-2管理界面表4-2管理界面屬性表Command6 Caption 退出 圖4-3學生信息查詢 圖4-4教師管理界面 圖4-5學生密碼修改 圖4-6教師密碼修改 圖4-7管理員管理界面4.2安全設(shè)計每個用戶擁有自己獨立的密碼,所有的權(quán)利也不同。如學生只能查詢自己的成績不能修改,教師只能管理學生的信息,管理員可以管理教師信息等。每個登錄界面也設(shè)置的不同。4.3系統(tǒng)測試 圖4-8學生登錄界面 圖4-9學生查詢界面 圖4-10管理員刪除教師信息 圖4-11管理員修改信息 圖4-12學生修改密碼 圖4-13學

10、生修改密碼成功 圖4-13教師刪除學生信息 圖4-14教師修改學生信息 圖4-15教師登錄界面5 總結(jié)通過這次課程設(shè)計,我們對vb編程和數(shù)據(jù)庫知識有了更深的理解和認識,開始設(shè)計時感覺很難無從下手,只是盲目的按照課本和參考資料進行設(shè)計和編程,沒有進行獨立思考。然而隨著設(shè)計的進行,自己的思考以及對程序慢慢的熟悉,使得對知識理解加深,編寫變得簡單而有序起來。這次課程設(shè)計同樣也讓我們明白做事情不能馬虎偷懶,也不能還沒開始就失去信心,只要自己認真細心,坐下來靜下心就可以做到。相信這次課程設(shè)計帶給的知識和感悟會在以后的日子里受益匪淺。6 參考資料1.數(shù)據(jù)庫原理及應(yīng)用案例分析鄭玲利、林烈青等編著2.基于VB

11、和SQL的數(shù)據(jù)庫編程技術(shù)張煥君等編著7 源程序清單登錄界面Private Sub Command1_Click(Dim Str As StringStr = "select * from 用戶密碼表where 用戶名= '" & Text1.Text & "'" Adodc1.RecordSource = StrAdodc1.RefreshMsgBox "用戶名錯誤,請重新輸入", vbExclamation, "警告"Text1.Text = ""Text1.S

12、etFocusElse管理界面.ShowUnload MeElseMsgBox "用戶名錯誤,請重新輸入", vbExclamation, "警告" Text2.Text = ""Text2.SetFocusEnd IfEnd IfmiCount = miCount + 1If miCount >= 3 Then Unload MeEnd SubPrivate Sub Command2_Click(登錄界面.ShowUnload MeEnd SubPrivate Sub Command1_Click(學生界面.ShowUnloa

13、d MeEnd SubPrivate Sub Command2_Click(教師登錄.ShowUnload MeEnd SubPrivate Sub Command3_Click(管理員登錄.ShowUnload MeEnd SubPrivate Sub Command6_Click(學生密碼修改.ShowUnload MeEnd SubPrivate Sub Command4_Click(登錄界面.ShowUnload MeEnd SubPrivate Sub Command5_Click(教師密碼修改.ShowUnload MeEnd Sub管理員界面Private Sub Command

14、1_Click(Dim Str As StringStr = "select * from 管理員密碼表where 用戶名= '" & Text1.Text & "'" Adodc1.RecordSource = StrAdodc1.RefreshMsgBox "用戶名錯誤,請重新輸入", vbExclamation, "警告"Text1.Text = ""Text1.SetFocusElse管理員界面.ShowUnload MeElseMsgBox "

15、用戶名錯誤,請重新輸入", vbExclamation, "警告"Text2.Text = ""Text2.SetFocusEnd IfEnd IfmiCount = miCount + 1If miCount >= 3 Then Unload MeEnd SubPrivate Sub Command2_Click(管理界面.Show管理員登錄.HideEnd SubPrivate Sub Command1_Click(On Error GoTo handlehandle:End SubPrivate Sub Command2_Click

16、(On Error GoTo deleteerrMsgBox "沒有記錄,無法刪除!"Exit SubEnd IfWith Adodc1.RecordsetIf Not .EOF And Not .BOF ThenIf MsgBox("刪除當前記錄嗎?", vbYesNo + vbQuestion = vbYes Then .Delete.MoveNextIf .EOF Then .MoveLastEnd IfEnd IfEnd WithExit Subdeleteerr:MsgBox Err.DescriptionEnd SubPrivate Sub

17、Command3_Click(MsgBox ("客戶記錄已被修改"Adodc1.RefreshEnd SubPrivate Sub Command4_Click(管理界面.Show管理員界面.HideEnd Sub教師登錄Private Sub Command1_Click(Dim Str As StringStr = "select * from 教師密碼表where 用戶名= '" & Text1.Text & "'" Adodc1.RecordSource = StrAdodc1.RefreshM

18、sgBox "用戶名錯誤,請重新輸入", vbExclamation, "警告"Text1.Text = ""Text1.SetFocusElse教師界面.ShowUnload MeElseMsgBox "用戶名錯誤,請重新輸入", vbExclamation, "警告"Text2.Text = ""Text2.SetFocusEnd IfEnd IfmiCount = miCount + 1If miCount >= 3 Then Unload MeEnd SubPr

19、ivate Sub Command2_Click(管理界面.Show教師登錄.HideEnd Sub教師密碼修改Private Sub Command1_Click(sqlstr = "select * from 教師密碼表where 用戶名= '" & Text1.Text & "'"Adodc1.RecordSource = sqlstrAdodc1.RefreshMsgBox "用戶名輸入錯誤"Text1.Text = ""Text1.SetFocusElseIf Text2.Text <>