畢業(yè)設(shè)計(jì)-圖書管理系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)-論文

畢業(yè)設(shè)計(jì)〔論文〕圖書管理系統(tǒng)姓名學(xué)科專業(yè)指導(dǎo)教師學(xué)號(hào)目錄前言 3摘要 4第一章系統(tǒng)需求分析 51.1現(xiàn)行業(yè)務(wù)描述： 51．2現(xiàn)行系統(tǒng)存在問(wèn)題的分析 71．3解決方案 81．4可行性分析 9第二章系統(tǒng)分析與設(shè)計(jì) 92.1現(xiàn)系統(tǒng)中存在的問(wèn)題 92.2新系統(tǒng)的目標(biāo) 102.3應(yīng)用需求分析 102.4系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì) 11第三章開(kāi)發(fā)工具簡(jiǎn)介 123.1開(kāi)發(fā)工具的選擇 123.2關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn) 16第四章系統(tǒng)總體規(guī)劃 174.1系統(tǒng)功能分析 174.2圖書管理模塊 184.3圖書查詢模塊 184.4借閱查詢模塊 184.5借閱管理模塊 204.6根底維護(hù)模塊 21第五章系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì) 215．1創(chuàng)立數(shù)據(jù)庫(kù)文件 215.2怎樣創(chuàng)立一個(gè)數(shù)據(jù)表 235.3VB連接ACCESS2000數(shù)據(jù)庫(kù) 255.4數(shù)據(jù)庫(kù)詳細(xì)設(shè)計(jì) 255.5用戶界面的實(shí)現(xiàn) 28結(jié)束語(yǔ) 31主要參考文獻(xiàn) 31圖書管理系統(tǒng)畢業(yè)論文前言隨著電子計(jì)算機(jī)和通信技術(shù)的開(kāi)展，人類已經(jīng)逐漸地進(jìn)入信息化社會(huì)。信息和材料、能源一樣成為一種社會(huì)的根本生產(chǎn)資料，在人類的社會(huì)生產(chǎn)活動(dòng)中發(fā)揮著重要的作用。同時(shí)人們對(duì)信息和數(shù)據(jù)的利用與處理也已進(jìn)入自動(dòng)化、網(wǎng)絡(luò)化和社會(huì)化的階段，因此，開(kāi)發(fā)相關(guān)的管理信息系統(tǒng)已經(jīng)成為各行各業(yè)的必要和必需了，管理信息系統(tǒng)作為一門邊緣學(xué)科，集管理科學(xué)、信息科學(xué)、系統(tǒng)科學(xué)、現(xiàn)代通信技術(shù)和電子計(jì)算機(jī)技術(shù)于一體，可以解決企業(yè)或組織所面臨的問(wèn)題，對(duì)內(nèi)來(lái)看，可以提高工作效率；對(duì)外來(lái)看，獲得競(jìng)爭(zhēng)優(yōu)勢(shì)。管理信息系統(tǒng)的開(kāi)發(fā)方法有生命周期法、原型法和面向?qū)ο蟮拈_(kāi)發(fā)方法等。生命周期法〔LifeCycleMethod〕是20世紀(jì)60年代開(kāi)展起來(lái)的一種應(yīng)用廣泛且比擬成熟的管理系統(tǒng)開(kāi)發(fā)方法，它的根本思想是將系統(tǒng)的開(kāi)發(fā)工作從開(kāi)始到結(jié)束劃分為假設(shè)干個(gè)階段，每個(gè)階段都有明確的任務(wù)，而系統(tǒng)開(kāi)發(fā)出來(lái)后，并不意味著生命周期的結(jié)束，而意味著根據(jù)組織的需要對(duì)系統(tǒng)的修改和重建的開(kāi)始；原型法(PrototypingMethod)是20世紀(jì)80年代開(kāi)展起來(lái)的，旨在改變生命周期法的缺點(diǎn)的一種系統(tǒng)開(kāi)發(fā)方法，該法的開(kāi)發(fā)思路是首先根據(jù)用戶的要求，由用戶和開(kāi)發(fā)者共同確定系統(tǒng)的根本要求和主要功能，利用系統(tǒng)快速生成工具，建立一個(gè)系統(tǒng)模型，再在此根底上與用戶交流，將模型不斷補(bǔ)充、修改、完善，如此反復(fù)，最終直至用戶和開(kāi)發(fā)者都比擬滿意為止，從而形成一個(gè)相對(duì)穩(wěn)定、較為理想的管理信息系統(tǒng)；面向?qū)ο蟆睴bjectOriented〕的開(kāi)發(fā)方法于20世紀(jì)80年代開(kāi)始興起的，是一種基于問(wèn)題對(duì)象的自底向上的一種系統(tǒng)開(kāi)發(fā)方法，這種方法的特點(diǎn)是以對(duì)象為根底，對(duì)象是分析問(wèn)題和解決問(wèn)題的核心?；谝陨先N方法的特點(diǎn)和各自的優(yōu)缺點(diǎn)，本圖書館管理系統(tǒng)利用軟件工程化思想和方法，總體上是采用結(jié)構(gòu)化生命法進(jìn)行系統(tǒng)分析和設(shè)計(jì)的，而系統(tǒng)實(shí)現(xiàn)等步驟那么采用了原型法和面對(duì)對(duì)象的方法。管理信息系統(tǒng)的開(kāi)發(fā)是一個(gè)開(kāi)發(fā)周期長(zhǎng)、技術(shù)要求高、影響因素多的復(fù)雜系統(tǒng)工程，因此制定一個(gè)完善、可行、合理的開(kāi)發(fā)方案，不僅是系統(tǒng)開(kāi)發(fā)成功的保證，而且可以提高效率、節(jié)省時(shí)間、降低本錢。摘要【摘要】隨著人類社會(huì)的開(kāi)展，人類對(duì)知識(shí)的需求也不斷地增長(zhǎng)。在這種形勢(shì)下，書籍就漸漸地成為人們獲取并增長(zhǎng)知識(shí)的主要途徑，而圖書館就自然而然地在人們的生活中占據(jù)了一定的位置，如何科學(xué)地管理圖書館不但關(guān)系到讀者求知的方便程度，也關(guān)系到圖書館的開(kāi)展，因此，開(kāi)發(fā)一套完善的圖書館管理系統(tǒng)就成不可少了，本文介紹了在VisualBasic6.0環(huán)境下采用“自上而下地總體規(guī)劃，自下而上地應(yīng)用開(kāi)發(fā)〞的策略開(kāi)發(fā)本系統(tǒng)的詳細(xì)過(guò)程，提出實(shí)現(xiàn)圖書館信息管理、資源共享的根本目標(biāo)，從而推動(dòng)邁向數(shù)字化圖書館的步伐，并闡述系統(tǒng)結(jié)構(gòu)設(shè)計(jì)和功能設(shè)計(jì)，從圖書的入庫(kù)登記到查詢?yōu)g覽，從借書證發(fā)放到圖書的借閱，形成了一個(gè)整體自動(dòng)化管理模式，從軟件工程的角度進(jìn)行了科學(xué)而嚴(yán)謹(jǐn)?shù)年U述?！娟P(guān)鍵詞】圖書管理、借閱、瀏覽、VisualBasic【Abstract】Withthedevelopmentofsociety,Mankindneedmoreknowledgealsoconstantlyincrease,Underthisfsituation,bookgraduallybecomethemainpathtoobtaintheknowledgeoflife,andlibrarynaturallyoccupiedinpeoplecertainlyposition,howsciencegroundthemanagementlibrarynotonlyrelatetotheconvenientdegreethatthereaderbegtoknow,butalsorelatetothelibrarythatstrategyofdevelopment,therefore,developthemanagementsystemofaperfectlibrarycan'tlittle,thistextintroducedundertheVisualBasic6.0theenvironmentadoption"fromtoptobottomtotalprogramming,fromthedetailedprocessthatbottombutupapplieddevelopment"developthissystem,bringuptorealizethebasictargetthatshareofmanagement,resourcesoflibraryinformation,fromthestepthatbutthepushheadintothearithmeticfigureofthelibrary,andshowsthesystemconstructiondesignandfunctiondesign,fromthebooksofstoreinwarehousetoregisterthesearchtoview,booksthatissuefromlibrarycardtoangleofborrow,becomeathewholeautomationthemanagementthemode,andproceedscarefulexplainfromthesoftwareengineeringscience.第一章系統(tǒng)需求分析1.1現(xiàn)行業(yè)務(wù)描述：通過(guò)調(diào)查，先畫出圖書館的組織結(jié)構(gòu)圖如下：館館長(zhǎng)采編組書庫(kù)閱覽室工具書室目錄廳借閱室通過(guò)調(diào)研了解到，該圖書館各個(gè)部門負(fù)責(zé)的主要業(yè)務(wù)如下：〔1〕采編組主要負(fù)責(zé)圖書采編工作，包括購(gòu)置新書、打印編目、增加數(shù)量?！?〕目錄廳主要負(fù)責(zé)讀者查詢工作，包括可借圖書〔按圖書類別、圖書名稱或圖書作者查詢〕；新書目錄〔按圖書類別、日期查詢〕；借書情況〔按讀者借書證號(hào)查詢〕〔3〕借閱組主要負(fù)責(zé)圖書流通、查詢統(tǒng)計(jì)、借閱查詢等工作?！?〕閱覽室、工具書室主要負(fù)責(zé)讀者閱覽工作，包括：閱覽各種雜志、報(bào)紙、閱覽各種工具書。下面繪制出圖書館流通業(yè)務(wù)中借書的流程圖?！?〕讀者在目錄廳查閱索引卡；〔2〕讀者寫出所借圖書的分類號(hào)、種次號(hào)、交給圖書管理員，并出示本人的借書證；〔3〕圖書管理員根據(jù)圖書的分類號(hào)、種次號(hào)到書庫(kù)找書；〔4〕將圖書交給讀者，并由讀者填寫所借圖書的借書卡?！?〕圖書管理員把借書卡保存到寫有該讀者借書證號(hào)的口袋里。得出該圖書館業(yè)務(wù)流程圖如下所示：1．2現(xiàn)行系統(tǒng)存在問(wèn)題的分析該圖書館工作大局部還是進(jìn)行著手工管理，工作起來(lái)效率很低，并且不能及時(shí)了解圖書館各類圖書的存庫(kù)，學(xué)生們比擬需求的圖書等等，不便于動(dòng)態(tài)及時(shí)地調(diào)整圖書結(jié)構(gòu)，以便更好地適應(yīng)當(dāng)前學(xué)生的借閱需求。手工管理還存在這許多弊端，由于不可防止的人為因素，經(jīng)常造成數(shù)據(jù)的遺漏、誤報(bào)。計(jì)算機(jī)信息化管理有著儲(chǔ)存信息量大、速度快等許多優(yōu)點(diǎn)，提供應(yīng)我們的處理信息及時(shí)快捷，同時(shí)也提高了我們工作人員的自身素質(zhì)。1．3解決方案基于以上的對(duì)問(wèn)題的分析，利用計(jì)算機(jī)給我們提供信息，及時(shí)地調(diào)整學(xué)校圖書館圖書結(jié)構(gòu)，并且對(duì)學(xué)生們的借閱過(guò)程形成一整套動(dòng)態(tài)的管理就十分必要了。圖書館信息系統(tǒng)的建立，需要進(jìn)行用戶的需求調(diào)查與分析，以確定系統(tǒng)目標(biāo)，提出解決問(wèn)題的詳細(xì)方案，這是系統(tǒng)建設(shè)的重要環(huán)節(jié)。學(xué)校圖書館規(guī)模相對(duì)于商業(yè)圖書館小，但要有著完善的圖書信息，對(duì)每一冊(cè)書要有詳細(xì)的記錄信息，功能上對(duì)系統(tǒng)的需求是全面的。因此對(duì)用戶的需求可分為四個(gè)方面：一方面是圖書館工作人員通過(guò)計(jì)算機(jī)來(lái)管理各類圖書，分類編號(hào)，調(diào)整圖書結(jié)構(gòu)，增加圖書庫(kù)存，適應(yīng)學(xué)生的需求；二方面是學(xué)生們能通過(guò)計(jì)算機(jī)來(lái)查詢?yōu)g覽圖書館中的圖書，來(lái)確定自已需要的書籍，為借閱做好準(zhǔn)備；三方面是工作人員對(duì)學(xué)生們的借書證發(fā)放，登記能作好全面的掌握，及時(shí)得到每個(gè)借書證的當(dāng)前狀態(tài)和歷史借閱記錄；四方面也是圖書館的核心工作，對(duì)圖書的借閱管理。這四個(gè)方面形成了學(xué)校圖書館一個(gè)工作整體，采用計(jì)算機(jī)自動(dòng)化信息處理，可方便快捷地共享信息、交流信息，高效地協(xié)同工作。在軟、硬件方面對(duì)系統(tǒng)的需求，軟件要求易學(xué)，界面友好，容易掌握，可以很簡(jiǎn)單方便的管理各種圖書信息。硬件的配置要求不能太高，這樣可以很好的適應(yīng)當(dāng)前的學(xué)校圖書館。在開(kāi)發(fā)方式上對(duì)系統(tǒng)的需求，由于學(xué)校圖書館是一種無(wú)商業(yè)利益的，所以系統(tǒng)設(shè)計(jì)開(kāi)發(fā)的周期要短，在短時(shí)間內(nèi)完成，減少開(kāi)發(fā)本錢，提高開(kāi)發(fā)效率，方便、簡(jiǎn)單、實(shí)用作為系統(tǒng)開(kāi)發(fā)的指導(dǎo)思想。1．4可行性分析通過(guò)對(duì)該圖書館的各個(gè)方面進(jìn)行了具體的了解之后，現(xiàn)對(duì)該單位開(kāi)發(fā)圖書管理系統(tǒng)的可行性進(jìn)行分析。技術(shù)上可行：該系統(tǒng)所需硬件設(shè)備，市場(chǎng)上銷售且價(jià)格較低，甚至可以使用原有的設(shè)備，軟件上，操作系統(tǒng)采用Windows系列操作系統(tǒng)，數(shù)據(jù)庫(kù)管理系統(tǒng)采用VisualBasic，這些軟件在MIS開(kāi)發(fā)中已被大量應(yīng)用，技術(shù)上都比擬成熟。因此在技術(shù)上是可行的。經(jīng)濟(jì)上可行：由于學(xué)校急需采用計(jì)算機(jī)來(lái)進(jìn)行圖書館的管理，因此對(duì)開(kāi)發(fā)圖書管理系統(tǒng)大力支持，開(kāi)發(fā)經(jīng)費(fèi)沒(méi)有問(wèn)題。管理上可行：該學(xué)校的圖書館有很多的管理體制，每位借書人均有借書證，同時(shí)圖書館還為每位借書人建立了檔案。因此管理上可行。另外，圖書館管理人員對(duì)開(kāi)發(fā)該系統(tǒng)也是大力支持的，同時(shí)制定了培訓(xùn)方案，并進(jìn)行了實(shí)施MIS的物質(zhì)準(zhǔn)備和工作準(zhǔn)備。第二章系統(tǒng)分析與設(shè)計(jì)2.1現(xiàn)系統(tǒng)中存在的問(wèn)題現(xiàn)行的圖書管理系統(tǒng)只是單一管理系統(tǒng)，現(xiàn)已不能滿足快速準(zhǔn)確的圖書管理需要。系統(tǒng)輸入繁瑣，極易產(chǎn)生輸入錯(cuò)誤，缺少智能化輸入功能，如：圖書名稱輸入過(guò)程中，單位名稱和單位代碼不能夠相互協(xié)調(diào)，易產(chǎn)生不匹配現(xiàn)象。另外，整個(gè)系統(tǒng)運(yùn)行較慢，數(shù)據(jù)處理能力不夠，進(jìn)行一個(gè)查詢往往需要等待很長(zhǎng)時(shí)間。該系統(tǒng)還缺少圖書管理理功能，圖書組成條目都是經(jīng)過(guò)手工計(jì)算的，工作量很大，且容易產(chǎn)生錯(cuò)誤，有一個(gè)小錯(cuò)誤，核對(duì)都需要花費(fèi)很大的精力，換句話說(shuō)，當(dāng)前沒(méi)有圖書管理系統(tǒng)。原圖書系統(tǒng)是用basic開(kāi)發(fā)，為單機(jī)版，不能實(shí)現(xiàn)網(wǎng)絡(luò)共享，使同是人事部?jī)?nèi)部之間進(jìn)行信息傳遞成為很棘手的問(wèn)題。該系統(tǒng)已不能滿足多個(gè)人員對(duì)數(shù)據(jù)的索?。蝗绺笨崎L(zhǎng)管理計(jì)算機(jī)，那么科長(zhǎng)就不能在自己的辦公室中查看資料?？梢?jiàn)當(dāng)前系統(tǒng)已不能適應(yīng)未來(lái)管理信息系統(tǒng)開(kāi)展的趨勢(shì)，慢慢的將要被淘汰，一個(gè)新興的網(wǎng)絡(luò)管理信息系統(tǒng)是當(dāng)前的迫切需求。2.2新系統(tǒng)的目標(biāo)按照管理信息系統(tǒng)的原理和生命周期開(kāi)發(fā)方法，采用成熟的信息技術(shù)和手段，建設(shè)成一個(gè)集圖書管理、圖書借閱于一體的高效管理信息系統(tǒng)。該系統(tǒng)能高速、快捷、智能化的管理全過(guò)程，并加強(qiáng)圖書管理中的各種信息資源的管理與應(yīng)用，提高圖書查找與查詢的處理速度，進(jìn)而提高企業(yè)的整體管理水平。2.3應(yīng)用需求分析圖書借閱者、圖書進(jìn)行管理和維護(hù)，及系統(tǒng)狀態(tài)的查看、維護(hù)并生成催還圖書報(bào)表。圖書借閱者可直接查看圖書館圖書情況，如果圖書借閱者根據(jù)本人借書證號(hào)和密碼登錄系統(tǒng)，還可以進(jìn)行本人借書情況的查詢和維護(hù)局部個(gè)人信息。一般情況下，圖書借閱者只應(yīng)該查詢和維護(hù)本人的借書情況和個(gè)人信息，假設(shè)查詢和維護(hù)其他借閱者的借書情況和個(gè)人信息，就要知道其他圖書借閱者的借書證號(hào)和密碼。這些是很難得到的，特別是密碼，所以不但滿足了圖書借閱者的要求，還保護(hù)了圖書借閱者的個(gè)人隱私。圖書館管理人員功能的信息量大，數(shù)據(jù)平安性和保密性要求最高。本功能實(shí)現(xiàn)對(duì)圖書信息、借閱者信息、總體借閱情況信息的管理和統(tǒng)計(jì)。圖書館管理員可以瀏覽、查詢、添加、刪除、修改、統(tǒng)計(jì)圖書的根本信息；瀏覽、查詢、統(tǒng)計(jì)、添加、刪除和修改圖書借閱者的根本信息，瀏覽、查詢、統(tǒng)計(jì)圖書館的借閱信息，能添加、刪除和修改借閱信息，設(shè)計(jì)不同用戶的操作權(quán)限和登陸方法對(duì)所有用戶開(kāi)放的圖書查詢借閱者維護(hù)借閱者個(gè)人局部信息借閱者查看個(gè)人借閱情況信息根據(jù)借閱情況對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作并生成報(bào)表根據(jù)還書情況對(duì)數(shù)據(jù)庫(kù)進(jìn)行操作并生成報(bào)表查詢及統(tǒng)計(jì)各種信息維護(hù)圖書信息維護(hù)借閱者信息處理信息的完整性2.4系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)概念設(shè)計(jì)在概念設(shè)計(jì)階段中，設(shè)計(jì)人員從用戶的角度看待數(shù)據(jù)及處理要求和約束，產(chǎn)生一個(gè)反映用戶觀點(diǎn)的概念模式。然后再把概念模式轉(zhuǎn)換成邏輯模式。將概念設(shè)計(jì)從設(shè)計(jì)過(guò)程中獨(dú)立開(kāi)來(lái)，使各階段的任務(wù)相對(duì)單一化，設(shè)計(jì)復(fù)雜程度大大降低，不受特定DBMS的限制。利用ER方法進(jìn)行數(shù)據(jù)庫(kù)的概念設(shè)計(jì)，可分成三步進(jìn)行：首先設(shè)計(jì)局部ER模式，然后把各局部ER模式綜合成一個(gè)全局模式，最后對(duì)全局ER模式進(jìn)行優(yōu)化，得到最終的模式，即概念模式?！?〕設(shè)計(jì)局部ER模式實(shí)體和屬性的定義：圖書〔圖書編號(hào)，圖書名稱，作者，出版社，出版日期，備注，價(jià)格，數(shù)量，〕借閱者〔借書證號(hào)，姓名，性別，身份證，聯(lián)系，密碼〕圖書類別〔圖書類別編號(hào)，類別描述〕所有局部ER模式都設(shè)計(jì)好了后，接下來(lái)就是把它們綜合成單一的全局概念結(jié)構(gòu)。全局概念結(jié)構(gòu)不僅要支持所有局部ER模式，而且必須合理地表示一個(gè)完整、一致的數(shù)據(jù)庫(kù)概念結(jié)構(gòu)。1)確定公共實(shí)體類型為了給多個(gè)局部ER模式的合并提供開(kāi)始合并的根底，首先要確定各局部結(jié)構(gòu)中的公共實(shí)體類型。在這一步中我們僅根據(jù)實(shí)體類型名和鍵來(lái)認(rèn)定公共實(shí)體類型。一般把同名實(shí)體類型作為公共實(shí)體類型的一類候選，把具有相同鍵的實(shí)體類型作為公共實(shí)體類型的另一類候選。2)局部ER模式的合并合并的原那么是：首先進(jìn)行兩兩合并；先和合并那些現(xiàn)實(shí)世界中有聯(lián)系的局部結(jié)構(gòu)；合并從公共實(shí)體類型開(kāi)始，最后再參加獨(dú)立的局部結(jié)構(gòu)。第三章開(kāi)發(fā)工具簡(jiǎn)介根據(jù)實(shí)際情況，我們使用原型法〔RapidPrototyping〕即以少量代價(jià)快速地構(gòu)造一個(gè)可執(zhí)行的軟件系統(tǒng)模型。使用戶和開(kāi)發(fā)人員可以較快地確定需求，然后采用循環(huán)進(jìn)化的開(kāi)發(fā)方式，對(duì)系統(tǒng)模型作連續(xù)的精化，將系統(tǒng)需具備的性質(zhì)逐漸增加上去，直到所有的性質(zhì)全部滿足。此時(shí)模塊也開(kāi)展成為最終產(chǎn)品了。開(kāi)發(fā)工具與數(shù)據(jù)庫(kù)選擇3.1開(kāi)發(fā)工具的選擇現(xiàn)在，市場(chǎng)上可以選購(gòu)的應(yīng)用開(kāi)發(fā)產(chǎn)品很多，流行的也有數(shù)十種。目前在我國(guó)市場(chǎng)上最為流行、使用最多、最為先進(jìn)的可用作企業(yè)級(jí)開(kāi)發(fā)工具的產(chǎn)品有：Microsoft公司的VisualBasic.Microsoft公司的VisualC.Borland公司的Delphi.Powersoft公司的PowerBulider在目前市場(chǎng)上這些眾多的程序開(kāi)發(fā)工具中，有些強(qiáng)調(diào)程語(yǔ)言的彈性與執(zhí)行效率；有些那么偏重于可視化程序開(kāi)發(fā)工具所帶來(lái)的便利性與效率的得高，各有各的優(yōu)點(diǎn)和特色，也滿足了不同用戶的需求。然而，語(yǔ)言的彈性和工具的便利性是密不可分的，只有便利的工具，卻沒(méi)有彈性的語(yǔ)言作支持，許多特殊化的處理動(dòng)作必需要消耗數(shù)倍的工夫來(lái)處理，使得原來(lái)所標(biāo)榜的效率提高的優(yōu)點(diǎn)失去了作用；相反，如果只強(qiáng)調(diào)程語(yǔ)言的彈性，卻沒(méi)有便利的工具作配合，會(huì)使一些即使非常簡(jiǎn)單的界面處理動(dòng)作，也會(huì)嚴(yán)重地浪費(fèi)程序設(shè)計(jì)師的珍貴時(shí)間。作為數(shù)據(jù)庫(kù)系統(tǒng)的開(kāi)發(fā)，VisualBasic是一個(gè)非常理想選擇。數(shù)據(jù)庫(kù)是MIS中的重要支持技術(shù)，在MIS開(kāi)發(fā)過(guò)程中，如何選擇數(shù)據(jù)庫(kù)管理是一個(gè)重要的問(wèn)題，目前，數(shù)據(jù)庫(kù)產(chǎn)品較多，每種產(chǎn)品都具有各自的特點(diǎn)和適用范圍，因此，在選擇數(shù)據(jù)庫(kù)時(shí)，應(yīng)考慮數(shù)據(jù)庫(kù)應(yīng)用的特點(diǎn)及適用范圍，本系統(tǒng)選用的數(shù)據(jù)庫(kù)語(yǔ)言VisualBasic語(yǔ)言，該開(kāi)發(fā)工具具有很多長(zhǎng)處：VisualBasic是一種可視化的、面對(duì)對(duì)象和條用事件驅(qū)動(dòng)方式的結(jié)構(gòu)化高級(jí)程序設(shè)計(jì)，可用于開(kāi)發(fā)Windows環(huán)境下的種類應(yīng)用程序。它簡(jiǎn)單易學(xué)、效率高，且功能強(qiáng)大，可以與Windows的專業(yè)開(kāi)發(fā)工具SDK相媲美，而且程序開(kāi)發(fā)人員不必具有C/C++編程根底。在VisualBasic環(huán)境下，利用事件驅(qū)動(dòng)的編程機(jī)制、新穎易用的可視化設(shè)計(jì)工具，使用Windows內(nèi)部的應(yīng)用程序接口(API)函數(shù)，以及動(dòng)態(tài)鏈接庫(kù)(DLL)、動(dòng)態(tài)數(shù)據(jù)交換(DDE)、對(duì)象的鏈接與嵌入(OLE)、開(kāi)放式數(shù)據(jù)訪問(wèn)(ODBC)等技術(shù)，可以高效、快速地開(kāi)發(fā)出Windows環(huán)境下功能強(qiáng)大、圖形界面豐富的應(yīng)用軟件系統(tǒng)?？偟膩?lái)說(shuō)，VisualBasic具有以下特點(diǎn)：可視化編程：用傳統(tǒng)程序設(shè)計(jì)語(yǔ)言設(shè)計(jì)程序時(shí)，都是通過(guò)編寫程序代碼來(lái)設(shè)計(jì)用戶界面，在設(shè)計(jì)過(guò)程中看不到界面的實(shí)際顯示效果，必須編譯后運(yùn)行程序才能觀察。如果對(duì)界面的效果不滿意，還要回到程序中修改。有時(shí)候，這種編程-編譯-修改的操作可能要反復(fù)屢次，大大影響了軟件開(kāi)發(fā)效率。VisualBasic提供了可視化設(shè)計(jì)工具，把Windows界面設(shè)計(jì)的復(fù)雜性“封裝〞起來(lái)，開(kāi)發(fā)人員不必為界面設(shè)計(jì)而編寫大量程序代碼。只需要按設(shè)計(jì)要求的屏幕布局，用系統(tǒng)提供的工具，在屏幕上畫出各種“部件〞，即圖形對(duì)象，并設(shè)置這些圖形對(duì)象的屬性。VisualBasic自動(dòng)產(chǎn)生界面設(shè)計(jì)代碼，程序設(shè)計(jì)人員只需要編寫實(shí)現(xiàn)程序功能的那局部代碼，從而可以大大提高程序設(shè)計(jì)的效率。面向?qū)ο蟮某绦蛟O(shè)計(jì)4.0版以后的VisualBasic支持面向?qū)ο蟮某绦蛟O(shè)計(jì)，但它與一般的面向?qū)ο蟮某绦蛟O(shè)計(jì)語(yǔ)言(C++)不完全相同。在一般的面向?qū)ο蟪绦蛟O(shè)計(jì)語(yǔ)言中，對(duì)象由程序代碼和數(shù)據(jù)組成，是抽象的概念；而VisualBasic那么是應(yīng)用面向?qū)ο蟮某绦蛟O(shè)計(jì)方法(OOP)，把程序和數(shù)據(jù)封裝起來(lái)作為一個(gè)對(duì)象，并為每個(gè)對(duì)象賦予應(yīng)有的屬性，使對(duì)象成為實(shí)在的東西。在設(shè)計(jì)對(duì)象時(shí)，不必編寫建立和描述每個(gè)對(duì)象的程序代碼，而是用工具畫在界面上，VisualBasic自動(dòng)生成對(duì)象的程序代碼并封裝起來(lái)。每個(gè)對(duì)象以圖形方式顯示在界面上，都是可視的。結(jié)構(gòu)化程序設(shè)計(jì)語(yǔ)言VisualBasic是在BASIC語(yǔ)言的根底上開(kāi)展起來(lái)的，具有高級(jí)程序設(shè)計(jì)語(yǔ)言的語(yǔ)句結(jié)構(gòu)，接近于自然語(yǔ)言和人類的邏輯思維方式。VisualBasic語(yǔ)句簡(jiǎn)單易懂，其編輯器支持彩色代碼，可自動(dòng)進(jìn)行語(yǔ)法錯(cuò)誤檢查，同時(shí)具有功能強(qiáng)大且使用靈活的調(diào)試器和編譯器。VisualBasic是解釋型語(yǔ)言，在輸入代碼的同時(shí)，解釋系統(tǒng)將高級(jí)語(yǔ)言分解翻譯成計(jì)算機(jī)可以識(shí)別的機(jī)器指令，并判斷每個(gè)語(yǔ)句的語(yǔ)法錯(cuò)誤。在設(shè)計(jì)VisualBasic程序的過(guò)程中，隨時(shí)可以運(yùn)行程序，而在整個(gè)程序設(shè)計(jì)好之后，可以編譯生成可執(zhí)行文件(.EXE)，脫離VisualBasic環(huán)境，直接在Windows環(huán)境下運(yùn)行。事件驅(qū)動(dòng)編程機(jī)制VisualBasic通過(guò)事件來(lái)執(zhí)行對(duì)象的操作。一個(gè)對(duì)象可能會(huì)產(chǎn)生多個(gè)事件，每個(gè)事件都可以通過(guò)一段程序來(lái)響應(yīng)。例如，命令按鈕是一個(gè)對(duì)象，當(dāng)用戶單擊該按鈕時(shí)，將產(chǎn)生一個(gè)“單擊“(CLICK)事件，而在產(chǎn)生該事件時(shí)將執(zhí)行一段程序，用來(lái)實(shí)現(xiàn)指定的操作。在用VisualBasic設(shè)計(jì)大型應(yīng)用軟件時(shí)，不必建立具有明顯開(kāi)始和結(jié)束的程序，而是編寫假設(shè)干個(gè)微小的子程序，即過(guò)程。這些過(guò)程分別面向不同的對(duì)象，由用戶操作引發(fā)某個(gè)事件來(lái)驅(qū)動(dòng)完成某種特定的功能，或者由事件驅(qū)動(dòng)程序調(diào)用通用過(guò)程來(lái)執(zhí)行指定的操作，這樣可以方便編程人員，提高效率。訪問(wèn)數(shù)據(jù)庫(kù)VisualBasic具有強(qiáng)大的數(shù)據(jù)庫(kù)管理功能，利用數(shù)據(jù)控件和數(shù)據(jù)庫(kù)管理窗口，可以直接建立或處理MicrosoftAccess格式的數(shù)據(jù)庫(kù)，并提供了強(qiáng)大的數(shù)據(jù)存儲(chǔ)和檢索功能。同時(shí)，VisualBasic還能直接編輯和訪問(wèn)其他外部數(shù)據(jù)庫(kù)，如dBASE，F(xiàn)oxPro，Paradox等，這些數(shù)據(jù)庫(kù)格式都可以用VisualBasic編輯和處理。VisualBasic提供開(kāi)放式數(shù)據(jù)連接，即ODBC功能，可通過(guò)直接訪問(wèn)或建立連接的方式使用并操作后臺(tái)大型網(wǎng)絡(luò)數(shù)據(jù)庫(kù)，如SQLServer，Oracle等。在應(yīng)用程序中，可以使用結(jié)構(gòu)化查詢語(yǔ)言SQL數(shù)據(jù)標(biāo)準(zhǔn)，直接訪問(wèn)效勞器上的數(shù)據(jù)庫(kù)，并提供了簡(jiǎn)單的面向?qū)ο蟮膸?kù)操作指令和多用戶數(shù)據(jù)庫(kù)訪問(wèn)的加鎖機(jī)制和網(wǎng)絡(luò)數(shù)據(jù)庫(kù)的SQL的編程技術(shù)，為單機(jī)上運(yùn)行的數(shù)據(jù)庫(kù)提供了SQL網(wǎng)絡(luò)接口，以便在分布式環(huán)境中快速而有效地實(shí)現(xiàn)客戶/效勞器(client/server)方案。動(dòng)態(tài)數(shù)據(jù)交換(DDE)利用動(dòng)態(tài)數(shù)據(jù)交換(DynamicDataExchange)技術(shù)，可以把一種應(yīng)用程序中的數(shù)據(jù)動(dòng)態(tài)地鏈接到另一種應(yīng)用程序中，使兩種完全不同的應(yīng)用程序建立起一條動(dòng)態(tài)數(shù)據(jù)鏈路。當(dāng)原始數(shù)據(jù)變化時(shí)，可以自動(dòng)更新鏈接的數(shù)據(jù)。VisualBasic提供了動(dòng)態(tài)數(shù)據(jù)交換的編程技術(shù)，可以在應(yīng)用程序中與其他Windows應(yīng)用程序建立動(dòng)態(tài)數(shù)據(jù)交換，在不同的應(yīng)用程序之間進(jìn)行通信。對(duì)象的鏈接與嵌入(OLE)對(duì)象的鏈接與嵌入(OLE)將每個(gè)應(yīng)用程序都看做是一個(gè)對(duì)象(object)，將不同的對(duì)象鏈接(link)起來(lái)，再嵌入(embed)某個(gè)應(yīng)用程序中，從而可以得到具有聲音、影像、圖像、動(dòng)畫、文字等各種信息的集合式的文件。OLE技術(shù)是Microsoft公司對(duì)象技術(shù)的戰(zhàn)略，它把多個(gè)應(yīng)用程序合為一體，將每個(gè)應(yīng)用程序看做是一個(gè)對(duì)象進(jìn)行鏈接和嵌入，是一種應(yīng)用程序一體化的技術(shù)。利用OLE技術(shù)，可以方便地建立復(fù)合式文檔(compounddocument)，這種文檔由來(lái)自多個(gè)不同應(yīng)用程序的對(duì)象組成，文檔中的每個(gè)對(duì)象都與原來(lái)的應(yīng)用程序相聯(lián)系，并可執(zhí)行與原來(lái)應(yīng)用程序完全相同的操作。動(dòng)態(tài)鏈接庫(kù)(DLL)VisualBasic是一種高級(jí)程序設(shè)計(jì)語(yǔ)言，不具備低級(jí)語(yǔ)言的功能，對(duì)訪問(wèn)機(jī)器硬件的操作不太容易實(shí)現(xiàn)。但它可以通過(guò)動(dòng)態(tài)鏈接庫(kù)技術(shù)將C/C++或匯編語(yǔ)言編寫的程序參加到VisualBasic應(yīng)用程序中，可以像調(diào)用內(nèi)部函數(shù)一樣調(diào)用其他語(yǔ)言編寫的函數(shù)。此外，通過(guò)動(dòng)態(tài)鏈接庫(kù)，還可以調(diào)用Windows應(yīng)用程序接口(API)函數(shù)，實(shí)現(xiàn)SDK所具有的功能。3.2關(guān)系型數(shù)據(jù)庫(kù)的實(shí)現(xiàn)Access2000就是關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)工具，數(shù)據(jù)庫(kù)能聚集各種信息以供查詢、存儲(chǔ)和檢索。Access的優(yōu)點(diǎn)在于它能使用數(shù)據(jù)表示圖或自定義窗體收集信息。數(shù)據(jù)表示圖提供了一種類似于Excel的電子表格，可以使數(shù)據(jù)庫(kù)一目了然。另外，Access允許創(chuàng)立自定義報(bào)表用于打印或輸出數(shù)據(jù)庫(kù)中的信息。Access也提供了數(shù)據(jù)存儲(chǔ)庫(kù)，可以使用桌面數(shù)據(jù)庫(kù)文件把數(shù)據(jù)庫(kù)文件置于網(wǎng)絡(luò)文件效勞器，與其他網(wǎng)絡(luò)用戶共享數(shù)據(jù)庫(kù)。Access是一種關(guān)系數(shù)據(jù)庫(kù)工具，關(guān)系數(shù)據(jù)庫(kù)是已開(kāi)發(fā)的最通用的數(shù)據(jù)庫(kù)之一。如上所述，Access作為關(guān)系數(shù)據(jù)庫(kù)開(kāi)發(fā)具備了許多優(yōu)點(diǎn)，可以在一個(gè)數(shù)據(jù)包中同時(shí)擁有桌面數(shù)據(jù)庫(kù)的便利和關(guān)系數(shù)據(jù)庫(kù)的強(qiáng)大功能。4.3二者的結(jié)合〔DBA〕微軟的JET數(shù)據(jù)庫(kù)引擎提供了與數(shù)據(jù)庫(kù)打交道的途徑，我們是通過(guò)它以及VisualBasic來(lái)訪問(wèn)數(shù)據(jù)庫(kù)并對(duì)其進(jìn)行各種操作。VisualBasic、Access以及其他微軟的軟件產(chǎn)品都是通過(guò)共用JET數(shù)據(jù)庫(kù)引擎，從而給用戶提供了豐富的數(shù)據(jù)類型。DATA控件在數(shù)據(jù)庫(kù)中的信息與將信息顯示給用戶看的VisualBasic程序之間架起了一座橋梁。我們可以設(shè)置DATA控件的各個(gè)屬性，告訴它要調(diào)用那個(gè)數(shù)據(jù)庫(kù)的哪個(gè)局部。缺省情況下，DATA控件根據(jù)數(shù)據(jù)庫(kù)中的一個(gè)或多個(gè)數(shù)據(jù)表建立一個(gè)dynaset-type〔動(dòng)態(tài)集合〕類型的記錄集合。一個(gè)記錄集合是動(dòng)態(tài)的也就意味著，當(dāng)原來(lái)的數(shù)據(jù)表中的容改變了以后，該記錄集合中的記錄也會(huì)隨之改變。DATA控件還提供了用來(lái)瀏覽不同記錄的各種跳轉(zhuǎn)按鈕。將DATA控件放置在窗體中之后，我們還必須在該控件與要處理的數(shù)據(jù)庫(kù)之間建立聯(lián)系。第四章系統(tǒng)總體規(guī)劃4.1系統(tǒng)功能分析本系統(tǒng)主要?jiǎng)澐譃橐韵?個(gè)子模塊：圖書管理、圖書查詢、借閱查詢、根底維護(hù)。主要的系統(tǒng)模塊如下列圖如示。圖書查詢管理系統(tǒng)圖書查詢管理系統(tǒng)圖書管理圖書查詢借閱查詢借閱管理根底維護(hù)系統(tǒng)功能模塊下面分別對(duì)這5個(gè)功能模塊進(jìn)行介紹。4.2圖書管理模塊圖書館工作人員通過(guò)此模塊來(lái)管理各類圖書，包括圖書品種的添加、修改、刪除等。在進(jìn)行圖書的添加時(shí)，彈出新的窗口進(jìn)行圖書信息的錄入，在保存的時(shí)候要進(jìn)行書籍編號(hào)是否重復(fù)的檢驗(yàn)，如果添加的書籍編號(hào)重復(fù)要對(duì)用戶進(jìn)行提示，只有在不重復(fù)的情況下才能夠進(jìn)行圖書的添加。在進(jìn)行圖書的刪除操作時(shí)，要首先彈出提示窗口讓用戶確認(rèn)是否刪除，只有在用戶確認(rèn)后才能夠進(jìn)行圖書的刪除。在進(jìn)行圖書的修改時(shí)，要能夠根據(jù)用戶選定的書進(jìn)行修改，即列出所有用戶選定書的信息，在這個(gè)根底上進(jìn)行圖書信息的修改。4.3圖書查詢模塊讀者通過(guò)引模塊來(lái)查詢自己所需要的圖書。該模塊提供了包括書籍編號(hào)、書籍類別、書籍名稱、出版社、書籍價(jià)格以及登記日期在內(nèi)的各種查詢條件，讀者可以根據(jù)這些單個(gè)的查詢條件或者它們的組合來(lái)進(jìn)行所需要圖書的查詢。同時(shí)，在查詢時(shí)還提供了進(jìn)行模糊查詢的功能，即該模塊能夠利用讀者輸入的非完整的查詢條件查詢，例如讀者在書籍編號(hào)的查詢條件中輸入“06〞，系統(tǒng)就能夠查出所有書籍編號(hào)包括“06〞的圖書，像“1006〞、“0600〞等。這樣更加方便了讀者的查詢。4.4借閱查詢模塊借閱管理窗體模塊主要完成借閱管理的功能，包括借書、續(xù)借和還書。工作人員可以根據(jù)使用的需要，依靠單擊Tab標(biāo)簽頁(yè)中的標(biāo)簽分別進(jìn)入不同的操作。在“正常借書〞的標(biāo)簽頁(yè)下，工作人員輸入讀者編號(hào)以及書籍編號(hào)，系統(tǒng)便會(huì)對(duì)這兩項(xiàng)信息進(jìn)行確認(rèn)，如果確認(rèn)成功，工作人員只要單擊“借出當(dāng)前圖書〞按鈕，便完成了借書的操作，操作十分簡(jiǎn)單，該局部的流程圖如下圖。同樣在“續(xù)借圖書〞的標(biāo)簽頁(yè)下，工作人員輸入讀者編號(hào)，系統(tǒng)便會(huì)列出該讀者所借的所有圖書，工作人員選擇其中要續(xù)借的圖本后，在“借書日期改為〞的日期選擇框中選擇要修改的借書日期，最后單擊“確定〞按鈕，就完成了圖書的續(xù)借，該局部的流程圖如下圖。在“還書的標(biāo)簽頁(yè)下〞。工作人員只需要輸入書籍編號(hào)，系統(tǒng)會(huì)自動(dòng)對(duì)該信息進(jìn)行確認(rèn)，確認(rèn)成功后，單擊“歸還圖書〞按鈕，完成了還書的操作，該局部流程圖如下圖。輸入讀者編號(hào)讀者是否存在列出讀者所借書籍輸入讀者編號(hào)讀者是否存在列出讀者所借書籍選擇續(xù)借書籍更新借書日期進(jìn)行續(xù)借數(shù)據(jù)庫(kù)輸入讀者編號(hào)讀者是否存在輸入圖書編號(hào)是否已被借出借出讀書讀者是否借滿數(shù)據(jù)庫(kù)編號(hào)是否存在輸入圖書編號(hào)編號(hào)是否存在是否已被借出列出借閱信息歸還該書數(shù)據(jù)庫(kù)圖4.1.1借閱圖書流程圖圖4.1.2續(xù)借圖書流程圖圖4.1.3還書流程圖工作人員通過(guò)此模塊來(lái)進(jìn)行借閱記錄的查詢。該模塊提供了包括讀者編號(hào)、讀者姓名、書籍編號(hào)、書籍名稱、以及借書日期在內(nèi)的各種查詢條件，工作人員可根據(jù)這些單個(gè)的查詢條件或者它們的組合來(lái)進(jìn)行查詢，既可以查詢出某本書或者某個(gè)讀者的借閱歷史，也可以查出某天所有的借閱信息。同時(shí)，跟圖書查詢模塊類似，該模塊在查詢時(shí)也提供了進(jìn)行模糊查詢的功能以方便工作人員的查詢。4.5借閱管理模塊通過(guò)些模塊來(lái)完成讀者的圖書借閱、續(xù)借以及圖書退還工作。該模塊是圖書管理系統(tǒng)的重點(diǎn)，其中主要包括借閱、續(xù)借、退還3局部，現(xiàn)在分別對(duì)這3個(gè)局部進(jìn)行介紹。首先是借閱局部在進(jìn)行圖書的借閱的借閱時(shí)，除了要對(duì)讀者的信息進(jìn)行確認(rèn)外，還要進(jìn)行書籍信息確實(shí)認(rèn)，在最后進(jìn)行借出該書的操作時(shí)，除了在借閱信息的表中添加記錄外，還要將數(shù)據(jù)庫(kù)中該書的狀態(tài)設(shè)置為已經(jīng)借出，以防止其他的讀者在對(duì)該書進(jìn)行借閱。接著是續(xù)借局部，相對(duì)于借閱局部，續(xù)借局部比擬簡(jiǎn)單，在進(jìn)行了用戶信息怕確認(rèn)之后，只需要更新需要續(xù)借書籍的借書日期即可完成圖書的續(xù)借。最后是還書局部，首先要進(jìn)行書籍信息確實(shí)認(rèn)，注意在判斷該書是否已經(jīng)借出是時(shí)，同借書流程做相反的處理，只有借出的書才能夠進(jìn)行還書，同時(shí)在歸還圖書的操作時(shí)，除了更新借閱信息中的內(nèi)容外，還要更新該圖書的信息為沒(méi)有借出，方便別的讀者借閱。4.6根底維護(hù)模塊包括最大借閱數(shù)量、罰款單價(jià)昨圖書類別的維護(hù)等工作。在該模塊中工作人員可以設(shè)置讀者所能借閱圖書的最大數(shù)量以及如果讀者圖書延期每天需要交納的罰款，同時(shí)還可進(jìn)行圖書類別的一些設(shè)置，包括圖書類別代碼、類別名稱以及該類圖書所允許的最大借閱天數(shù)。第五章系統(tǒng)數(shù)據(jù)庫(kù)設(shè)計(jì)數(shù)據(jù)庫(kù)在一個(gè)信息管理系統(tǒng)中占有非常重要的位置，數(shù)據(jù)庫(kù)結(jié)構(gòu)設(shè)計(jì)的好壞將直接對(duì)應(yīng)用系統(tǒng)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫(kù)設(shè)計(jì)可以提高數(shù)據(jù)庫(kù)存儲(chǔ)效率，保證數(shù)據(jù)的完整和一致。同時(shí)合理的數(shù)據(jù)結(jié)構(gòu)也將有利于程序的實(shí)現(xiàn)。設(shè)計(jì)數(shù)據(jù)庫(kù)系統(tǒng)時(shí)，應(yīng)該首先了解用戶的各個(gè)方面的需求，包括現(xiàn)有的以及將來(lái)可能增加的。5．1創(chuàng)立數(shù)據(jù)庫(kù)文件如果操作系統(tǒng)中安裝了ACCESS2000的話，可以在開(kāi)始菜單的程序菜單中可以找到。如下所示：翻開(kāi)ACCESS2000之后，會(huì)開(kāi)啟一個(gè)窗口，可選擇是翻開(kāi)以前的數(shù)據(jù)庫(kù)文件還是新建一個(gè)新的空數(shù)據(jù)庫(kù)文件，如果選擇空ACCESS數(shù)據(jù)庫(kù)，然后點(diǎn)擊確定按鈕。這些就新建了一個(gè)數(shù)據(jù)庫(kù)文件。

最后一步就是要選擇一個(gè)要保存數(shù)據(jù)庫(kù)文件的名字和位置。點(diǎn)擊創(chuàng)立就完成。5.2怎樣創(chuàng)立一個(gè)數(shù)據(jù)表上面已經(jīng)講了如何創(chuàng)立一個(gè)數(shù)據(jù)庫(kù)文件，按照上面的步驟建立一個(gè)數(shù)據(jù)庫(kù)文件后，需要在數(shù)據(jù)庫(kù)文件中建立一個(gè)數(shù)據(jù)表。在下面的對(duì)話框中選〞使用設(shè)計(jì)器創(chuàng)立表〞，上面還有三個(gè)按鈕，一個(gè)是翻開(kāi)，一個(gè)是設(shè)計(jì)，一個(gè)是新建，點(diǎn)擊設(shè)計(jì)，就可以開(kāi)始設(shè)計(jì)數(shù)據(jù)表了。出現(xiàn)設(shè)計(jì)的界面后，就可以開(kāi)始設(shè)計(jì)數(shù)據(jù)表了！5.3VB連接ACCESS2000數(shù)據(jù)庫(kù)用vb編寫一個(gè)管理軟件，如果不能連接數(shù)據(jù)庫(kù)，那也沒(méi)有什么用處。先看看VB是如何與ACCESS2000數(shù)據(jù)庫(kù)相連接的。SubConnStr()'連接數(shù)據(jù)庫(kù)Setconn=CreateObject("ADODB.Connection")'建立數(shù)據(jù)庫(kù)連接對(duì)像DBpath=App.Path&"\"&"data.mdb"'設(shè)置數(shù)據(jù)的路徑conn.Open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&DBpath'翻開(kāi)數(shù)據(jù)庫(kù)連接Setrs=CreateObject("ADODB.Recordset")'設(shè)置數(shù)據(jù)庫(kù)對(duì)像EndSub上面的一段代碼就是連接數(shù)據(jù)庫(kù)的。上用到了三個(gè)變量conn,Dbpath,rs。其中有兩個(gè)變量要定義為公用的變量，因?yàn)檫@段代碼是放在一個(gè)模塊中的，為了在每一個(gè)窗體中能夠使用這個(gè)變量，所以必須要聲明為公用變量。聲明公用變量的方法如下：PublicconnPublicrs上面就是聲明為公用變量，上面的聲明一定要放在模塊的最上面。如果聲明在下面，那就成了局部變量，那么作用范圍就會(huì)不同了，作用就更不同，而且在其它窗體中使用到了這個(gè)變量，程序會(huì)出錯(cuò)。5.4數(shù)據(jù)庫(kù)詳細(xì)設(shè)計(jì) 數(shù)據(jù)庫(kù)設(shè)計(jì)的好壞，直接關(guān)系到整個(gè)程序的好壞，數(shù)據(jù)庫(kù)的結(jié)構(gòu)是否合理，能不能滿足現(xiàn)有的要求，今后系統(tǒng)的升級(jí)過(guò)程中是不是方便，能不能把數(shù)據(jù)庫(kù)的結(jié)構(gòu)直接移植到其它的數(shù)據(jù)庫(kù)中使用，比方把ACCESS數(shù)據(jù)庫(kù)的結(jié)構(gòu)直接導(dǎo)入SQLServer中能不能直接使用，是不是還要修改程序等等。這些都是非常重要的，本系統(tǒng)的數(shù)據(jù)庫(kù)設(shè)計(jì)比擬合理，而不是非常合理，因?yàn)槊恳粋€(gè)程序都可能有錯(cuò)誤，有一位程序設(shè)計(jì)大師說(shuō)過(guò)一句話，沒(méi)有BUG〔錯(cuò)誤〕的程序，那不叫程序！下面列出數(shù)據(jù)庫(kù)中的每一個(gè)表，包括表中的字段的含意。1．管理員表：用于存放管理員的信息。管理員數(shù)據(jù)庫(kù)存儲(chǔ)的是圖書管理員的用戶名，密碼，以及用權(quán)限等字段名字段類型字段長(zhǎng)度字段說(shuō)明用戶名文本16用戶名密碼文本16密碼權(quán)限文本10權(quán)限2.借書記錄表：用于存放在借書過(guò)程中的借書記錄和還書記錄等等。字段名字段類型字段長(zhǎng)度字段說(shuō)明圖書編號(hào)文本20圖書編號(hào)圖書名文本50圖書名出版社文本50出版社作者文本20作者ISBN號(hào)文本20ISBN號(hào)出版日期日期/時(shí)間8出版日期借出數(shù)量文本4借出數(shù)量借出否文本4是否借出借出日期日期/時(shí)間8借出日期用戶編號(hào)文本16用戶編號(hào)3.圖書表：用于存放圖書的相關(guān)信息。圖書數(shù)據(jù)庫(kù)里存儲(chǔ)了圖書包括：圖書名稱，圖書序號(hào)，圖書出版社，定價(jià)等列名〔中文〕數(shù)據(jù)類型寬度小數(shù)點(diǎn)位數(shù)是否為空?qǐng)D書NameDate8No序號(hào)CodeInteger6No學(xué)生姓名SexDate2No年齡AgeDate6No借書證號(hào)NationDate6No圖書模塊：該模塊主要完成圖書根本信息的錄入、刪除、更新等功能。在此模塊中定義了八個(gè)域名來(lái)進(jìn)行圖書的信息存儲(chǔ)。如果用戶修改某一紀(jì)錄中的某一項(xiàng)，可單添加按鈕進(jìn)行圖書記錄的編輯，此窗口使用數(shù)據(jù)窗口的FREEDOM風(fēng)格〔典型的錄入界面〕。該種風(fēng)格特點(diǎn)是列標(biāo)題緊挨著數(shù)據(jù)列在此窗口還可以增加新進(jìn)圖書的紀(jì)錄字段名字段類型字段長(zhǎng)度字段說(shuō)明圖書編號(hào)文本20圖書編號(hào)圖書名文本50圖書名出版社文本50出版社作者文本20作者ISBN號(hào)文本20ISBN號(hào)出版日期日期/時(shí)間8出版日期總數(shù)量文本4總數(shù)量備注備注0備注4.用戶表：用于存放用戶信息。用戶信息數(shù)據(jù)庫(kù)里存儲(chǔ)了用戶的信息包括：讀者編號(hào).姓名，性別，類型.可借讀書等列名〔中文〕列名〔英文〕數(shù)據(jù)類型寬度小數(shù)點(diǎn)位數(shù)是否為空讀者編號(hào)NameDate8No姓名CodeInteger6No性別ScoreDate10No類型RecordDate15No等字段名字段類型字段長(zhǎng)度字段說(shuō)明用戶編號(hào)文本16用戶編號(hào)用戶名文本20用戶名性別文本4性別年齡文本4年齡5.5用戶界面的實(shí)現(xiàn)登錄界面中入用戶名和密碼就進(jìn)入系統(tǒng)進(jìn)行操作，此界面分為管理員和一般管理者，管理員和管理者如果密碼輸入錯(cuò)誤次數(shù)超過(guò)三次，將會(huì)視為非為非法用戶，系統(tǒng)將自動(dòng)退出。_用戶界面的實(shí)現(xiàn)根底維護(hù)翻開(kāi)根底維護(hù)由登陸系統(tǒng)，管理員管理，退出等組成。此可以對(duì)圖書管理系統(tǒng)進(jìn)行操作，以及對(duì)用戶密碼和權(quán)限進(jìn)行修改圖書管理用戶管理圖書查詢借閱管理_結(jié)束語(yǔ)經(jīng)過(guò)一個(gè)多月的設(shè)計(jì)和開(kāi)發(fā)，圖書管理系統(tǒng)根本開(kāi)發(fā)完畢。其功能根本符合用戶需求，能夠?qū)崿F(xiàn)圖書信息的錄入、更新、刪除、打印等根本功能，從而實(shí)現(xiàn)圖書的管理。對(duì)于數(shù)據(jù)的一致性的問(wèn)題也通過(guò)程序進(jìn)行了有效的解決。但是由于畢業(yè)設(shè)計(jì)時(shí)間較短，所以該系統(tǒng)還有許多不盡如人意的地方，比方聯(lián)機(jī)文檔比擬少，用戶界面不夠美觀，出錯(cuò)處理不夠等多方面問(wèn)題。這些都有待進(jìn)一步改善。致謝在本次畢業(yè)設(shè)計(jì)中，我從指導(dǎo)老師楊老師身上學(xué)到了很多東西。楊老師認(rèn)真負(fù)責(zé)的工作態(tài)度，嚴(yán)謹(jǐn)?shù)闹螌W(xué)精神和深厚的理論水平都使我收益匪淺。他無(wú)論在理論上還是在實(shí)踐中，都給與我很大的幫助，使我得到不少的提高這對(duì)于我以后的工作和學(xué)習(xí)都有一種巨大的幫助，感謝他耐心的輔導(dǎo)。另外，在系統(tǒng)開(kāi)發(fā)過(guò)程中助手同學(xué)也給于我很大的幫助，幫助解決了不少的難點(diǎn)，使得系統(tǒng)能及時(shí)開(kāi)發(fā)完成，還有同組的同學(xué)同樣給與我不少幫助，這里一并表示感謝。主要參考文獻(xiàn)[1]VisualBasic6.0使用指南BobReselman,RichardPeasley,WaynePruchniak.出版社：電子工業(yè)出版社[2]中文版MicrosoftOffice97自學(xué)通NedSnell出版社：機(jī)械工業(yè)出版社[3]VisualBasic6.0中文版控件大全Microsoft出版社；電子工業(yè)出版社[4]中文Access200024學(xué)時(shí)教程CraigEddy，TimothyBuchanan出版社：機(jī)械工業(yè)出版社附錄：系統(tǒng)登錄界面與源代碼：PrivateSubCommand1_Click()'用戶登陸OnErrorGoToErrCallConnStrsql="select*from管理員where用戶名='"&Trim(Text1.Text)&"'"'Ado_login.Recordset.OpensqlRs.Opensql,conn,1,1IfNotRs.EOFThenIfTrim(Rs.Fields(1))=Trim(Text2.Text)Then'MsgBox"ok"IfRs("權(quán)限")="管理員"ThenMainFrm.Manager.Enabled=TrueMainFrm.Sys_Admin_Manager=TrueMainFrm.Manager_Book.Enabled=TrueMainFrm.System_Manager.Enabled=TrueElseMainFrm.Manager.Enabled=TrueEndIfMe.Visible=FalseElseMsgBox"密碼錯(cuò)誤，請(qǐng)確認(rèn)后再輸入！",0+64EndIfElseMsgShow"沒(méi)有這個(gè)用戶！"EndIfCallCloseConnErr:ExitSubEndSubPrivateSubCommand2_Click()UnloadMeEndSubPrivateSubForm_Load()MainFrm.System_Manager.Enabled=FalseMainFrm.Manager_Book.Enabled=FalseMainFrm.Sys_Admin_Manager=FalseMainFrm.Manager.Enabled=FalseMainFrm.System_Manager.Enabled=FalseEndSubPrivateSubForm_Resize()Frame1.Top=(Frm_Login.Height-Frame1.Height)/2-300Frame1.Left=(Frm_Login.Width-Frame1.Width)/2-300EndSubPrivateSubText2_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=13ThenCallCommand1_ClickEndIfEndSub主界面與源代碼PrivateSubY1_Click()MDIForm1.Arrange0EndSubPrivateSubY2_Click()MDIForm1.Arrange1EndSubPrivateSubY3_Click()MDIForm1.Arrange2EndSubPrivateSubcz_Click()MDIForm1.Arrange2EndSubPrivateSubdspc_Click()Form11.ShowEndSubPrivateSubdzcx_Click()Form7.ShowForm7.Width=10335Form7.Height=5985EndSubPrivateSubdzgl_Click()Form7.ShowForm7.Width=10335Form7.Height=5985EndSubPrivateSubH1_Click()Form3.ShowEndSubPrivateSubH2_Click()MsgBox"你需要什么幫助，請(qǐng)于我們聯(lián)系！",48,"幫助"EndSubPrivateSubhs_Click()Form5.ShowForm5.Height=8130Form5.Width=10775EndSubPrivateSubjc_Click()MDIForm1.Arrange0EndSubPrivateSubjs_Click()form4.Showform4.Height=8450form4.Width=10875EndSubPrivateSubpp_Click()MDIForm1.Arrange1EndSubPrivateSubQ_Click()EndEndSubPrivateSubtc_Click()EndEndSubPrivateSubtjdz_Click()Form1.ShowEndSubPrivateSubtjts_Click()Form10.ShowEndSubPrivateSubToolbar1_ButtonClick(ByValButtonAsMSComctlLib.Button)SelectCaseButton.KeyCase"js"form4.Showform4.Height=8450form4.Width=10875Case"hs"Form5.ShowForm5.Height=8130Form5.Width=10775Case"tjts"Form10.ShowCase"tjdz"Form1.Show借閱圖書界面和源代碼rivateSubCommand3_Click()DoWhileAdodc1.Recordset.EOF<>TrueIfAdodc1.Recordset.Fields("圖書名稱").Value=Text2.TextThenText1(1).Text=Adodc1.Recordset.Fields("圖書名稱").ValueExitDoEndIfextLoopEndSubPrivateSubCommand4_Click()DoWhileAdodc1.Recordset.EOF<>TrueIfAdodc1.Recordset.Fields("圖書序號(hào)").Value=Text2.TextThenText1(0).Text=Adodc1.Recordset.Fields("圖書序號(hào)").ValueExitDoEndIfAdodc1.Recordset.MoveNextLoopEndSub添加圖書界面與源代碼：PrivateSubCommand1_Click()IfText1.Text=""OrText2.Text=""ThenMsgBox"圖書編號(hào)或圖書名稱不能為空！",16,"出錯(cuò)："Text1.SetFocusText1.Text=""ElseMsgBox"信息保存完畢！",16,"恭喜！"Text1.SetFocusCommand1.Enabled=FalseEndIfEndSubPrivateSubCommand2_Click()UnloadMeEndSubPrivateSubForm_Load()Text1.Text=""Text2.Text=""Text3.Text=""Text4.Text=""Text5.Text=""Text6.Text=""Text7.Text=""Text8.Text=""Text9.Text=""Command1.Enabled=FalseEndSubPrivateSubText1_Change()Command1.Enabled=TrueEndSub添加讀者界面和源代碼：PrivateSubCommand1_Click()IfText1.Text=""OrText2.Text=""ThenMsgBox"讀者編號(hào)或讀者姓名不能為空！",16,"出錯(cuò)："Text1.SetFocusText1.Text=""ElseMsgBox"信息保存完畢！",16,"恭喜！"Text1.SetFocusCommand1.Enabled=FalseEndIfEndSubPrivateSubCommand2_Click()UnloadMeEndSubPrivateSubForm_Load()Text1.Text=""Text2.Text=""Text3.Text=""Text4.Text=""Text5.Text=""Text6.Text=""Command1.Enabled=FalseEndSubPrivateSubText1_Change()Command1.Enabled=TrueEndSub圖書管理界面與源代碼：PrivateSubCommand1_Click()IfAdodc1.Recordset.BOF=TrueThenMsgBox"這已經(jīng)是第一條信息了！",16,"出錯(cuò)："ElseEndIfEndSubPrivateSubCommand2_Click()IfAdodc1.Recordset.EOF=TrueThenMsgBox"已經(jīng)到最后一條記錄了！",16,"提示！"ElseEndIfEndSubPrivateSubCommand3_Click()IfAdodc1.Recordset.BOF=TrueThenMsgBox"這已經(jīng)是第一條信息了！",16,"出錯(cuò)："ElseEndIfEndSubPrivateSubCommand4_Click()IfAdodc1.Recordset.EOF=TrueThenMsgBox"已經(jīng)到最后一條記錄了！",16,"提示！"ElseEndIfEndSubPrivateSubCommand5_Click()IfText1.Text=""OrText3.Text=""ThenMsgBox"圖書編號(hào)或圖書名稱不能為空！",16,"出錯(cuò)："Text1.SetFocusText1.Text=""ElseMsgBox"信息保存完畢！",16,"恭喜！"Command1.Enabled=FalseEndIfEndSubPrivateSubCommand6_Click()IfAdodc1.Recordset.BOF=TrueAndAdodc1.Recordset.EOF=TrueThenMsgBox"您的數(shù)據(jù)庫(kù)中沒(méi)有信息可以刪除！",16,"出錯(cuò)！"ElseMsgBox"您確定要?jiǎng)h除這條信息？",32,"出錯(cuò)！"OF=FalseThenElseMsgBox"您的數(shù)據(jù)庫(kù)中沒(méi)有信息可以刪除！",16,"出錯(cuò)！"EndIfEndSubPrivateSubCommand7_Click()EndSubPrivateSubCommand8_Click()UnloadMeEndSubSubcx()ForX=1To1IfTrim(Command6.Tag)=Trim(t3(Val(Command7.Tag)).Text)ThenExitSubElseIfA1.Recordset.EOF=TrueThenElseEndIfIfA1.Recordset.EOF=TrueThenMsgBox"沒(méi)有找你到要查詢的記錄！",32,"提示："ExitSubElseX=X-1EndIfEndIfNextXEndSubPrivateSubCommand9_Click()ForX=0To7Ift17(X).Text=""ThenElseCommand6.Tag=t17(X).TextCommand7.Tag=XCallcxExitSubEndIfNextXMsgBox"您沒(méi)有輸入要查詢的值！",16,"出錯(cuò)："EndSub讀者管理界面與源代碼：PrivateSubCommand2_Click()IfAdodc1.Recordset.BOF=TrueThenMsgBox"這已經(jīng)是第一條信息了！",16,"出錯(cuò)："ElseEndIfEndSubPrivateSubCommand3_Click()IfAdodc1.Recordset.EOF=TrueThenMsgBox"已經(jīng)到最后一條記錄了！",16,"提示！"ElseEndIfEndSubPrivateSubCommand4_Click()IfAdodc1.Recordset.BOF=TrueThenMsgBox"這已經(jīng)是第一條信息了！",16,"出錯(cuò)："ElseEndIfEndSubPrivateSubCommand5_Click()IfAdodc1.Recordset.EOF=TrueThenMsgBox"已經(jīng)到最后一條記錄了！",16,"提示！"ElseEndIfEndSubPrivateSubCommand6_Click()IfText1(0).Text=""OrText2.Text=""ThenMsgBox"讀者編號(hào)或姓名不能為空！",16,"出錯(cuò)："Text1(0).SetFocusText1(0).Text=""ElseMsgBox"信息保存完畢！",16,"恭喜！"Command1.Enabled=FalseEndIfEndSubPrivateSubCommand7_Click()EndSubPrivateSubCommand8_Click()IfAdodc1.Recordset.BOF=TrueAndAdodc1.Recordset.EOF=TrueThenMsgBox"您的數(shù)據(jù)庫(kù)中沒(méi)有信息可以刪除！",16,"出錯(cuò)！"ElseMsgBox"您確定要?jiǎng)h除這條信息？",32,"出錯(cuò)！"EndIfEndSubPrivateSubCommand9_Click()UnloadMeEndSub用戶管理界面與源代碼：PrivateSubCommand1_Click()IfA1.Recordset.BOF=TrueAndA1.Recordset.EOF=TrueThenMsgBox"您輸入的第一個(gè)管理員是系統(tǒng)管理員，是用來(lái)設(shè)置用戶的，請(qǐng)不要?jiǎng)h除！",64,"提示："A1.Tag=1C1.Visible=FalseC2.Visible=FalseEndIfIfCommand1.Caption="添加"ThenC1.Value=0C2.Value=0F1.Enabled=TrueCommand1.Caption="添加完畢"Command5.Enabled=FalseCommand2.Enabled=FalseCommand3.Enabled=FalseCommand4.Enabled=FalseElseIfText1.Text=""AndText2.Text=""ThenMsgBox"您沒(méi)有輸入用戶名或密碼！",16,"出錯(cuò)："Text1.Text="123"F1.Enabled=FalseCommand1.Caption="添加"F1.Caption="當(dāng)前記錄："Command5.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=TrueElseIfA1.Tag=1ThenF1.Enabled=FalseCommand1.Caption="添加"Command5.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=TrueC1.Visible=TrueC2.Visible=TrueA1.Tag=2ElseIfC2.Value=1OrC1.Value=1ThenF1.Enabled=FalseCommand1.Caption="添加"Command5.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=TrueElseMsgBox"您沒(méi)有輸入權(quán)限！",16,"出錯(cuò)："EndIfEndIfEndIfEndIfEndSubPrivateSubCommand2_Click()IfA1.Recordset.EOF=TrueOrA1.Recordset.BOF=TrueThenMsgBox"數(shù)據(jù)庫(kù)中沒(méi)有記錄！",16,"出錯(cuò)："ElseEndIfEndSubPrivateSubCommand3_Click()UnloadMeEndSubPrivateSubCommand4_Click()IfA1.Recordset.BOF=TrueAndA1.Recordset.EOFThenMsgBox"數(shù)據(jù)庫(kù)中沒(méi)有記錄！",16,"出錯(cuò)："ElseIfCommand4.Caption="查詢"ThenF2.Enabled=TrueCommand5.Enabled=FalseCommand2.Enabled=FalseCommand3.Enabled=FalseCommand1.Enabled=FalseCommand4.Caption="查詢完畢"Text3.Text=""ElseF2.Enabled=FalseCommand5.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand1.Enabled=TrueCommand4.Caption="查詢"Text3.Text=""EndIfEndIfEndSubPrivateSubCommand5_Click()IfA1.Recordset.BOF=TrueOrA1.Recordset.EOF=TrueThenMsgBox"數(shù)據(jù)庫(kù)中沒(méi)有記錄！",16,"出錯(cuò)："ElseIfCommand5.Caption="修改"ThenCommand5.Caption="修改完畢"F1.Caption="修改記錄："F1.Enabled=TrueCommand1.Enabled=FalseCommand2.Enabled=FalseCommand3.Enabled=FalseCommand4.Enabled=FalseElseIfText1.Text=""OrText2.Text=""ThenX=MsgBox("您沒(méi)有輸入用戶名或密碼，要?jiǎng)h除嗎？",17,"出錯(cuò)：")IfX=1ThenText1.Text="123"Text2.Text="123"ElseExitSubEndIfElseIfC2.Value=1OrC1.Value=1ThenF1.Enabled=FalseCommand5.Caption="修改"Command1.Enabled=TrueCommand2.Enabled=TrueCommand3.Enabled=TrueCommand4.Enabled=TrueElseMsgBox"您沒(méi)有輸入權(quán)限！",16,"出錯(cuò)："EndIfEndIfEndIfEndIfEndSubPrivateSubCommand6_Click()A1.Recordset.AbsolutePosition=1ForX=1To1IfA1.Recordset.EOF=TrueThenMsgBox"沒(méi)有找到記錄！",64,"提示："ElseIfTrim(Text3.Text)=Trim(Text1.Text)ThenExitSubElseX=X-1EndIfEndIfNextXEndSubPrivateSubCommand7_Click()ForX=1To1IfA1.Recordset.EOF=TrueThenMsgBox"沒(méi)有找到記錄！",64,"提示："A1.Recordset.AbsolutePosition=1ElseIfTrim(Text3.Text)=Trim(Text1.Text)ThenExitSubElseX=X-1EndIfEndIfNextXEndSubPrivateSubForm_Load()Text1.Tag=Text1.TextEndSubPrivateSubForm_Unload(CancelAsInteger)IfCommand3.Enabled=TrueThenCancel=0ElseMsgBox"請(qǐng)編輯完這條記錄再退出！",64,"提示："Cancel=1EndIfEndSubAnyway,IwashereinAmbersomeyearsago.Notdoingmuchofanything.Justvisitingandbeinganuisance.Dadwasstillaround,andwhenInoticedthathewasgettingintooneofhisgrumpymoods,Idecideditwastimetotakeawalk.Alongone.Ihadoftennoticedthathisfondnessformetendedtoincreaseasaninversefunctionofmyproximity.Hegavemeafancyridingcropforagoing-awaypresent-tohastentheprocessofaffection,Isuppose.Still,itwasaverynicecrop-silve