圖書管理系統(tǒng)論文(vb%2Baccess)

1、目   錄內(nèi)容摘要 2引言 3第一章   課題簡介 4第二章   需求分析 52.1圖書管理現(xiàn)狀52.2系統(tǒng)的數(shù)據(jù)字典62.3系統(tǒng)數(shù)據(jù)流程圖 10第三章   系統(tǒng)概念113.1系統(tǒng)功能模塊解析 123.2系統(tǒng)功能結(jié)構(gòu)圖 133.3系統(tǒng)ER圖的設(shè)計 14第四章   系統(tǒng)邏輯和物理設(shè)計 194.1數(shù)據(jù)庫的設(shè)計 194.2數(shù)據(jù)庫的維護(hù) 22 4.3功能模塊的實(shí)現(xiàn) 24第五章   調(diào)試與分析445.1存在問題及解決方案 455.2進(jìn)一步改進(jìn)設(shè)想 45第六章   用

2、戶操作說明 466.1軟硬件環(huán)境 466.2應(yīng)用系統(tǒng)安裝 466.3操作手冊 46小結(jié)46參考文獻(xiàn)47致謝47圖書管理系統(tǒng)論文(vb+access)作者：王凡 日期：2007-12-3內(nèi)容摘要圖書管理系統(tǒng)是采用Visual Basic6.0開發(fā)的一個數(shù)據(jù)庫管理系統(tǒng)。開發(fā)本系統(tǒng)的基本步驟：需求分析、系統(tǒng)概念設(shè)計、系統(tǒng)邏輯和物理設(shè)計、系統(tǒng)實(shí)現(xiàn)和維護(hù)。在系統(tǒng)分析中先后用數(shù)據(jù)字典、數(shù)據(jù)流程、系統(tǒng)的功能結(jié)構(gòu)圖、ER圖分析了系統(tǒng)所需的各種數(shù)據(jù)。在系統(tǒng)的設(shè)計過程中,我們采用了模塊獨(dú)立設(shè)計法,比較詳細(xì)的展現(xiàn)了各個模塊的功能。在庫和表的設(shè)計當(dāng)中, 我們力求層次清晰，設(shè)計簡單實(shí)用。在系統(tǒng)具體實(shí)行階段中，我們精心細(xì)

3、致的畫出了各個窗體并給出了相應(yīng)的事件和代碼，以實(shí)現(xiàn)各個窗體的作用。本系統(tǒng)雖然設(shè)計簡單，但有一定的實(shí)用性。系統(tǒng)的功能較為全面，使用簡單，基本上可以作為一般大中小學(xué)的圖書管理系統(tǒng)。 關(guān)鍵字：數(shù)據(jù)庫   SQL 語言  Visual Basic6.0   圖書  圖書管理   窗體  引 言當(dāng)今時代是飛速發(fā)展的的信息時代。在各行各業(yè)中離不開信息處理，這正是計算機(jī)被廣泛應(yīng)用于信息管理系統(tǒng)的原因。計算機(jī)的最大好處在于利用它能夠進(jìn)行信息管理。使用計算機(jī)進(jìn)行信息控制，不僅提高了工作效率，而且大大的提高了其安全

4、性。尤其對于復(fù)雜的信息管理，計算機(jī)能夠充分發(fā)揮它的優(yōu)越性。計算機(jī)進(jìn)行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)是系統(tǒng)管理的前提。本系統(tǒng)就是為了管理好圖書館信息而設(shè)計的。圖書館作為一種信息資源的集散地，圖書和用戶借閱資料繁多，包含很多的信息數(shù)據(jù)的管理，現(xiàn)今，有很多的圖書館都是初步開始使用，甚至尚未使用計算機(jī)進(jìn)行信息管理。根據(jù)調(diào)查得知，他們以前對信息管理的主要方式是基于文本，表格等紙介質(zhì)的手工處理，對于圖書借閱情況（如借書天數(shù)，超過限定借書時間的天數(shù)）的統(tǒng)計和核實(shí)等往往采用對借書卡的人工檢查進(jìn)行，對借閱者的借閱權(quán)限，以及借閱天數(shù)等用人工計算，手抄進(jìn)行。數(shù)據(jù)處理工作量大，容易出錯。由于數(shù)據(jù)繁多

5、，容易丟失，且不易查找。總的來說，缺乏系統(tǒng)規(guī)范的信息管理手段。盡管有的圖書館有計算機(jī)，但是尚未用于信息管理，沒有發(fā)揮它的效力，資源閑置比較突出，這就是管理信息系統(tǒng)的開發(fā)的基于環(huán)境。基于這個問題，我認(rèn)為有必要建立一個圖書管理系統(tǒng)，使圖書管理工作規(guī)范化，系統(tǒng)化，程序化，避免圖書管理的隨意性，提高信息處理的速度和準(zhǔn)確性，能夠及時，準(zhǔn)確，有效的查詢和修改圖書情況。第一章      課題簡介課題：圖書管理系統(tǒng)。任務(wù)：針對各大中專院校的圖書管理現(xiàn)狀，設(shè)計出適合一般學(xué)校的計算機(jī)輔助圖書管理系統(tǒng)。實(shí)現(xiàn)對圖書基本信息、讀者基本信息進(jìn)行計算機(jī)輔助管理，完

6、成借書和還書有關(guān)信息的記錄、修改、查詢、刪除等一系列任務(wù)的計算機(jī)管理與實(shí)現(xiàn).。開發(fā)環(huán)境：本圖書管理開發(fā)系統(tǒng)是在Pentyum 166mmx 以上機(jī)型的計算機(jī)上進(jìn)行開發(fā)并獲得通過的，同時方便系統(tǒng)開發(fā)，減少開發(fā)過程的難度，我們是基于以下的軟件環(huán)境。·以Windows 98為操作系統(tǒng)·以Visual Basic6.0為開發(fā)工具·以Access 2000作為后臺數(shù)據(jù)庫功能概述：該系統(tǒng)界面友好，操作簡便，能完成添加圖書信息，修改圖書信息，查詢圖書信息，添加讀者類別，修改讀者類別，查詢讀者信息，修改讀者信息等一系列圖書管理功能，開發(fā)本系統(tǒng)的總體任務(wù)是實(shí)現(xiàn)圖書管理的系統(tǒng)化和自動

7、化，幫助管理人員更好更高效地完成圖書管理工作。本著實(shí)用性和介紹性的原則，整個系統(tǒng)由五大模塊組成，每個大的模塊又包括三至四個小的模塊。一、圖書管理部分：包括圖書信息管理和類別管理，其功能是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容進(jìn)行添加、修改、查詢等操作。二、借閱管理部分：包括借書管理和還書管理，其功能是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和查詢等操作。三、讀者管理部分：包括讀者信息管理和讀者類別管理，其功能是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和修改等操作。四、系統(tǒng)管理部分：包括修改系統(tǒng)用戶密碼和增加新用戶兩項功能。 五、幫助部分：包括系統(tǒng)設(shè)計前臺和后臺簡概，退出系統(tǒng)等功能。系統(tǒng)具有高效、易操作、易維護(hù)等特點(diǎn)，并且系統(tǒng)結(jié)構(gòu)清晰、界面

8、友好，功能較為齊全，能有效地協(xié)助管理人員進(jìn)行圖書管工作。如果想真正把它用到圖書館的圖書自動化管理中，還需要讀者對該系統(tǒng)進(jìn)行一步的完善工作。 第二章  需求分析需求分析階段確定的系統(tǒng)邏輯模型是以后設(shè)計和實(shí)現(xiàn)目標(biāo)系統(tǒng)的基礎(chǔ)，因此必須準(zhǔn)確完整地體現(xiàn)用戶的要求。在這一章里，我將給出系統(tǒng)的數(shù)據(jù)流圖，功能結(jié)構(gòu)圖，數(shù)據(jù)字典，為系統(tǒng)的設(shè)計奠定基礎(chǔ)。2.1圖書管理現(xiàn)狀隨著計算機(jī)技術(shù)的飛速發(fā)展，其應(yīng)用方面已滲透到社會生活的各個領(lǐng)域。它已經(jīng)成為我們學(xué)習(xí)和工作的得力助手。在學(xué)校，尤其是在一些高校，圖書是學(xué)校的一項重要資源，圖書的管理也是學(xué)校的一項常規(guī)性的重要工作。而長期以來，學(xué)生圖書管理都是依賴人

9、工進(jìn)行的?，F(xiàn)今，有很多的學(xué)校都已經(jīng)開始使用計算機(jī)進(jìn)行圖書信息管理，并且起得良好的效果。近年來我校招生情況越來越好，所以圖書管理工作越來越繁重，但由于種種原因，管理人員并沒有增加，因此原有的人工管理工作已不能適應(yīng)現(xiàn)行的工作需要。同時，陳舊的人工管理也不利于推廣計算機(jī)應(yīng)用。為使圖書管理工作科學(xué)化、規(guī)范化，就必須采用計算機(jī)輔助管理。2.2系統(tǒng)的數(shù)據(jù)字典數(shù)據(jù)字典的作用是在軟件分析和設(shè)計的過程中給人提供關(guān)于數(shù)據(jù)的描述信息。數(shù)據(jù)流圖和數(shù)據(jù)字典共同構(gòu)成系統(tǒng)的邏輯模型，沒有數(shù)據(jù)字典數(shù)據(jù)流圖就不嚴(yán)格，然而沒有數(shù)據(jù)流圖數(shù)據(jù)字典也難于發(fā)揮作用。只有數(shù)據(jù)流圖和對數(shù)據(jù)流圖的精確定義放在一起，才能共同構(gòu)成系統(tǒng)的規(guī)格說明。

10、系統(tǒng)開發(fā)時，常用卡片的形式書寫保存描述一個數(shù)據(jù)元素。下面給出本系統(tǒng)的主要數(shù)據(jù)元素的數(shù)據(jù)字典卡片：名字：讀者信息查詢報表別名：讀者信息表描述：讀者基本情況查詢結(jié)果的信息表定義：讀者信息查詢報表讀者編號讀者姓名性別類別單位住址電話登記日期已借書數(shù)量位置：輸出到打印機(jī) 名字：圖書信息查詢報表別名：圖書信息表描述：各種書籍查詢基本信息表定義：圖書信息查詢報表圖書編號書名類別作者出版社出版日期登記日期是否被借出位置：輸出到打印機(jī)2.3.  數(shù)據(jù)流程圖數(shù)據(jù)流程圖（Data Flow DFD）是描述實(shí)際業(yè)務(wù)管理系統(tǒng)工作流程的一種圖形表示法。它描繪系統(tǒng)的邏輯模型圖，其中沒有任何具體的物理元

11、素，只是描繪信息在系統(tǒng)中流動和處理的情況。因為數(shù)據(jù)流圖是邏輯系統(tǒng)的圖形表示，即使不是專業(yè)的計算機(jī)技術(shù)人員也容易理解，所以是極好的通信工具。此外，設(shè)計數(shù)據(jù)流圖只需考慮系統(tǒng)必須完成的基本邏輯功能，完全不需要考慮如何具體地實(shí)現(xiàn)這些功能，所以它也是軟件設(shè)計的很好的出發(fā)點(diǎn)。圖書管理系統(tǒng)主要是為了對圖書、讀者基本信息等進(jìn)行計算機(jī)管理。下面就是對各個功能模塊的流程分析：1、圖書類別管理基本信息流程： 分析：圖書類別基本信息的流動首先是以圖書類別的編號為依據(jù)，來達(dá)到添加、修改、查詢圖書類別記錄。同時，也對數(shù)據(jù)庫中的圖書類別表的編號進(jìn)行檢查。 2、圖書信息管理基本信息流程：分析：圖書基本信息的流動首先

12、是以圖書編號為流動方向的依據(jù)，來達(dá)到添加、修改、記錄、刪除圖書記錄。為了數(shù)據(jù)的一致性，進(jìn)行這些操作的同時，也對數(shù)據(jù)庫中的記錄進(jìn)行檢查，檢查是否有重復(fù)的記錄。如有則不能進(jìn)行添加。3、讀者類別管理基本信息流程   分析：讀者類別基本信息的流動首先是以讀者類別編號為流動方向的依據(jù)，來達(dá)到添加、修改、記錄讀者類別記錄。為了數(shù)據(jù)的一致性，進(jìn)行這些操作的同時，也對數(shù)據(jù)庫中的記錄進(jìn)行檢查，檢查是否有重復(fù)的記錄。如沒有則可進(jìn)行添加。4、讀者信息管理基本信息流程：分析：讀者基本信息的流動首先是以讀者的編號為依據(jù)，來達(dá)到添加、修改、查詢、刪除讀者信息的記錄。同時，也對數(shù)據(jù)庫中的讀者信息表的編號

13、進(jìn)行檢查。 5、借書管理基本信息流程：分析：借書管理基本信息的流動首先是以借閱編號為流動方向的依據(jù)，來達(dá)到添加、查詢借書記錄。為了數(shù)據(jù)的一致性，進(jìn)行這些操作的同時，也對數(shù)據(jù)庫中的記錄進(jìn)行檢查，檢查是否有重復(fù)的記錄。如沒有則可進(jìn)行添加。6、還書管理基本信息流程：分析：借閱管理部分是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和查詢操作，在借閱信息中包括借閱編號、讀者編號、讀者姓名、書籍名稱、出借日期和還書日期。并通過添加功能來達(dá)到借閱信息表的數(shù)據(jù)的更新，通過查詢可使管理員很快地了解借閱信息，從而避免書籍的丟失現(xiàn)象產(chǎn)生。通過上面對各個模塊流程的分析，那么我們就不難對整個系統(tǒng)的大致流程有一個全面的認(rèn)識。設(shè)計時采用了常

14、用的自頂向下的瀑布式結(jié)構(gòu)化設(shè)計方法。各子系統(tǒng)具有獨(dú)立的數(shù)據(jù)庫結(jié)構(gòu)，同時又具有相關(guān)的關(guān)鍵字，這樣系統(tǒng)做起來后就便于用戶操作。綜合上面各個模塊的流程分析，其總體流程圖如下： 第三章系統(tǒng)的概念 概念設(shè)計階段主要任務(wù)和目標(biāo)是根據(jù)需求分析的結(jié)果，包括一般聯(lián)系實(shí)體，畫出對應(yīng)的ER圖。對于復(fù)雜的系統(tǒng)，通常首先要對它的各功能模進(jìn)行分析，然后再把它的功能結(jié)構(gòu)圖畫出來，便是設(shè)計和優(yōu)化。功能分析之后，再根據(jù)各個崗位、各個用戶對數(shù)據(jù)和使用權(quán)限的不同要求作出局部ER圖，然后再把各個局部ER圖綜合起來形成統(tǒng)一的整體ER圖。 3.1系統(tǒng)模塊功能解析圖書管理部分：包括圖書信息管理和類別管理，其功能是實(shí)現(xiàn)對

15、各部分?jǐn)?shù)據(jù)內(nèi)容進(jìn)行添加、修改、查詢等操作。各管理部分的明細(xì)如下：（1）圖書信息管理：包括圖書信息的添加、圖書信息的修改、圖書信息的查詢和圖書的信息刪除4部分。其中，圖書信息包括圖書編號、書名、圖書類別、作者、出版社、出版日期、登記日期以及是否已被借出。（2）圖書類別管理：包括圖書類別的添加、圖書類別的修改、圖書類別的刪除3部分功能。其中，圖書類別包括類別名稱和類別編號兩部分。借閱管理部分：包括借書管理和還書管理，其功能是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和查詢等操作。各管理部分的明細(xì)如下：（1）借書管理：包括添加借書信息和查詢借書信息2部分功能。其中，借閱信息包括借閱編號、讀者編號、讀者姓名、圖書編號

16、、圖書名稱、出借日期和還書日期。（2）還書管理：實(shí)現(xiàn)添加還書信息功能。其中，還書信息與借閱信息部分明細(xì)相同。讀者管理部分：包括讀者信息管理和讀者類別管理，其功能是實(shí)現(xiàn)對各部分?jǐn)?shù)據(jù)內(nèi)容的添加和修改、刪除等操作。各管理部分的明細(xì)如下：（1）讀者信息管理：包括讀者信的添加、讀者信息的修改、讀者信息的查詢和讀者信息的刪除4部分功能。其中，讀者信息包括讀者姓名、讀者編號、性別、讀者類別、工作單位、家庭住址、電話號碼、登記日期和已借書數(shù)量。（2）讀者類別管理：包括讀者類別的添加、讀者類別的修改、讀者類別的刪除3部分功能。其中，讀者類別包括各種類名稱、借書期限和有效期限4部分。系統(tǒng)管理部分：包括修改系統(tǒng)用戶

17、密碼、增加新用戶和退出系統(tǒng)三項功能。系統(tǒng)初始設(shè)置一個超級用戶名和密碼，操作人員可以利用這個超級用戶名和密碼登錄，之后，可以設(shè)置其他的超級用戶名稱，也可以設(shè)置權(quán)限用戶，同時也設(shè)置了這個用戶可以使用的權(quán)限。 幫助部分：包括系統(tǒng)設(shè)計前臺和后臺簡概述等功能。運(yùn)行本系統(tǒng)程序，首先出現(xiàn)登錄界面，輸入正確的用戶名和密碼后才能進(jìn)入主窗體。對主窗體上各個菜單的設(shè)置采用快捷鍵，便于用戶更方便的應(yīng)用該系統(tǒng)。 3.2 系統(tǒng)功能結(jié)構(gòu)圖圖書管理系統(tǒng)系統(tǒng)結(jié)構(gòu)圖數(shù)據(jù)存盤數(shù)據(jù)讀取期刊打印圖書打印用戶查詢模糊查詢多條件查詢期刊統(tǒng)計圖書統(tǒng)計統(tǒng)計打印檢索家庭圖書主庫用戶建庫編目數(shù)據(jù)存取3.3系統(tǒng)ER圖的設(shè)計軟件系統(tǒng)本質(zhì)上是

18、信息處理系統(tǒng)，因此，在軟件系統(tǒng)的整個開發(fā)過程中都必須考慮兩方面的問題“數(shù)據(jù)”及對數(shù)據(jù)的“處理”。為了把用戶的數(shù)據(jù)要求清晰明確地表達(dá)出來，系統(tǒng)分析員通常建立一個概念性的數(shù)據(jù)模型。概念性數(shù)據(jù)模型是一種面向問題的數(shù)據(jù)模型，是按照用戶的觀點(diǎn)來對數(shù)據(jù)和信息建模，它描述了從用戶角度看到的數(shù)據(jù)，它反映了用戶的現(xiàn)實(shí)環(huán)境，且與在軟件系統(tǒng)中的實(shí)現(xiàn)方法無關(guān)。這里我們運(yùn)用最常用的表示概念性數(shù)據(jù)模型的方法，是實(shí)體聯(lián)系方法即ER模型。通常，軟件系統(tǒng)中有許多數(shù)據(jù)是需要長期保存的。為減少數(shù)據(jù)冗余，簡化修改數(shù)據(jù)的過程，實(shí)現(xiàn)對數(shù)據(jù)進(jìn)化規(guī)范化。正題名期刊號期刊信息表錄入時間 作者ISBN號位置圖書信息表文件類型出版社 附錄價格副題

19、名正題名書籍號登陸用戶信息圖書信息期刊信息數(shù)據(jù)庫數(shù)據(jù)庫表的關(guān)系出版社年份價格卷副題名統(tǒng)一刊號ISSN號登陸用戶信息表用戶口令用戶名密碼 碼用戶名用戶名勝古名名勝古跡 戶管理管理出版社副題名錄入時間ISBN號存放位置作者 者書籍號正題名期刊 刊E-R圖卷年份 份期副題名ISSN號價格圖書統(tǒng)一刊號期刊號正題名程序流程圖： 刪除數(shù)據(jù)程序流圖：刪除數(shù)據(jù)確定刪除？從數(shù)據(jù)庫中刪除錄入數(shù)據(jù)數(shù)據(jù)要求不符合要求 no符合要求 yes 保存到數(shù)據(jù)庫錄入數(shù)據(jù)程序流圖： 輸入查詢關(guān)鍵字尋找數(shù)據(jù)沒有記錄找到記錄從數(shù)據(jù)庫中刪除查詢信息程序流圖第四章 系統(tǒng)邏輯和物理設(shè)計 4.1數(shù)據(jù)庫的設(shè)計根據(jù)上面的數(shù)據(jù)庫ER圖，

20、現(xiàn)在需要將上面的數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)化為SQL Server2000數(shù)據(jù)庫系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫的邏輯結(jié)構(gòu)。在上面的實(shí)體以及實(shí)體之間關(guān)系的基礎(chǔ)上，形成數(shù)據(jù)庫中的表格以及各個表格之間的關(guān)系。圖書管理信息系統(tǒng)數(shù)據(jù)庫中各個表格的設(shè)計結(jié)果如下面的幾個表格所示。每個表格表示在數(shù)據(jù)庫中的一個表。1.圖書類別表字段名數(shù)據(jù)類型說明類別名稱文本必添字段“是”，允許空字符為“否”類別編號文本必添字段“是”，允許空字符為“否” 2.圖書信息表字段名數(shù)據(jù)類型說明圖書編號文本必添字段“是”，允許空字符為“否”書名文本必添字段“是”，允許空字符為“否”類別文本字段大小50作者文本字段大小50出版社文

21、本字段大小50出版日期日期/時間無登記日期日期/時間無是否借出文本字段大小2 3.借閱信息表字段名數(shù)據(jù)類型說明借閱編號自動編號無讀者編號文本字段大小50讀者姓名文本字段大小50圖書編號文本字段大小50圖書名稱文本字段大小50出借日期日期/時間無 4.讀者信息表字段名數(shù)據(jù)類型說明讀者姓名文本必添字段“是”，允許空字符為“否”讀者編號文本必添字段“是”，允許空字符為“否”性別文本字段大小2讀者類別文本字段大小50工作單位文本字段大小50家庭住址文本字段大小50電話號碼文本字段大小50登記日期日期/時間無已借數(shù)量數(shù)字無字段名數(shù)據(jù)類型說明種類名稱文本必添字段“是”，允許空字符為“否

22、”借書數(shù)量數(shù)字無借書期限數(shù)字無有限期限數(shù)字無5.讀者類別表                                              

23、             4.2數(shù)據(jù)庫的維護(hù)  由于應(yīng)用環(huán)境不斷變化，數(shù)據(jù)庫運(yùn)行過和中物理存儲也會不斷變化，對數(shù)據(jù)庫設(shè)計進(jìn)行調(diào)整，修改等維護(hù)工作是設(shè)計工作的繼續(xù)和提高。對數(shù)據(jù)庫經(jīng)常性的維護(hù)工作主要包括：1.數(shù)據(jù)庫的轉(zhuǎn)儲和恢復(fù)針對不同的應(yīng)用要求制定不同的轉(zhuǎn)儲計劃，保證一旦發(fā)生故障能盡快將數(shù)據(jù)庫恢復(fù)到某種一致的狀態(tài)，盡可能減少對數(shù)據(jù)庫的破壞。2.數(shù)據(jù)庫的安全性、完整性控制在數(shù)據(jù)庫運(yùn)行過程中由于應(yīng)用環(huán)境的變化，對安全性的要求也會發(fā)生變化，如原來機(jī)密的數(shù)據(jù)現(xiàn)在可以

24、公開查詢了，新加入的數(shù)據(jù)又可能是機(jī)密的了。系統(tǒng)中用戶的密級改變。這都需要根據(jù)實(shí)際情況修改原有的安全性控制，可以設(shè)置數(shù)據(jù)庫密碼及用戶權(quán)限。同樣，數(shù)據(jù)庫的完整性的約束條件也會變化，需要DBA不斷修正。3.數(shù)據(jù)庫性能的監(jiān)督、分析和改造利用Microsoft SQL Server2000提供的檢測系統(tǒng)性能參數(shù)的工具，在數(shù)據(jù)庫運(yùn)行過程中，監(jiān)督數(shù)據(jù)進(jìn)行分析，找出改進(jìn)系統(tǒng)性能的方法，并做適當(dāng)調(diào)整。4.數(shù)據(jù)庫的重組及重構(gòu)造數(shù)據(jù)庫運(yùn)行一段時間后，由于記錄不斷增、刪、改，增添、修改的數(shù)據(jù)不能為空，否則不能保存到數(shù)據(jù)庫中。使數(shù)據(jù)庫的物理存儲情況變壞，降低了數(shù)據(jù)的存取效率，數(shù)據(jù)庫性能下降，這時DBA要對數(shù)據(jù)庫進(jìn)行重組

25、織，或部分重組織（只對頻繁增、刪的表進(jìn)行重組織），可以利用Microsoft SQL Server2000專門提供的數(shù)據(jù)重組織實(shí)用程序操作，按原設(shè)計要求重新安排存儲位置、回收垃圾、減少指針鏈等，提高系統(tǒng)性能。有些情況，如由于數(shù)據(jù)庫應(yīng)用環(huán)境發(fā)生變化，增加了新的應(yīng)用或新的實(shí)體，取消了某些應(yīng)用，有的實(shí)體與實(shí)體間的聯(lián)系發(fā)生變化，則需要調(diào)整數(shù)據(jù)庫的模式及內(nèi)模式。4.3功能模塊的實(shí)現(xiàn)按結(jié)構(gòu)化的程序設(shè)計思想，在完成了系統(tǒng)分析、系統(tǒng)設(shè)計后，就可以進(jìn)行系統(tǒng)實(shí)現(xiàn)階段了，系統(tǒng)實(shí)現(xiàn)是每指把系統(tǒng)的物理模型轉(zhuǎn)換成實(shí)際運(yùn)行系統(tǒng)的全過程。在打開數(shù)據(jù)表之前應(yīng)該先打開數(shù)據(jù)庫，使用公共模塊中定義的conn對象。打開數(shù)據(jù)庫應(yīng)該安排在

26、Form_Load事件中，因為確定用戶名和密碼是否正確就已經(jīng)使用數(shù)據(jù)庫中的內(nèi)容了。雙擊窗體部分，加入如下的代碼：Private Sub From_Load()Dim connectionstring As StringConnectionstring=”Provider=Microsoft.Jet.oledb.4.0;”&_                “data source=archivel.mdb”conn.Open connec

27、tionstringEnd Sub注意:當(dāng)程序不再使用數(shù)據(jù)庫時,應(yīng)該調(diào)用Connection對象的Close方法將其關(guān)閉,但此時它還會占用一定的系統(tǒng)資源,完全將資源釋放給系統(tǒng)的方法是使用下面的語句:Set conn=Nothing.不過,這兩個步驟往往會被省略,因為當(dāng)程序關(guān)閉時,程序所打開的數(shù)據(jù)也會隨之關(guān)閉,Connection對象所占用的系統(tǒng)資源也會自動釋放給系統(tǒng).登錄窗體的實(shí)現(xiàn)圖書錄入窗口期刊錄入窗口其代碼如下：Option ExplicitDim CNt As Integer         

28、60;     '記錄確定次數(shù)程序裝載的過程中將此變量初始化為0                    Dim sql As StringDim rs_login As New ADODB.RecordsetIf Trim(txtuser.Text) = "" Then  '判斷輸入的用戶名是否為空  

29、 MsgBox "沒有這個用戶", vbOKOnly + vbExclamation, ""   txtuser.SetFocusElse   sql = "select * from 系統(tǒng)管理 where 用戶名='" & txtuser.Text & "'"   rs_login.Open sql, conn, adOpenKeyset, adLockPessimistic   If rs_login

30、.EOF = True Then      MsgBox "沒有這個用戶", vbOKOnly + vbExclamation, ""      txtuser.SetFocus   Else                    

31、0;    "檢驗密碼是否正確"      If Trim(rs_login.Fields(1) = Trim(txtpwd.Text) Then          userID = txtuser.Text          userpow = rs_login.Fields(2)   

32、       rs_login.Close          Unload Me          Form1.Show      Else         MsgBox "密碼不正確", vbOKOnly +

33、 vbExclamation, ""         txtpwd.SetFocus      End If   End IfEnd IfCNt = cnt + 1If CNt = 3 Then   Unload MeEnd IfExit SubEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim conn

34、ectionstring As Stringconnectionstring = "provider=Microsoft.Jet.oledb.4.0;" & _                   "data source=book.mdb"conn.Open connectionstringCNt = 0End Sub注意:工程屬性對話框中的”啟動選項”用來選取擇運(yùn)行

35、VB時顯示的第一個窗體,或者Sub Main.主窗體中的代碼不多,基本上都是實(shí)現(xiàn)單擊某個菜單選項即彈出相應(yīng)窗體的語句,這些語句將分別在各個窗體中介紹。單擊“系統(tǒng)管理”     “退出系統(tǒng)”菜單，關(guān)閉系統(tǒng)代碼如下：Private Sub exit_sys_Click()EndEnd sub系統(tǒng)主窗體的實(shí)現(xiàn)登陸窗口用戶錄入窗口其代碼如下：Private Sub add_admin_Click()frmadduser.ShowEnd Sub Private Sub add_back_book_Click()frmbackbookinfo.ShowEn

36、d Sub Private Sub add_book_info_Click()frmaddbookinfo.ShowEnd Sub Private Sub add_book_style_Click()frmaddbookstyle.ShowEnd Sub Private Sub add_lend_book_Click()frmfindbook.ShowEnd Sub Private Sub add_reader_info_Click()frmaddreaderinfo.ShowEnd Sub Private Sub add_reader_sty

37、le_Click()frmaddreaderstyle.ShowEnd Sub Private Sub change_pwd_Click()frmchangepwd.ShowEnd Sub Private Sub del_book_info_Click()frmmodifybookinfo.ShowEnd Sub Private Sub del_book_style_Click()frmmodifybookstyle.ShowEnd Sub Private Sub del_reader_info_Click()frmreaderinfo.ShowEnd

38、Sub Private Sub del_reader_style_Click()frmmodifyreaderstyle.ShowEnd Sub Private Sub exit_sys_Click()EndEnd Sub Private Sub find_book_info_Click()frmfindbook.ShowEnd Sub Private Sub find_lend_book_Click()frmfindborrowinfo.ShowEnd Sub Private Sub find_reader_info_Click()frmfi

39、ndreader.ShowEnd SubPrivate Sub gu_Click()frmSplash.ShowEnd SubPrivate Sub H_Click()End Sub Private Sub Image1_Click()End SubPrivate Sub modify_book_info_Click()frmmodifybookinfo.ShowEnd SubPrivate Sub modify_book_style_Click()frmmodifybookstyle.ShowEnd SubPrivate Sub modify_reader_info_Click()

40、frmreaderinfo.ShowEnd Sub Private Sub modify_reader_style_Click()frmmodifyreaderstyle.ShowEnd Sub圖書類別管理窗體的實(shí)現(xiàn)圖書類別管理窗體由2個Text控件、2個label控件、2個commandbutton控件組成。其中，2個label控件作為標(biāo)識，2個text控件被接收用戶輸入，2個commandbutton控件作為“確定”和“取消”按鈕。運(yùn)行時的窗體如下：圖書統(tǒng)計窗口期刊統(tǒng)計窗口圖書存取窗口期刊存取窗口圖書瀏覽窗口其實(shí)現(xiàn)代碼如下：當(dāng)單擊添加圖書類別菜單時，代碼如下：Private Su

41、b add_book_style_Click()frmaddbookstyle.ShowEnd Sub當(dāng)單擊“確定”按鈕時，首先檢查輸入的圖書類型和種類編號是否為空，代碼如下：Private Sub Command1_Click()Dim rs_bookstyle As New ADODB.RecordsetDim sql As StringIf Trim(Text1.Text) = "" Then   MsgBox "圖書種類不能為空", vbOKOnly + vbExclamation, "" 

42、60; Text1.SetFocus   Exit SubEnd IfIf Trim(Text2.Text) = "" Then   MsgBox "種類編號不能為空", vbOKOnly + vbExclamation, ""   Text2.SetFocus   Exit SubEnd If如果不為空，則檢查類別名稱是否有重復(fù)，需要打開圖書類別表，先定義一個字符串類型的變量和一個RECORDSET對象變量。Private Sub Command1_Cl

43、ick()Dim rs_bookstyle As New ADODB.RecordsetDim sql As StringIf Trim(Text1.Text) = "" Then使用RECORDSET對象的OPEN方法打開數(shù)據(jù)表。End Ifsql = "select * from 圖書類別 where 類別名稱='" & Text1.Text & "'"rs_bookstyle.Open sql, conn, adOpenKeyset, adLockPessimistic   如

44、果沒有重復(fù)，此時TECORDSET對象的EOF屬性應(yīng)改為FASLE，此時將新的數(shù)據(jù)添加到數(shù)據(jù)庫，并給出提示代碼如下。   If rs_bookstyle.EOF Then   rs_bookstyle.AddNew   rs_bookstyle.Fields(0) = Trim(Text1.Text)   rs_bookstyle.Fields(1) = Trim(Text2.Text)   rs_bookstyle.Update   MsgBox "添加圖書類別成

45、功！", vbOKOnly, ""   rs_bookstyle.CloseElse如果有重復(fù)，則給出提示，然后將焦點(diǎn)設(shè)置給TEXT1，并將所有的文本框清空，代碼如下。   Else   MsgBox "讀者類別重復(fù)！", vbOKOnly + vbExclamation, ""   Text1.SetFocus   Text1.Text = ""   rs_bookstyle.Clos

46、e   Exit SubEnd IfEnd Sub添加圖書信息窗體的實(shí)現(xiàn)添加圖書信息窗體由1個Frame控件、1個Combox控件、2個CommandButton控件、6個Text控件和7個Label控件作為標(biāo)識，6個Text控件和1個ComboBox控件用于接收用戶輸入，2個CommandButton控件作為“確定”和“取消”按鈕。運(yùn)行時的窗體如下： 圖書查詢窗口期刊查詢窗口用戶查詢窗口期刊打印窗口當(dāng)單擊“圖書管理/圖書信息管理/添加圖書信息”菜單時，彈出如下代碼：Private Sub Command1_Click()Dim rs_addbook As New

47、 ADODB.RecordsetDim sql As StringIf Trim(Combo1.Text) = "" Then   MsgBox "請選擇圖書種類", vbOKOnly + vbExclamation, ""   Combo1.SetFocus   Exit SubEnd IfIf Trim(Text1.Text) = "" Then   MsgBox "圖書編號不能為空", vbOKOnly + v

48、bExclamation, ""   Text1.SetFocus   Exit SubEnd IfIf Trim(Text2.Text) = "" Then   MsgBox "書名不能為空", vbOKOnly + vbExclamation, ""   Text2.SetFocus   Exit SubEnd If   If Not IsDate(Text5.Text) Then 

49、     MsgBox "請按照yyyy-mm-dd格式輸入日期", vbOKOnly + vbExclamation, ""      Text5.SetFocus      Exit Sub   End If   If Not IsDate(Text6.Text) Then      MsgBox "請按照yyyy

50、-mm-dd格式輸入日期", vbOKOnly + vbExclamation, ""      Text6.SetFocus      Exit Sub   End Ifsql = "select * from 書籍信息 where 書籍編號='" & Text1.Text & "'"rs_addbook.Open sql, conn, adOpenKeyset, adLo

51、ckPessimisticIf rs_addbook.EOF Then   rs_addbook.AddNew   rs_addbook.Fields(0) = Trim(Text1.Text)   rs_addbook.Fields(1) = Trim(Text2.Text)   rs_addbook.Fields(2) = Trim(Combo1.Text)   rs_addbook.Fields(3) = Trim(Text3.Text)   rs_addbook.Fi

52、elds(4) = Trim(Text4.Text)   rs_addbook.Fields(5) = Trim(Text5.Text)   rs_addbook.Fields(6) = Trim(Text6.Text)   rs_addbook.Fields(7) = "否"   rs_addbook.Update   MsgBox "添加書籍信息成功！", vbOKOnly, ""   rs_addbook.Cl

53、oseElse   MsgBox "圖書編號重復(fù)！", vbOKOnly + vbExclamation, ""   Text1.SetFocus   Text1.Text = ""   rs_addbook.Close   Exit SubEnd If End Sub Private Sub Command2_Click()Unload MeEnd Sub Private Sub Form_Load()D

54、im rs_leibie As New ADODB.RecordsetDim sql As Stringsql = "select * from 圖書類別"rs_leibie.Open sql, conn, adOpenKeyset, adLockPessimisticrs_leibie.MoveFirstDo While Not rs_leibie.EOF  Combo1.AddItem rs_leibie.Fields(0)  rs_leibie.MoveNextLooprs_leibie.CloseEnd Sub 第五章 

55、60;   調(diào)試與分析 1. 采用各模塊獨(dú)立調(diào)試，整體合成測試的方法。各個模塊應(yīng)能獨(dú)立使用。2.  進(jìn)一步改進(jìn)設(shè)想隨著網(wǎng)絡(luò)技術(shù)的飛速發(fā)展，基于網(wǎng)絡(luò)的應(yīng)用軟件正迅速發(fā)展。如果將該系統(tǒng)進(jìn)一步改進(jìn)，使之能應(yīng)用于網(wǎng)絡(luò)環(huán)境，則可以大大提高工作效率，提高其時效性和應(yīng)用范圍。 第六章     用戶操作說明1.  軟硬件環(huán)境硬件配置：586以上檔次的計算機(jī)，彩色顯示器，內(nèi)存>128M,硬盤>10G。軟件配置：Windows 98/XP操作系統(tǒng)，Visual Basic

56、6.0數(shù)據(jù)庫管理系統(tǒng)。2.  應(yīng)用系統(tǒng)安裝使用安裝盤：本應(yīng)用系統(tǒng)經(jīng)過Visual Basic 6.0提供的安裝向?qū)砂惭b軟盤，使用時只須在Windows環(huán)境下直接安裝即可。3. 操作方法1直接啟動應(yīng)用系統(tǒng)2在登錄窗體中輸入用戶名及密碼就可以直接進(jìn)入主界面。3主界面上有五個主菜單，而每一個主菜單上又有幾個子菜單，用戶可以跟據(jù)自己的要求點(diǎn)擊上面的子菜單，進(jìn)行相應(yīng)的操作?；蛘咭部梢岳靡呀?jīng)設(shè)置好的快捷鍵進(jìn)行操作。小 結(jié) 通過一個完整的圖書管理信息系統(tǒng)的創(chuàng)建，了解到一個數(shù)據(jù)庫系統(tǒng)的開發(fā)，即是前臺和后臺的開發(fā)。前臺是應(yīng)用程序的開發(fā)：功能模塊設(shè)計、源代碼開發(fā)。后臺是數(shù)據(jù)庫的

57、開發(fā)：系統(tǒng)設(shè)計、數(shù)據(jù)庫設(shè)計、數(shù)據(jù)庫結(jié)構(gòu)的設(shè)計等。前臺開發(fā)涉及到整個圖書管理系統(tǒng)功能的實(shí)現(xiàn)，及實(shí)現(xiàn)的效率。后臺開發(fā)也尤為重要，它對應(yīng)用程序的效率以及實(shí)現(xiàn)的效果產(chǎn)生影響。另外，合理的數(shù)據(jù)結(jié)構(gòu)將非常有利于程序的實(shí)現(xiàn)。在設(shè)計的過程中，我學(xué)習(xí)了一種新的數(shù)據(jù)庫系統(tǒng)開發(fā)工具Visual Basic6.0。它具有的可視化的編程環(huán)境和連接數(shù)據(jù)庫的便捷性，為數(shù)據(jù)庫的連接提供了多種方法。通過對這個系統(tǒng)的開發(fā)，使我對Visual Basic 有了更深程度的認(rèn)識和了解，也使我對數(shù)據(jù)庫的開發(fā)有所了解，為以后從事數(shù)據(jù)庫開發(fā)工作打下了良好的基礎(chǔ)。同時，也使我認(rèn)識到自己所學(xué)的知識還很膚淺，這也正是我今后要努力提高的。致 謝在本

58、次設(shè)計的過程中，老師們給了我們很大的幫助。不僅使我們在規(guī)定的時間內(nèi)完成了系統(tǒng)的設(shè)計，同時還使我們學(xué)到了很多有益的知識和寶貴的經(jīng)驗。在此， 我們謹(jǐn)向他表示最衷心的感謝。 參考文獻(xiàn)1. 劉韜 駱娟 何旭洪Visual Basic 6.0 數(shù)據(jù)庫系統(tǒng)開發(fā)實(shí)例導(dǎo)航出版社： 人民郵電出版社 2000年5月2.  Visual Basic 6.0 編程篇     作者：    郝志恒  劉舫 出版社： 電子工業(yè)出版社  2004年1月3.  數(shù)據(jù)庫基礎(chǔ)與應(yīng)用作者：&#

59、160;  劉世峰 出版社： 中央電大出版社  2003年12月Private Sub Command1_Click() '添加按鈕If Text1.Text = "" Then MsgBox "書籍編號不能為空！", vbInformation + vbOKOnly, "警告" Text1.SetFocus Exit SubEnd IfIf IsNumeric(Text1.Text) = False Then MsgBox "書籍編號只能輸入數(shù)字，不包含其他字符 ", vbInform

60、ation + vbOKOnly, "警告"Exit SubEnd IfIf Text2.Text = "" Then MsgBox "書籍名稱不能為空！", vbInformation + vbOKOnly, "警告" Text2.SetFocus Exit SubEnd IfIf Combo1.Text = "" Then MsgBox "類別代碼不能為空！", vbInformation + vbOKOnly, "警告" Combo1.SetFocu

61、s Exit SubEnd IfIf Text3.Text = "" Then MsgBox "出版社不能為空！", vbInformation + vbOKOnly, "警告" Text3.SetFocus Exit SubEnd IfIf Text4.Text = "" Then MsgBox "作者姓名不能為空！", vbInformation + vbOKOnly, "警告" Text4.SetFocus Exit SubEnd IfIf Text5.Text = "" Then MsgBox "書籍價格不能為空！", vbInformation + vbOKOnly, "警告" Text5.SetFocus Exit SubEnd IfIf Text6.Text = "" Then MsgBox "書籍頁碼不能為空！", vbInformation + vbOKOnly, "警告" Text6.SetFo