圖書管理系統(tǒng)數(shù)據(jù)庫

1、數(shù)據(jù)庫原理與應(yīng)用教程實驗報告數(shù)據(jù)庫分析與設(shè)計-圖書管理系統(tǒng)一、需求說明要實現(xiàn)一個簡化得圖書管理系統(tǒng)，在此圖書管理系統(tǒng)中只涉及學生信息、借閱信息與管理者信息得管理。此系統(tǒng)要求能夠記住書籍得基本信息、學生得信息與管理者得信息。該系統(tǒng)得業(yè)務(wù)要求為:一名學生可以在不同得日期多次借閱同一本書。一名學生可以同時借閱多本不同得圖書。一本書可以在不同得時間借給不同得學生.一名學生不能在同一天對同一本書借閱多次.一名管理員可以同時管理多本圖書.該系統(tǒng)得基本信息包括：學生信息:姓名,學號,學院，專業(yè)，年級。圖書信息：圖書名稱,圖書編號，出版社名稱,出版日期,作者，就是否可借.管理員信息:管理員姓名,管理員編號。除

2、上述要求外,該系統(tǒng)還需產(chǎn)生如下報表：學生借閱圖書信息表:學號，圖書編號,圖書名稱,借閱日期,應(yīng)歸還日期。圖書管理表：管理日期，管理員編號，管理員姓名。二、數(shù)據(jù)庫結(jié)構(gòu)設(shè)計2、1概念結(jié)構(gòu)設(shè)計概念結(jié)構(gòu)設(shè)計就是根據(jù)需求分析得結(jié)果產(chǎn)生概念結(jié)構(gòu)設(shè)計得E-R模型。由于這個系統(tǒng)比較簡單,因此這里采用自頂向下得設(shè)計方法。自頂向下設(shè)計得關(guān)鍵就是首先要確定系統(tǒng)得核心活動。所謂核心活動就就是系統(tǒng)中得其她活動都要圍繞這個活動展開或與此活動密切相關(guān)確定了核心活動之后，系統(tǒng)就有了可擴展得余地。對于這個圖書管理系統(tǒng),其核心活動就是圖書，學生與圖書之間就是通過學生借閱圖書發(fā)生聯(lián)系得,管理員與圖書之間就是通過管理員管理圖書發(fā)生聯(lián)

3、系得。至此，此系統(tǒng)包含得實體有：圖書：用于描述課程得基本信息，用圖書編號標識學生：用于描述學生得基本信息，用學號標識。管理員:用于描述管理員得基本信息，用管理員編號標識。由于一名學生可以借閱多本圖書，并且一本書可以在不同時間借給不同得學生.因此，學生與圖書之間就是多對多得聯(lián)系.又由于一本圖書可以由多名管理員管理，而且一名管理員可以管理多本圖書。因此，管理員與圖書之間也就是多對多得聯(lián)系.其基本ER模型如圖1所示：根據(jù)需求分析得結(jié)果，該ER模型模型中個實體所包含得屬性如下：學生：姓名，學號，學院，專業(yè)，年級。圖書：圖書名稱，圖書編號，出版社名稱，出版日期，作者，就是否可借.管理員:管理員姓名，管理

4、員編號。各聯(lián)系本身應(yīng)具有得屬性為：借閱：學號，圖書編號，圖書名稱，借閱日期,應(yīng)歸還日期.管理：管理日期，管理員編號，管理員姓名。2、2邏輯結(jié)果設(shè)計這個ER模型轉(zhuǎn)換出得關(guān)系模式如下，其中主碼用下劃線標識：學生（空匕姓名，學院，專業(yè)，年級）圖書（圖書編號、圖書名稱，出版社名稱，出版日期，作者，就是否可借）管理員（管理員編號.管理員姓名）借閱（學號，圖書標號,圖書名稱，借閱日期,應(yīng)歸還日期），其中圖書編號為引用“圖書”關(guān)系模式得外碼；學號為引用“學生”關(guān)系模式得外碼.管理（管理日期，管理員編號,管理員姓名），其中管理員編號為引用“管理員”關(guān)系模式得外碼。（1）確定各管就是模式就是否屬于第三范式經(jīng)過分

5、析發(fā)現(xiàn)，“學生”、“圖書”、“管理員”、“借閱”與“管理”5個關(guān)系模式中，都不存在部分依賴與傳遞依賴關(guān)系，因此都屬于第三范式2)確定信息得完整性該教學管理系統(tǒng)要產(chǎn)生:學生借閱圖書信息、圖書管理2個報表,分別分析如下:“學生借閱圖書信息表”包括學號、圖書編號、圖書名稱、借閱日期、應(yīng)歸還日期。其中“學號”可由“學生"關(guān)系模式得到,“圖書編號"、“圖書名稱”、“借閱日期”、“應(yīng)歸還日期”可由“借閱”關(guān)系模式得到,因此可以滿足學生借閱圖書信息表得要求?！皥D書管理表”包括管理日期、管理員編號、管理員姓名。其中“管理日期”可由“管理”關(guān)系模式得到，“管理員編號”,“管理員姓名”可由“管

6、理員”關(guān)系模式得到。因此,所有關(guān)系模式滿足所有報表得信息要求。至此,關(guān)系模式設(shè)計完畢。下面給出創(chuàng)建這些關(guān)系表得SQL語句示例，其中得數(shù)據(jù)類型可根據(jù)實際情況調(diào)整,為方便理解,表名、列名均用中文表示。CREATETABLE學生表(學號char(10)PRIMARYKEY,姓名char(10)NOTNULL,學院chiar(20)NOTNULL,專業(yè)chiar(20)NOTNULL,年級char(8)NOTNULL)CREATETABLE圖書表(圖書編號char(20)PRIMARYKEY,圖書名稱char(20)NOTNULL,出版社名稱char(20)NOTNULL,出版日期datetimeNO

7、TNULL,作者char(10)NOTNULL)CREATETABLE管理員表(管理員編號char(10)PRIMARYKEY,管理員姓名char(10)NOTNULL)CREATETABLE借閱表(學號char(10)NOTNULL,姓名char(10)NOTNULL,圖書編號char(20)NOTNULL,圖書名稱char(20)NOTNULL,借閱日期datetimeNOTNULL,應(yīng)歸還日期datetimeNOTNULL,PRIMARYKEY（學號，圖書編號），F(xiàn)OREIGNKEY（學號）REFERENCES學生表（學號）,FOREIGNKEY（圖書編號）REFERENCES圖書表（圖

8、書編號）CREATETABLE管理表（管理日期datetimeNOTNULL,管理員編號char（10）NOTNULL,管理員姓名char（10）NOTNULL,PRIMARYKEY（管理日期，管理員編號），F(xiàn)OREIGNKEY（管理員編號）REFERENCES管理員表（管理員編號）2、2、2設(shè)計外模式（1）學生借閱圖書信息表我們將該報表直接用查詢語句得形式生成,將動態(tài)查詢條件作為查詢語句中得數(shù)據(jù)篩選條件。例如,假設(shè)要為大三學生生成借閱圖書情況得報表，則語句如下:SELECT學號，姓名，圖書名稱FROM借閱表WHERE年級=大三（2）圖書管理表該表可以查詢出在哪一天由哪位管理員借出了哪些圖書,

9、因此,直接用查詢語句生成。SELECT圖書編號，圖書名稱，管理日期，管理員編號，管理員姓名FROM借閱表JOIN管理表ON借閱表、借閱日期=管理表、管理日期三、數(shù)據(jù)庫行為設(shè)計對于數(shù)據(jù)庫應(yīng)用系統(tǒng)來說,最常用得功能就是安全控制功能,數(shù)據(jù)得增、刪、改、查功能以及生成報表得功能。本系統(tǒng)也應(yīng)包括這些基本得操作。3、 1安全控件任何數(shù)據(jù)庫應(yīng)用系統(tǒng)都需要安全控件功能,這個圖書管理系統(tǒng)也不例外。假設(shè)將系統(tǒng)得用戶分為如下幾類:圖書館系統(tǒng)管理人員：具有系統(tǒng)得全部操作權(quán)限。教務(wù)部門:具有對學生基本信息、圖書信息與管理員信息得維護權(quán)學生:具有對圖書信息得查詢權(quán)。在實現(xiàn)時,可將每一類用戶定義為一個角色,這樣在授權(quán)時只需

10、對角色授權(quán),而無需對每個具體得用戶授權(quán)。3、2數(shù)據(jù)操作功能數(shù)據(jù)操作功能包括對這些數(shù)據(jù)得錄入、刪除、修改功能.具體如下:（1）數(shù)據(jù)錄入包括對這5張表得錄入。只有具有相應(yīng)權(quán)限得用戶才能錄入相應(yīng)表中得數(shù)據(jù)。（ 2）數(shù)據(jù)刪除包括對這5張表得刪除.只有具有相應(yīng)權(quán)限得用戶才能刪除相應(yīng)表中得數(shù)據(jù)。數(shù)據(jù)得刪除要注意表之間得關(guān)聯(lián)關(guān)系。比如在刪除“學生表”中得數(shù)據(jù)之前,應(yīng)先刪除該學生在“借閱表"中得信息,然后再學生表中刪除該學生,以保證不違反參照完整性約束。另外,在實際執(zhí)行刪除操作之前應(yīng)該提醒用戶就是否真得要刪除數(shù)據(jù)，以免發(fā)生誤操作.（ 3）數(shù)據(jù)修改當某些數(shù)據(jù)發(fā)生變化或某些數(shù)據(jù)錄入不正確時,應(yīng)該允許用戶

11、對數(shù)據(jù)庫中得數(shù)據(jù)進行修改，修改數(shù)據(jù)得操作一般就是先根據(jù)一定得條件查詢出要修改得記錄然后在對其中得某些記錄進行修改，修改完成后再回到數(shù)據(jù)庫中同數(shù)據(jù)得錄入與刪除一樣,只有具有相應(yīng)權(quán)限得用戶才能修改相應(yīng)表中得數(shù)據(jù).（ 4）數(shù)據(jù)查詢在數(shù)據(jù)庫應(yīng)用系統(tǒng)中,數(shù)據(jù)查詢就是最常用得功能.數(shù)據(jù)查詢應(yīng)根據(jù)用戶提出得查詢條件進行,在設(shè)計系統(tǒng)時應(yīng)首先征求用戶得查詢需求，然后根據(jù)這些需求整理出系統(tǒng)應(yīng)具有得查詢功能。一般允許所有使用數(shù)據(jù)庫得人都具有查詢數(shù)據(jù)得權(quán)限。本系統(tǒng)提出得查詢要求有:根據(jù)學號、學院、專業(yè)等信息查詢學生得基本信息。根據(jù)圖書編號查詢圖書得基本信息。根據(jù)管理員編號查詢管理員得基本信息。統(tǒng)計各個年級學生借書得總

12、數(shù)量。等等。3、3應(yīng)用程序?qū)崿F(xiàn)3、31語言及DBMS得選擇制作這5個表得數(shù)據(jù)庫使用DBMS得就是ACCESS,然后用VB語言編寫程序代碼，實現(xiàn)程序得各個功能。其中用到了ADO數(shù)據(jù)控件與DataGrid控件。3、32應(yīng)用程序得編寫(1)學生表VB代碼PrivateSubmand1_Click()'"添加"命令按鈕AdodcStudent、Recordset、AddNew'使”添加與”刪除"按鈕成為不可用狀態(tài)mand1、Enabled=Falsemand3、Enabled=Fa1se使”更新"按鈕成為可用狀態(tài)mand4、Enabled=Tru

13、e清空文本框中顯示得內(nèi)容Text1>Text=""Text2、Text=""Text3、Text=""Text4、Text="Text5、Text=""EndSubPrivateSubmand2_Click()'"退出"命令按鈕EndEndSubPrivateSubmand3_Click()'"刪除"命令按鈕DimresAsIntegerres=MsgBox("確實要刪除此行記錄嗎？",vbExclamation+vbYes

14、No+vbDefaultButton2)'提示用戶Ifres=vbYesThen'如確實要刪除AdodcStudent、Recordset、DeleteAdodcStudent>Recordset、MoveNextIfAdodcStudent、Recordset、EOF=TrueThenAdodeStudent、Recordset、MoveLastEndIfEndIfEndSubPrivateSubmand4_Click()'"更新"命令按鈕將文本框中得當前值寫入結(jié)果集中相應(yīng)字段中AdodcStudent、Recordset、Fie1ds(&q

15、uot;學號")=Trim(Text1>Text)AdodcStudent、Recordset、Fields("姓名")=Trim(Text2、Text)AdodcStudent、Recordset、Fie1ds("學院")=Trim(Text3、Text)AdodcStudent、Recordset、Fie1ds("專業(yè)")=Trim(Text4>Text)AdodcStudent、Recordset、Fie1ds("年級")=Trim(Text5、Text)使更新生效AdodcStuden

16、t、Recordset、Update使"添加"與"刪除”按鈕成為可用狀態(tài)mandl、Enabled=Truemand3、Enabled=TrueEndSubPrivateSubmand5Click()'"上一條"命令按鈕AdodcStudent、Recordset、MovePreviousEndSubPrivateSubmand6_Click()'"下一條"命令按鈕AdodcStudent、Rec0rdset、MoveNextEndSub(2)圖書表VB代碼PrivateSubmand2_Click()

17、9;"添加"命令按鈕AdodcBook、Recordset、AddNew'使"添加”與”刪除"按鈕成為不可用狀態(tài)mand2、Enabled=Falsemand3、Enabled=False使更新”與"取消按鈕成為可用狀態(tài)mand4、Enabled=Truemand5、Enabled=True清空文本框中顯示得內(nèi)容Text1、Text="”Text2、Text=""Text3、Text="Text4、Text="”Text5、Text="”EndSubPrivateSubmand

18、3_Click()'"刪除"命令按鈕DimresAsIntegerres=MsgBox("確定要刪除此行記錄？",vbExclamation+vbYesNo+vbDefaultButton2)'提示用戶Ifres=vbYesThen'如確實要刪除AdodcBook、Recordset、DeleteAdodcBook、Recordset、MoveNextIfAdodcBook、Recordset>EOF=TrueThenAdodcBook、Recordset、MoveLastEndIfEndIfEndSubPrivateSub

19、mand4_C1ick()'"更新"命令按鈕'將文本框中得當前值寫入結(jié)果集中相應(yīng)字段中AdodeBook、Recordset、Fie1ds("圖書編號")=Trim(Text1、Text)AdodcBook、Recordset、Fields("圖書名稱")=Trim(Text2、Text)AdodcBook、RecordsetFie1ds("出版社名稱")=Trim(Text3>Text)AdodcBook、Recordset、Fie1ds("出版日期")=Trim(Tex

20、t4、Text)AdodcBook、Recordset、Fie1ds("作者")=Trim(Text5、Text)使更新生效AdodcBook、Recordset、Update使”添加"與刪除"按鈕成為可用狀態(tài)mand2、Enabled=Truemand3、Enab1ed=True'使"取消按鈕成為不可用狀態(tài)mand5、Enabled=FalseEndSubPrivateSubmand5_Click()mand2、Enab1ed=Truemand3、Enabled=Truemand5、Enabled=FaiseEndSubPrivate

21、Submand6_Click()'”上一條”命令按鈕AdodcBook、Recordset、MovePreviousEndSubPrivateSubmand7_Click()'"下一條"命令按鈕AdodcBook、Recordset、MoveNextEndSub(3)管理員表VB代碼PrivateSubmand1_C1ick()/"退出"命令按鈕EndEndSubPrivateSubmand2_C1ick()'"添加"命令按鈕AdodcManager、Recordset、AddNew'使添加"

22、與"刪除”按鈕成為不可用狀態(tài)mand2、Enabled=Falsemand3、Enabled=Fa1se'使"更新"按鈕成為可用狀態(tài)mand4、Enabled=True'清空文本框中現(xiàn)實得內(nèi)容Text1、Text="”Text2、Text=EndSubPrivateSubmand3_Click()'"刪除"命令按鈕DimresAsIntegerres=MsgBox("確實要刪除此行記錄嗎？",vbExclamation+vbYesNo+vbDefaultButton2)'提示用戶If

23、res=vbYesThen'如確實要刪除AdodcManager、Recordset、DeleteAdodcManager、Recordset、MoveNextIfAdodcManager、Recordset、EOF=TrueThenAdodcManager、Recordset、MoveLastEndIfEndIfEndSubPrivateSubmand4_Click()'"更新"命令按鈕將文本框中得當前值寫入結(jié)果集中相應(yīng)字段中AdodcManager、Recordset、Fields("管理員編號")=Trim(Textl、Text)A

24、dodcManager、Recordset、Fie1ds("管理員姓名")=Trim(Text2、Text)'使更新生效AdodcManager、Recordset、Update使”添加”與"刪除按鈕成為可用狀態(tài)mand2、Enabled=Truemand3、Enabled=TrueEndSubPrivateSubmand5_C1ick()'"上一條"命令按鈕AdodcManager、Recordset、MovePreviousEndSubPrivateSubmand6_Click()'"下一條"命令

25、按鈕AdodcManager、Recordset、MoveNextEndSub(4)借閱表VB代碼PrivateSubmand1_C1ick()'"退出"命令按鈕EndEndSubPrivateSubmand2_Click()'"上一條"命令按鈕AdodcBorrown、Recordset、MovePreviousEndSubPrivateSubmand3C1ick()'"下一條”命令按鈕AdodcBorrown、Recordset、MoveNextEndSubPrivateSubmand4_C1ick()'&q

26、uot;添加"命令按鈕AdodcBorrown、Recordset、AddNew使添加”與”刪除”按鈕成為不可用狀態(tài)mand4、Enab1ed=Fa1semand5>Enabled=False使”更新按鈕成為可用狀態(tài)mand6、Enabled=True'清空文本框中現(xiàn)實得內(nèi)容Text1>Text=""Text2、Text=Text3、Text=""Text4、Text="Text5、Text="”Text6、Text=""EndSubPrivateSubmand5_Click()

27、9;"刪除"命令按鈕DimresAsIntegerres=MsgBox("確實要刪除此行記錄嗎？"，vbExclamation+vbYesNo+vbDefau1tButton2)'提示用戶Ifres=vbYesThen'如確實要刪除AdodcBorrown、Recordset、DeleteAdodcBorrown、Recordset、MoveNextIfAdodcBorrown、Recordset、EOF=TrueThenAdodcBorrown、Recordset、MoveLastEndIfEndIfEndSubPrivateSubma

28、nd6_Click()/“更新"命令按鈕'將文本框中得當前值寫入結(jié)果集中相應(yīng)字段中AdodcBorrown、Recordset、Fie1ds("學號")=Trim(Textl、Text)AdodcBorrown、Recordset、Fields，姓名")=Trim(Text2、Text)AdodcBorrown、Recordset、Fie1ds("圖書編號")=Trim(Text3、Text)AdodcBorrown、Recordset、Fields("圖書名稱")=Trim(Text4、Text)Adod

29、cBorrown>Recordset、Fie1ds("借閱日期")=Trim(Text5、Text)AdodcBorrown、Recordset、Fields("應(yīng)歸還日期")=Trim(Text6、Text)使更新生效AdodcBorrown、Recordset、Update使添加”與”刪除”按鈕成為可用狀態(tài)mand4、Enabled=Truemand5>Enabled=TrueEndSub(5)管理表VB代碼PrivateSubmand1Click()/"退出"命令按鈕EndEndSubPrivateSubmand2_

30、Click()'"添加"命令按鈕AdodcManagement、Recordset、AddNew'使"添加”與"刪除”按鈕成為不可用狀態(tài)mand2、Enabled=Falsemand3、Enabled=Fa1se使”更新"按鈕成為可用狀態(tài)mand4、Enabled=True清空文本框中現(xiàn)實得內(nèi)容Text1、Text="”Text2>Text=""Text3、Text=""EndSubPrivateSubmand3_Click()'"刪除"命令按鈕

31、DimresAsIntegerres=MsgBox("確實要刪除此行記錄嗎？"，vbExclamation+vbYesNo+vbDefaultButton2)'提示用戶Ifres=vbYesThen'如確實要刪除AdodcManagement、Recordset、DeleteAdodcManagement、Recordset、MoveNextIfAdodcManagement、Recordset、EOF=TrueThenAdodcManagement、Recordset、MoveLastEndIfEndIfEndSubPrivateSubmand4_C1ic

32、k()'"更新"命令按鈕'將文本框中得當前值寫入結(jié)果集中相應(yīng)字段中AdodcManagement、Recordset、Fields("管理日期")=Trim(Text1、Text)AdodcManagement、Recordset、Fields("管理員編號")=Trim(Text2>Text)AdodcManagement、Recordset、Fields("管理員姓名")=Trim(Text3、Text)'使更新生效AdodcManagement、Recordset、Update使

33、"添加”與刪除”按鈕成為可用狀態(tài)mand2、Enabled=Truemand3、Enabled=TrueEndSubPrivateSubmand5Click()'"上一條"命令按鈕AdodcManggement、Recordset、MovePreviousEndSubPrivateSubmand6_Click()'"下一條”命令按鈕AdodcManagement、Recordset、MoveNextEndSub3、33應(yīng)用程序得使用說明為數(shù)據(jù)庫中5個表設(shè)計得VB工程中,其基本類型相似,由于涉及到參照完整性約束，因此這里將重點說明“學生表&

34、quot;與“借閱表"得使用說明，“圖書表"與“管理員表”參照“學生表”,“管理表參照“借閱表”。(1)學生表使用說明啟動VB程序，打開“學生表”得工程文件,并運行該程序1）單擊“上一條” “下一條”按鈕，移動指針將上下移動到相應(yīng)得條目可以在文本框中輸入數(shù)據(jù),2）單擊“添加M按鈕，窗體上得文本框控件將清空,數(shù)據(jù)將同時顯示在“學生表”得最后一行條目中。3）單擊“更新”按鈕，數(shù)據(jù)將完整地添加到“學生表”中4）要刪除更新得數(shù)據(jù)時，先將移動指針指向要刪除得條目，然后單擊“刪除”按鈕，新添加得數(shù)據(jù)將從“學生表”中刪除5）單擊“退出”按鈕，結(jié)束程序代碼，退出運行界面。（2）圖書表使用說明啟動VB程