數(shù)據(jù)庫實(shí)習(xí)報(bào)告

數(shù)據(jù)庫系統(tǒng)課程設(shè)計(jì)學(xué) 號(hào):學(xué)生姓名：班 號(hào)：指導(dǎo)教師：中國地質(zhì)大學(xué)信息工程學(xué)院2012年3月3日=數(shù)據(jù)庫實(shí)習(xí)報(bào)告——教務(wù)管理系統(tǒng)一、需求分析1、首先要明確各個(gè)實(shí)體間的屬性：a.教師：工作證號(hào)，姓名，職稱，電話，系別；b.學(xué)生：學(xué)號(hào)，性別，班級(jí)，系別，出生年月；d.系別：系代號(hào)，系名，系辦，公室電話；e.課程：課序號(hào)，課名，學(xué)分，上課時(shí)間，名額。謝謝閱讀2、各個(gè)實(shí)體之間的聯(lián)系：a.每個(gè)學(xué)生都屬于一個(gè)班；.每個(gè)教師也都屬于一個(gè)系，每個(gè)班的班主任都由一名教師擔(dān)任；謝謝閱讀一名教師可以教多門課，一門課可以有幾位主講老師；一名同學(xué)可以選多門課，一門課可被若干同學(xué)選中，一名同學(xué)選中的課若已學(xué)完，應(yīng)該記錄有相應(yīng)成績。謝謝閱讀3、總需求：本單位學(xué)生、教師都有重名，工作證號(hào)、學(xué)號(hào)可以作為標(biāo)識(shí)。教學(xué)系統(tǒng)主要提供數(shù)據(jù)維護(hù)、選課和信息查詢。感謝閱讀常見的查詢有：系統(tǒng)中各對(duì)象的基本信息查詢；查詢指定班、系的學(xué)生信息（名單、人數(shù)等）；查詢學(xué)生的成績、學(xué)分情況；查詢教師授課情況和學(xué)生選課情況等。謝謝閱讀二、概念設(shè)計(jì)1、概念模型（E-R圖）：a．授課關(guān)系E-R圖b．選課關(guān)系E-R圖c．總E-R圖系辦公室電話系名系1系代號(hào)1屬于學(xué)號(hào)n性別學(xué)生1出生年月 姓名 n2、數(shù)據(jù)字典：a．?dāng)?shù)據(jù)項(xiàng)系名：{Dname,char,20}系代號(hào)：{Dno,char,3}系辦公室電話：{Dtelephont,char,11}職稱：{Ttitle,char,20}工作證號(hào)：{Tno,char,10}

職稱工作證號(hào)n姓名屬于教師1電話授課n課序號(hào)選修課程課名稱m學(xué)分名額上課時(shí)間姓名：{Tname,char,20}電話：{Ttelephont,char,11}學(xué)號(hào)：{Sno,char,10}感謝閱讀性別：{Ssex,char,2}出生年月：{Sbirthday,date,}姓名：{Sname,char,20}精品文檔放心下載課序號(hào)：{Cno,char,10}課名稱：{Cname,char,20}上課時(shí)間：{Ctime,datetime}b．?dāng)?shù)據(jù)結(jié)構(gòu)學(xué)生={學(xué)號(hào)、姓名、性別、出生年月}

名額：{Cnumber,int}學(xué)分：{Credit,float,2}成績：{Grade,int}教師={工作證號(hào)、教師姓名、職稱、電話、所在系的系號(hào)}系={系代號(hào)、系名、系辦公室電話}謝謝閱讀課程={課序號(hào)、課名、學(xué)分、上課地點(diǎn)、名額、授課教師的工作證號(hào)}選課={學(xué)號(hào)、課序號(hào)、成績}謝謝閱讀c．?dāng)?shù)據(jù)流(說明，數(shù)據(jù)流來源，數(shù)據(jù)流去向)變更系信息={變更系信息，變更信息，系信息}查詢系信息={查詢系信息,系代號(hào),系信息}變更教師信息={變更教師信息，變更信息，教師信息}查詢教師信息={查詢教師信息，工作證號(hào)，教師信息}變更學(xué)生信息={變更學(xué)生信息，變更信息，學(xué)生信息}查詢學(xué)生信息={查詢學(xué)生信息，學(xué)號(hào)，學(xué)生信息}精品文檔放心下載變更課程信息={變更課程信息,變更信息,課程信息}查詢課程信息={查詢課程信息,課序號(hào),課程信息}學(xué)生選課={課程號(hào)，學(xué)號(hào)}謝謝閱讀查詢選課信息={查詢選課信息,學(xué)號(hào)或課序號(hào),選課信息}查詢授課信息={查詢授課信息,工作證號(hào),授課信息}查詢成績={查詢成績，學(xué)號(hào)&課程號(hào)，選課信息}謝謝閱讀三、邏輯結(jié)構(gòu)設(shè)計(jì)1、關(guān)系模型教師（工作證號(hào)，姓名，職稱，電話，系代號(hào)）學(xué)生（學(xué)號(hào)，姓名，性別，出生年月）系（系代號(hào)，系名，系辦公室電話）課程（課序號(hào)，課名，學(xué)分，上課時(shí)間，名額，工作證號(hào)）精品文檔放心下載選課（學(xué)號(hào)，課序號(hào)，成績）2、用戶視圖教師信息視圖（工作證號(hào)，教師姓名，職稱，電話，負(fù)責(zé)班級(jí)）精品文檔放心下載學(xué)生信息視圖（學(xué)號(hào)，姓名，性別，出生年月，班號(hào)）系信息視圖（系代號(hào)，系名，系辦公室電話）選課信息（課程號(hào)，學(xué)號(hào)）課程信息（課程號(hào)，課程名稱，學(xué)分，上課時(shí)間，名額，授課老師）謝謝閱讀五、系統(tǒng)實(shí)施完成數(shù)據(jù)庫的物理設(shè)計(jì)之后，設(shè)計(jì)人員就要用RDBMS提供的數(shù)據(jù)定義語言和其他實(shí)用程序設(shè)計(jì)和物理設(shè)計(jì)結(jié)果嚴(yán)格的描述出來，成為DMBMS可以接受的源代碼，再經(jīng)過調(diào)試產(chǎn)生目標(biāo)模式。然后就可以組織數(shù)據(jù)入庫了，這就是數(shù)據(jù)庫實(shí)施階段。數(shù)據(jù)庫實(shí)施階段包括兩項(xiàng)重要的工作：精品文檔放心下載1. 數(shù)據(jù)的載入:直接在SQL2012中建立教師，學(xué)生，選課，系，課程六個(gè)表。感謝閱讀運(yùn)用ODBC，建立mysql的服務(wù)器，關(guān)聯(lián)到VB中。謝謝閱讀六、運(yùn)行維護(hù)1、數(shù)據(jù)庫試運(yùn)行數(shù)庫的試運(yùn)行階段要實(shí)際運(yùn)行數(shù)據(jù)庫應(yīng)用程序，執(zhí)行對(duì)數(shù)據(jù)庫的各種操作，測(cè)試應(yīng)用程序的功能是否滿足設(shè)計(jì)要求。如果不滿足，對(duì)應(yīng)用程序部分則要修改、調(diào)整，知道達(dá)到設(shè)計(jì)要求為止。這一階段特別強(qiáng)調(diào)兩點(diǎn)，第一該是分期分批的組織數(shù)據(jù)入庫，先輸入少量數(shù)據(jù)做調(diào)試用，待試運(yùn)行基本合格后，再大批量的輸入數(shù)據(jù)。第二首先調(diào)試運(yùn)行數(shù)據(jù)庫管理系統(tǒng)的恢復(fù)功能，做好數(shù)據(jù)庫的轉(zhuǎn)儲(chǔ)和恢復(fù)工作，一旦故障發(fā)生，能使數(shù)據(jù)庫盡快恢復(fù)，盡量減少數(shù)據(jù)庫的破壞。謝謝閱讀2、數(shù)據(jù)庫的維護(hù)數(shù)據(jù)庫的轉(zhuǎn)儲(chǔ)和恢復(fù)試系統(tǒng)正式運(yùn)行后最重要的維護(hù)工作之一。要針對(duì)不同的應(yīng)用要求制定不同的轉(zhuǎn)儲(chǔ)計(jì)劃，以保證一旦發(fā)生故障能夠盡快將數(shù)據(jù)庫恢復(fù)到某種一致狀態(tài)，并盡可能減少對(duì)數(shù)據(jù)庫的破壞。感謝閱讀數(shù)據(jù)庫運(yùn)行階段，主要是由數(shù)據(jù)庫管理員完成經(jīng)常性的維護(hù)工作。主要包括：精品文檔放心下載a．?dāng)?shù)據(jù)庫的轉(zhuǎn)儲(chǔ)和恢復(fù)；b．?dāng)?shù)據(jù)庫的安全性、完整性控制；c．?dāng)?shù)據(jù)庫性能的監(jiān)督、分析和改造；d．?dāng)?shù)據(jù)庫的重組織與重構(gòu)造。七、小結(jié)兩個(gè)周的數(shù)據(jù)庫實(shí)習(xí)課程結(jié)束了，雖然數(shù)據(jù)庫的設(shè)計(jì)工作完成的并不好，但是在這個(gè)過程中還是有些收獲。首先，我知道了數(shù)據(jù)庫的設(shè)計(jì)工作是有章可循的，可以按照一定的步驟、有規(guī)律的進(jìn)行設(shè)計(jì)。數(shù)據(jù)庫可以按階段進(jìn)行設(shè)計(jì)，在各個(gè)階段有不同的目標(biāo)，應(yīng)遵循的原則和方法也各不相同，還有一些應(yīng)該注意的事項(xiàng)等等。其中的重點(diǎn)是概念結(jié)構(gòu)的設(shè)計(jì)和邏輯結(jié)構(gòu)的設(shè)計(jì)，這也是整個(gè)數(shù)據(jù)庫設(shè)計(jì)過程中最重要的兩個(gè)環(huán)節(jié)。人們?cè)谠u(píng)述數(shù)據(jù)庫的特點(diǎn)時(shí)說，“三分技術(shù)，七分管理，十二分的基礎(chǔ)數(shù)”，在數(shù)據(jù)庫建設(shè)中不僅涉及技術(shù)，還涉及管理，要建設(shè)好一個(gè)數(shù)據(jù)庫應(yīng)用系統(tǒng)，開發(fā)技術(shù)固然重要，但是相比之下管理更為重要。其次，對(duì)數(shù)據(jù)庫設(shè)計(jì)的各個(gè)階段也有了初步認(rèn)識(shí)。在需求分析階段，主要的任務(wù)是通過詳細(xì)的調(diào)查現(xiàn)實(shí)世界重要處理的對(duì)象，明確用戶的各種需求，然后在此基礎(chǔ)上確定新系統(tǒng)的功能，簡單地說，也就是分析用戶的需求，它是設(shè)計(jì)數(shù)據(jù)庫的起點(diǎn)，需求分析的準(zhǔn)確與否直接關(guān)系到后面各個(gè)階段的設(shè)計(jì)。在概念結(jié)構(gòu)設(shè)計(jì)階段，要根據(jù)需求分析的結(jié)果抽象為信息結(jié)構(gòu)，主要就是通過E—R圖來表現(xiàn)，不僅要考慮整個(gè)數(shù)據(jù)庫的結(jié)構(gòu)，還要注意子模式仕途的細(xì)節(jié)，它是整個(gè)數(shù)據(jù)庫設(shè)計(jì)的關(guān)鍵。在邏輯結(jié)構(gòu)的設(shè)計(jì)階段，主要任務(wù)就是把概念結(jié)構(gòu)設(shè)計(jì)階段設(shè)計(jì)好的基本E-R圖轉(zhuǎn)換為數(shù)據(jù)庫管理系統(tǒng)產(chǎn)品所支持的數(shù)據(jù)模型相符合的邏輯結(jié)構(gòu)，是獨(dú)立于任何一種數(shù)據(jù)模型的信息結(jié)構(gòu)。在物理結(jié)構(gòu)設(shè)計(jì)階段，通常分為兩步，先確定數(shù)據(jù)庫的存取方法和存儲(chǔ)結(jié)構(gòu)，后對(duì)物理結(jié)構(gòu)進(jìn)行評(píng)價(jià)，評(píng)價(jià)重點(diǎn)是在時(shí)間和空間效率，如果評(píng)價(jià)的結(jié)果滿足設(shè)計(jì)要求，則可進(jìn)入物理實(shí)施階段，否則，就需要重新設(shè)計(jì)或修改物理結(jié)構(gòu)，有時(shí)甚至需要邏輯設(shè)計(jì)階段修改數(shù)據(jù)模型。完成數(shù)據(jù)庫的物理設(shè)計(jì)之后，就要用數(shù)據(jù)庫管理系統(tǒng)提供的數(shù)據(jù)定義語言和其他實(shí)用程序?qū)?shù)據(jù)庫邏輯設(shè)計(jì)和物理設(shè)計(jì)結(jié)果嚴(yán)格的表示出來，這是還需要進(jìn)行調(diào)試。這些都是一些理論方法，還是需要在實(shí)際工作中運(yùn)用這些思想，遵守設(shè)計(jì)原則，注意各階段工作的細(xì)節(jié)，才能完成好數(shù)據(jù)庫設(shè)計(jì)工作。在以后的學(xué)習(xí)中會(huì)更加注意這些細(xì)節(jié)問題，這樣才會(huì)有所提高。精品文檔放心下載八、附錄VB源代碼：1.登陸界面代碼：PrivateSubCommand1_Click()感謝閱讀DimrptAsIntegerIfText1.Text="20121003818"Then精品文檔放心下載IfText2.Text="123456"Then感謝閱讀IfText3.Text=Label4.CaptionThen謝謝閱讀Form5.HideForm1.ShowElserpt=MsgBox("驗(yàn)證碼錯(cuò)誤",vbRetryCancel+vbExclamation,"驗(yàn)證碼")精品文檔放心下載Ifrpt=vbRetryThenText3.Text=""Text3.SetFocusEndIfEndIfElserpt=MsgBox("密碼錯(cuò)誤",vbRetryCancel+vbExclamation,"密碼")感謝閱讀Ifrpt=vbRetryThenText2.Text=""Text2.SetFocusEndIfEndIfElserpt=MsgBox("用戶名錯(cuò)誤",vbRetryCancel+vbExclamation,"用戶名")謝謝閱讀Ifrpt=vbRetryThenText1.Text=""Text1.SetFocusEndIfEndIfEndSubPrivateSubCommand2_Click()感謝閱讀Form7.ShowForm5.HideEndSubPrivateSubForm_Load()Label5.FontSize=15Label5.ForeColor=vbRedRandomizeDimxAsLongx=Int(90000*Rnd(0))+10000精品文檔放心下載Label4.Caption=xEndSub2．學(xué)生信息界面代碼：PrivatesqlconAsNewADODB.Connection謝謝閱讀PrivatesqlresAsNewADODB.Recordset感謝閱讀PrivatesqlcmdAsNewADODB.Command謝謝閱讀DimsqlstrAsStringPrivateSubCommand1_Click()謝謝閱讀MakeSqlStrAdodc1.RecordSource="select*from學(xué)生where學(xué)號(hào)="&sqlstr精品文檔放心下載Adodc1.RefreshEndSubPrivateSubCommand2_Click()謝謝閱讀ret=MsgBox("是否要?jiǎng)h除"+Adodc1.Recordset("學(xué)號(hào)")+"號(hào)學(xué)生的記錄",vbYesNo,"提示")謝謝閱讀Ifret=vbYesThensqlcmd.ActiveConnection=sqlcon精品文檔放心下載sqlcmd.CommandText="deletefrom學(xué)生where學(xué)號(hào)="+Adodc1.Recordset("學(xué)號(hào)")sqlcmd.Execute感謝閱讀Adodc1.RecordSource="select*from學(xué)生"謝謝閱讀Adodc1.RefreshEndIfEndSubPrivateSubCommand3_Click()感謝閱讀DimsqlupstrAsStringsqlupstr="select*from學(xué)生where學(xué)號(hào)="&Trim(Text1.Text)精品文檔放心下載sqlres.Opensqlupstr,sqlcon,adOpenDyamic,adLockPessimistic精品文檔放心下載IfNotsqlres.EOFThenElsesqlres.AddNewsqlres("學(xué)號(hào)")=Text1.Textsqlres("姓名")=Text2.Textsqlres("性別")=Text3.Textsqlres("出生日期")=Text4.Text感謝閱讀sqlres("系代號(hào)")=Text5.Text精品文檔放心下載sqlres.UpdateEndIfsqlres.CloseAdodc1.RecordSource="select*from學(xué)生"感謝閱讀Adodc1.RefreshEndSubPrivateSubCommand4_Click()謝謝閱讀DimsqlupstrAsStringsqlupstr="select*from學(xué)生where學(xué)號(hào)="&Trim(Text1.Text)精品文檔放心下載sqlres.Opensqlupstr,sqlcon,adOpenDyamic,adLockPessimistic感謝閱讀IfNotsqlres.EOFThenElsesqlres.AddNewsqlres("學(xué)號(hào)")=Text1.Textsqlres("姓名")=Text2.Textsqlres("性別")=Text3.Textsqlres("出生日期")=Text4.Text謝謝閱讀sqlres("系代號(hào)")=Text5.Text精品文檔放心下載sqlres.UpdateEndIfsqlres.CloseAdodc1.RecordSource="select*from學(xué)生"精品文檔放心下載Adodc1.RefreshEndSubPrivateSubForm_Load()sqlcon.Provider="SQLOLEDB"精品文檔放心下載sqlcon.Open"Server=Y500-X64\SQLEXPRESS;DataBase=教務(wù)管理系統(tǒng);UID=sa;PWD=;"謝謝閱讀EndSubPrivateSubForm_Unload(CancelAsInteger)精品文檔放心下載sqlcon.CloseEndSubPublicSubMakeSqlStr()sqlstr=""IfTrim(Text6.Text)<>""Then謝謝閱讀sqlstr=Trim(Text6.Text)EndIfIfTrim(Text6.Text)=""Then感謝閱讀sqlstr=Text1.TextEndIfEndSub3.學(xué)生課程成績代碼：PrivatesqlconAsNewADODB.Connection感謝閱讀PrivatesqlresAsNewADODB.Recordset精品文檔放心下載PrivatesqlcmdAsNewADODB.Command精品文檔放心下載DimsqlstrAsStringPrivateSubCommand1_Click()謝謝閱讀MakeSqlStrAdodc1.RecordSource="select*from選修,學(xué)生where選修.學(xué)號(hào)="&sqlstr感謝閱讀Adodc1.RefreshEndSubPrivateSubForm_Load()sqlcon.Provider="SQLOLEDB"謝謝閱讀sqlcon.Open"Server=Y500-X64\SQLEXPRESS;DataBase=教務(wù)管理系統(tǒng);UID=sa;PWD=;"感謝閱讀EndSubPublicSubMakeSqlStr()sqlstr=""IfTrim(Text5.Text)<>""Then感謝閱讀sqlstr=Trim(Text5.Text)EndIfIfTrim(Text5.Text)<>""Then感謝閱讀sqlstr=Text2.TextEndIfEndSubPrivateSubForm_Unload(CancelAsInteger)謝謝閱讀sqlcon.CloseEndSubPrivateSubImage1_Click()感謝閱讀Form1.Picture=LoadPicture(picturefile)謝謝閱讀EndSub4.教師信息代碼：PrivatesqlconAsNewADODB.Connection精品文檔放心下載PrivatesqlresAsNewADODB.Recordset感謝閱讀PrivatesqlcmdAsNewADODB.Command謝謝閱讀DimsqlstrAsStringPrivateSubCommand1_Click()謝謝閱讀MakeSqlStrAdodc1.RecordSource="select*from教師where工作證號(hào)="&sqlstr謝謝閱讀Adodc1.RefreshEndSubPrivateSubCommand2_Click()感謝閱讀ret=MsgBox("是否要?jiǎng)h除"+Adodc1.Recordset("工作證號(hào)")+"號(hào)教師的記錄",vbYesNo,"提示")謝謝閱讀Ifret=vbYesThensqlcmd.ActiveConnection=sqlcon感謝閱讀sqlcmd.CommandText="deletefrom教師where工作證號(hào)="+Adodc1.Recordset("謝謝閱讀工作證號(hào)")sqlcmd.ExecuteAdodc1.RecordSource="select*from教師"謝謝閱讀Adodc1.RefreshEndIfEndSubPrivateSubCommand3_Click()感謝閱讀DimsqlupstrAsStringsqlupstr="select*from教師where工作證號(hào)="&Trim(Text1.Text)精品文檔放心下載sqlres.Opensqlupstr,sqlcon,adOpenDyamic,adLockPessimistic感謝閱讀IfNotsqlres.EOFThenElsesqlres.AddNewsqlres("工作證號(hào)")=Text1.Text精品文檔放心下載sqlres("姓名")=Text2.Textsqlres("職稱")=Text3.Textsqlres("電話")=Text4.Textsqlres("系代號(hào)")=Text5.Text精品文檔放心下載sqlres.UpdateEndIfsqlres.CloseAdodc1.RecordSource="select*from教師"感謝閱讀Adodc1.RefreshEndSubPrivateSubCommand4_Click()謝謝閱讀DimsqlupstrAsStringsqlupstr="select*from教師where工作證號(hào)="&Trim(Text1.Text)感謝閱讀sqlres.Opensqlupstr,sqlcon,adOpenDyamic,adLockPessimistic精品文檔放心下載IfNotsqlres.EOFThenElsesqlres.AddNewsqlres("工作證號(hào)")=Text1.Text精品文檔放心下載sqlres("姓名")=Text2.Textsqlres("職稱")=Text3.Textsqlres("電話")=Text4.Textsqlres("系代號(hào)")=Text5.Text感謝閱讀sqlres.UpdateEndIfsqlres.CloseAdodc1.RecordSource="select*from教師"感謝閱讀Adodc1.RefreshEndSubPrivateSubForm_Load()sqlcon.Provider="SQLOLEDB"精品文檔放心下載sqlcon.Open"Server=Y500-X64\SQLEXPRESS;DataBase=教務(wù)管理系統(tǒng);UID=sa;PWD=;"感謝閱讀EndSubPrivateSubForm_Unload(CancelAsInteger)感謝閱讀sqlcon.CloseEndSubPublicSubMakeSqlStr()sqlstr=""IfTrim(Text6.Text)<>""Then精品文檔放心下載sqlstr=Trim(Text6.Text)EndIfIfTrim(Text6.Text)=""Then謝謝閱讀sqlstr=Text1.TextEndIfEndSub5.課程信息代碼：PrivatesqlconAsNewADODB.Connection感謝閱讀PrivatesqlresAsNewADODB.Recordset謝謝閱讀PrivatesqlcmdAsNewADODB.Command感謝閱讀DimsqlstrAsStringPrivateSubCommand1_Click()精品文檔放心下載MakeSqlStrAdodc1.RecordSource="select*from選修where課程號(hào)&學(xué)號(hào)="&sqlstr感謝閱讀Adodc1.RefreshEndSubPrivateSubForm_Load()sqlcon.Provider="SQLOLEDB"謝謝閱讀sqlcon.Open"Server=Y500-X64\SQLEXPRESS;DataBase=教務(wù)管理系統(tǒng);UID=sa;PWD=;"謝謝閱讀EndSubPrivateSubForm_Unload(CancelAsInteger)精品文檔放心下載sqlcon.CloseEndSubPublicSubMakeSqlStr()sqlstr=""IfTrim(Text7.Text)<>""Then精品文檔放心下載sqlstr=Trim(Text7.Text)EndIfIfTrim(Text7.Text)=""Then謝謝閱讀sqlstr=Text1.TextEndIfEndSub6.學(xué)生選課：PrivatesqlconAsNewADODB.Connection感謝閱讀PrivatesqlresAsNewADODB.Recordset感謝閱讀PrivatesqlcmdAsNewADODB.Command謝謝閱讀D