圖書(shū)館圖書(shū)管理的數(shù)據(jù)庫(kù)系統(tǒng)-資料下載頁(yè)
2024-09-07 12:44本頁(yè)面
【導(dǎo)讀】自20世紀(jì)70年代以來(lái),數(shù)據(jù)庫(kù)技術(shù)得到迅速發(fā)展.目前世界上已經(jīng)有數(shù)百萬(wàn)個(gè)數(shù)據(jù)庫(kù)系統(tǒng)在運(yùn)行,些系統(tǒng)分布在郵電,計(jì)委,銀行,電力,鐵路,氣象,民航,情報(bào),公安,軍事,航天和財(cái)稅等行業(yè).重要的組成部分.人們充分認(rèn)識(shí)到,數(shù)據(jù)庫(kù)是信息化社會(huì)中信息資源管理與開(kāi)發(fā)利用的基礎(chǔ).對(duì)于一個(gè)國(guó)家,數(shù)據(jù)庫(kù)的建設(shè)規(guī)模,使用水平已成為衡量該國(guó)信息化程度的重要標(biāo)志.因此,數(shù)據(jù)庫(kù)的學(xué)習(xí)是非常重要的.改數(shù)據(jù)、刪除數(shù)據(jù)等一系列操作。信息并支持用戶(hù)檢索和更新所需要的信息。種操作，就是如何利用數(shù)據(jù)庫(kù)管理系統(tǒng)、系統(tǒng)軟件和相關(guān)硬件系統(tǒng)，將用戶(hù)的要求轉(zhuǎn)化成有效的數(shù)據(jù)結(jié)構(gòu)，持?jǐn)?shù)據(jù)庫(kù)的完整性，必須有效的處理數(shù)據(jù)故障和進(jìn)行數(shù)據(jù)庫(kù)恢復(fù)。決定把數(shù)據(jù)庫(kù)管理系統(tǒng)設(shè)計(jì)成為一個(gè)綜合的數(shù)據(jù)庫(kù)。需求信息的收集又稱(chēng)為系統(tǒng)調(diào)查。充分的準(zhǔn)備工作，要了解調(diào)查的目的、調(diào)查的內(nèi)容和調(diào)查的方式。因此，圖書(shū)管理系統(tǒng)主要是通過(guò)對(duì)現(xiàn)有的圖書(shū)管理系統(tǒng)進(jìn)行考察、研究。
【正文】 do form xgtsda endif Command2(取消 ).Click （ 2）修改圖書(shū)檔案表單（ ） 程序： close all use ts locate for 圖書(shū)編號(hào) =trim(tsbh) =圖書(shū)編號(hào) =書(shū)名 =作者 =出版社 =單價(jià) Command1(修改 ).Click close all use js locate for 圖書(shū)編號(hào) =trim(tsbh) if found() and messagebox(這本書(shū)借出未還，不能修改 !,0+16,警告 ) else close all use ts locate for 圖書(shū)編號(hào) =trim(tsbh) private i i=messagebox(真的要修改這名讀者嗎？ ,4+32,警告 ) if i=6 replace 圖書(shū)編號(hào) with , 書(shū)名 with 。 作者 with ,出版社 with 。 單價(jià) with messagebox(成功修改該記錄！ ,0+64,信息 ) endif endif Command2(關(guān)閉 ).Click 3）、刪除圖書(shū)檔案 （ 1）、輸入刪除圖書(shū)號(hào)表單（ ) 程序 ： public tsh tsh= Command1(確定 ).Click close all use ts locate for 圖書(shū)編號(hào) =trim(tsh) if not found() messagebox(經(jīng)查詢(xún)沒(méi)有這個(gè)學(xué)生，請(qǐng)查證后再輸入 ,0+32) = else do form sqtsda endif Command2(返回 ).Click (2)、刪除圖書(shū)檔案表單（ ） 程序： close all use ts locate for 圖書(shū)編號(hào) =trim(tsh) =圖書(shū)編號(hào) =書(shū)名 =作者 =出版社 =單價(jià) Command1(刪除 ).Click close all use js locate for 圖書(shū)編號(hào) =trim(tsh) if found() and messagebox(這本書(shū)借出未還，不能刪除 !,0+16,警告 ) else close all use ts locate for 圖書(shū)編號(hào) =trim(tsh) private i i=messagebox(真的要?jiǎng)h除這個(gè)記錄嗎？ ,4+32,警告 ) if i=6 delete pack messagebox(成功刪除了該記錄！ ,0+64,信息 ) endif endif Command2(關(guān)閉 ).Click 4)、清空?qǐng)D書(shū)檔案程 use ts zap 5)、添加讀者檔案表單（ ） 程序： Command1（添加） .Click close all use dj if =添加 go bottom append blank =保存 =放棄 else locate for 借書(shū)證號(hào) = if found()=.t. messagebox(借書(shū)證號(hào)已存在 ,請(qǐng)重新輸入 !,0+64,信息 ) = else go bottom replace 借書(shū)證號(hào) with , 姓名 with 。 性別 with ,專(zhuān)業(yè) with 。 班級(jí) with = = = = = =添加 =關(guān)閉 endif endif Command2(關(guān)閉 ).Click close all use dj if =添加 go bottom append blank =保存 =放棄 else locate for 借書(shū)證號(hào) = if found()=.t. messagebox(借書(shū)證號(hào)已存在 ,請(qǐng)重 新輸入 !,0+64,信息 ) = else go bottom replace 借書(shū)證號(hào) with , 姓名 with 。 性別 with ,專(zhuān)業(yè) with 。 班級(jí) with = = = = = =添加 =關(guān)閉 endif endif 6）、修改讀者檔案模塊 （ 1） 輸入修改讀者借書(shū)號(hào)（ ） 程序： public jszh jszh= Command1(確定 ).Click close all use dj locate for 借書(shū)證號(hào) =trim(jszh) if not found() messagebox(經(jīng)查詢(xún)沒(méi)有這個(gè)學(xué)生，請(qǐng)查證后再輸入 ,0+32) = else do form xgdjda endif Command2(返回 ).Click 2)修改讀者檔案（ ） 程序： sele dj locate for =trim(jszh) = =姓名 =性別 =專(zhuān)業(yè) =班級(jí) Command1(修改 ).Click close all use js locate for 借書(shū)證號(hào) =trim(jszh) if found() and messagebox(這名讀者有書(shū)未還，不能修改 !,0+16,警告 ) else close all use dj locate for =trim(jszh) private i i=messagebox(真的要修改這名讀者嗎？ ,4+32,警告 ) if i=6 replace 借書(shū)證號(hào) with , 姓名 with 。 性別 with ,專(zhuān)業(yè) with 。 班級(jí) with messagebox(成功修改該記錄！ ,0+64,信息 ) endif endif Command2(關(guān)閉 ).Click 7）刪除讀者檔案 (1)、輸入刪除讀者號(hào)（ ） 程序： public jsh jsh= Command1(確定 ).Click close all use dj locate for 借書(shū)證號(hào) =trim(jsh) if not found() messagebox(經(jīng)查詢(xún)沒(méi)有這個(gè)學(xué)生，請(qǐng)查證后再輸入 ,0+32) = else do form sqdjda endif Command2(返回 ).Click (2)刪除讀者檔案（ ） 程序： sele dj locate for =trim(jsh) = =姓名 =性別 =專(zhuān)業(yè) =班級(jí) Command1(刪除 ).Click close all use js locate for 借書(shū)證號(hào) =trim(jsh) if found() and messagebox(這名讀者有書(shū)未還，不能刪除 !,0+16,警告 ) else close all use dj locate for =trim(jsh) private i i=messagebox(真的要?jiǎng)h除這名讀者嗎？ ,4+32,警告 ) if i=6 delete pack messagebox(成功刪除了該記錄！ ,0+64,信息 ) endif endif Command2(關(guān)閉 ).Click 8)清空讀者檔案過(guò)程 use dj zap 退出模塊 使用命令，退出本系統(tǒng)。 命令： QUIT 幫助模塊： 列出了有關(guān)系統(tǒng)的一 些有關(guān)約定和作者的一些信息。 第五章 結(jié)束語(yǔ) 本系統(tǒng)經(jīng)過(guò)了多次的上機(jī)調(diào)試，在 Windowsxp 平臺(tái)上測(cè)試通過(guò)。本次畢業(yè)設(shè)計(jì)歷時(shí)三個(gè)多月，我和同組的成員分工合作，從需求分析、資料收集、模型設(shè)計(jì)到整個(gè)管理系統(tǒng)的完成做了大量的工作。設(shè)計(jì)基本能滿(mǎn)足日常的圖書(shū)館管理工作，當(dāng)然由于設(shè)計(jì)者的水平有限，以及分析欠全面和時(shí)間的問(wèn)題，未能做得更好。畢業(yè)設(shè)計(jì)是對(duì)我大專(zhuān)三年所學(xué)知識(shí)的一個(gè)綜合，通過(guò)了本次的設(shè)計(jì)，我能從中學(xué)到的更多的東西，使自己的計(jì)算機(jī)程序設(shè)計(jì)水平得到了一定的提高，這是最重要的。本次設(shè)計(jì)得到了很多人的幫忙，包括 指導(dǎo)老師和同組的各位學(xué)員，在此我深表感謝！ 附參考文獻(xiàn)： 《數(shù)據(jù)庫(kù)基礎(chǔ)與應(yīng)用》 王利編著 中央電大出版社 《數(shù)據(jù)庫(kù)基礎(chǔ)與應(yīng)用課程設(shè)計(jì)指導(dǎo)用書(shū)》 徐孝凱 鐘聲編 中央電大出版社 《 Visual Foxpro 及其應(yīng)用系統(tǒng)開(kāi)發(fā)》 史濟(jì)民 湯觀全 清華大學(xué)出版社 《 Visual Foxpro 入門(mén)與應(yīng)用實(shí)例》 李俊德編著 清華大學(xué)出版社
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1