參考資料 - 東南科技大學.docx

圖書管理系統東南科技大學電子工程系101 東南科技大學電子工程系畢業實務專題報告專題題目圖書管理系統專題題目Books Management System學生：黃昱超49901012張銓翔49901135指導老師：黃智權老師中華民國102年06月畢業實務專題報告電子檔案上網授權書本授權書所授權之畢業實務專題報告為授權人在東南科技大學電子工程系101學年度第_2_學期所完成。專題題目：_ _圖書管理系統_ _指導老師：_ 黃智權_ _ _茲同意將授權人擁有著作權之上列報告全文(含摘要)，非專屬、無償授權東南科技大學，不限地域、時間與次數，以微縮、光碟或其他各種數位化方式將上列報告重製，並得將數位化之上列報告電子檔以上載網路方式，提供讀者基於非營利性質之線上檢索、閱覽，或並下載、列印。讀者基於非營利性質之線上檢索、閱覽或下載、列印上開報告，應依著作權法相關規定辦理。指導老師： 授權人學生姓名： (請親筆正楷簽名)中華民國102年06月11日37中文摘要資料庫系統是一套電腦程式，以控制資料庫的分類及數據的存取。一套資料庫包括:最常用的三大分別為階層式、網路式及關聯式的模型。一個資料庫管理系統可提供一種、兩種，甚至全部三種方式，也可能提供其他形式。最適合的模型要視乎個別應用程式、交易進行比率及查詢經常使用的程度等。目前最常使用的則是SQL所支援，相似於關聯式模型但又有些違背的方式。很多資料庫管理系統也支援ODBC以支援程式編寫原以標準方法存取跟資料庫管理系統。查詢語言及撰寫報表的城市，讓使用者可以互動方式查問資料庫，進行數據分析及依使用者的全線來更新數據。如果跟資料庫庫管理系統向使用者提供可輸入更新資料庫甚至進行查詢的互動途徑，則此能力可以用來管理個人的資料庫。可是，它不一定提供審核或其他在多使用者環境中所需要的各種控制機制。這些機制可能要整套應用程式都為數據輸入或更新而修改才能提供。英文摘要The detabase amnagement system is a set of computer programs to control the classification of the database and access to.A database including:The most commonly used three catrgories were hierarchical,network and relational models.A database management system provides one,two or or even all there ways, and may also provide other forms.The most appropriate model depends on each individual application.the transaction rate and extent of query often use.Is the most commonly used is SQL support,similar to the relational model,but there are minor violation of the way.Many database management sytem also supports ODBC,writers,a standard method to access to the database management system in support program.目 錄第一章研究動機與目的p 1第二章文獻探討p 2第三章設計原理及架構p 3第四章成品展示及操作說明p 4第一節p 7第二節p10第三節p19第五章成效評估p34第六章結 論p35參考資料p36第一章 研究動機及目的現在不少地方都會擁有私人小型圖書館，管理確是一件麻煩的事。普遍圖書管理系統過於繁雜，用於個人或小型單位實在不適合。個人本身與友人購買的書籍也不少，書本一多也很容易忘記購買過哪些書籍，有時朋友的借閱，時間一長容易忘記就會造成書本遺失，這是大家最不希望發生的。為了要方便管理私人小圖書館，所以決定以Foxpro 這套軟體嘗試編寫出一套可用於個人或小型的圖書管理系統。雖然是套簡易的圖書管理系統，該有的查詢、借用、歸還以及維護一樣都不會有所精簡。當然初期製作不可能達到完美，爾後越了解這套系統說不定還可以幫這套管理系升級，使它能夠做出更多功能。但是要如何管理書本就跟人一樣也有自己專屬的號碼ISBN(International Standard Book Number) 利用ISBN 就可以不必在每本書編譯專屬的的號碼每本書上面都一定都有這組ISBN 以及用EAN-13 (European Article Number)這種規格的條碼。第二章 參考文獻資料庫管理系統是一套電腦程式，以控制資料庫的分類及數據的存取。一套資料庫包括：模型語言，用以因應該資料庫管理系統的數據模型，來定義各資料庫的 schema。 最常用的三大類分別為階層式、網路式及關聯式的模型。一個資料庫管理系統可提供一種、兩種，甚至全部三種方式，也可能提供其他形式。最佳化的數據結構（欄位、紀錄及檔案），以支援在永久儲存裝置上儲存極大量的數據。查詢語言及撰寫報表的程式，讓使用者可以互動方式查問資料庫，進行數據分析及依使用者的權限來更新數據。 它必須控制數據的保安，以防止不獲授權的使用者觀看甚至更新資料庫的數據。使用者可以提供有效的密碼來存取整個資料庫或其中一部分。譬如員工資料庫包括所有員工資料的數據，但某組使用者可能只被批准檢視薪金相關的數據如果該資料庫管理系統向使用者提供可輸入更新資料庫甚至進行查詢的互動途徑，則此能力可以用來管理個人的資料庫。可是，它不一定提供審核或其他在多使用者環境中所需要的各種控制機制。這些機制可能要整套應用程式都為數據輸入或更新而修改才能提供。資料庫管理系統可以用唯一索引限制來避免重覆紀錄。譬如不能有兩位顧客有同一個顧客編號內部層(Internal Level):所代表的是實際儲存資料的結構。1. 外部層(External Level)或稱視界層(View Level):則代表使用者或是應用程式所看到的部分。2. 概念層(Conceptual Level):為內部層與外部層之間的橋樑(此部分可看成是資料庫管理師(DBA)所看到的整體部分)。第三章 Foxpro架構及原理I. 架構再Visual Foxpro中，資料庫與資料表格式不同的兩個個體。於Visual Foxpro中，資料庫乃是各項與資料庫相關之資訊的匯集處,資料庫可以擁有許多表格、資料、連接定義、儲存式程序以及觸發式程序，此外它更記錄了各個資料表格之欄位別與紀錄，別的驗證規格，各個欄位的標題說明各欄位的預設值，各個關連資料表格的關聯性與資料參考完整性Visual Foxpro的資料庫具備組織與管理各項相關資訊的功能這些儲存於資料庫項目我們統稱為資料庫物件事實上資料庫管理系統的列行性作業不外乎式下列數項u 資料的取得從資料表格中查詢出所需要的資料比方說想要查詢書本的資料等等 就是資料紀錄的搜索。u 資料的新增從表單的輸入畫面中鍵入新增的資料比方說當有新進的書本可以新增資料，並儲存起來u 資料的更新修改資料表格內原本存在的資料比方說有書本可以修改出版社、書名等資料u 資料的刪除可刪除不比要的檔案比方說書本絕版損壞u 資料的排序將資料表內的資料，依照特定的基本需求與規則排列比方說書名、出版社、出版日期等資料第四章 FoxPro 實際演練操作方式 :點擊程式 圖示 開啟圖書管理系統進入主畫面此系統是以鍵盤為主的操作介面系統操作可分三類 查詢 使用 維護查詢:查詢系統內部資料庫的所以檔案使用:書本的借用 歸還維護:系統的維護，包括資料的新增、修改及刪除，系統的資料備份、回存流程圖:程式碼:define window win0 from 0,0 to 62,240 in desktop title 圖書管理系統 font 標楷體,14 zoom &定義視窗win0的大小 並顯是標題用標楷體14的大小activate windows win0 &啟動視窗win0 set color to r*/r* &設定視窗win0的顏色 1,38 say 圖書管理系統 color b/w* font 標楷體,86 style tbdo funkeysele 1use booksele 2use user1do while .t. do while .t. x1=mcol() y1=mrow() aa=inkey(0.2,M) if aa=27 .or. aa=28 .or. aa=-2 .or. aa=-4 .or. aa=151 exit endif enddo vy=(y1=35 .and. y1=25 .and. y1=12 .and. y1=4 .and. x1=12 .and. y1=12 .and. x1=12 .and. y1=23 .and. x1=12 .and. y1=34 .and. x1=12 .and. y1=45 .and. x1=12 .and. y1=60 .and. x1=72) do searchall with 關鍵字 &呼叫副程式searchall 同時傳遞變數關鍵字 endcase go top enddo deactivate windows win10 &關閉視窗win10returnprocedure searchall &副程式serachall執行資料查詢顯示para qw1 &傳入之參數 set cursor on do case case qw1=全部 recnt=reccount() &recnt為檔案筆數 case qw1=書名 var1=space(30) read 8,24 say 請輸入書名 : get var1 pict ! set filter to bnme=var1 &設定過濾條件為系別 dep=var1 go top recnt=0 do while .not. eof() &此迴圈計算符合過濾條件之資料筆數 recnt=recnt+1 skip enddo case qw1=作者 var1=space(20) 8,24 say 請輸入作者 : get var1 pict ! read set filter to baut=var1 &設定過濾條件為姓名 name=var1 go top recnt=0 do while .not. eof() &此迴圈計算符合過濾條件之資料筆數 recnt=recnt+1 skip enddo case qw1=出版社 var1=space(6) 8,24 say 請輸入出版社 : get var1 pict ! read set filter to bpre=var1 &設定過濾條件為入學年份 inyear=var1 go top recnt=0 do while .not. eof() &此迴圈計算符合過濾條件之資料筆數 recnt=recnt+1 skip enddo case qw1=關鍵字 var1=space(30) 8,24 say 請輸入關鍵字 : get var1 pict ! read var2=alltrim(var1) len2=len(var2) set filter to var2 $ bnme .or. var2 $ baut .or. var2 $ bpre .or. var2 $ bver .or. var2 $ isbn &設定過濾條件為關鍵字 =var2 go top recnt=0 do while .not. eof() &此迴圈計算符合過濾條件之資料筆數 recnt=recnt+1 skip enddo endcase 8,24 say space(32) color b/w* font 標楷體,17 style tb set cursor off if recnt=0 8,38 say 無此資料,按任意鍵 color b/w* style tb do while .t. ad=inkey() if ad0 exit endif enddo 8,24 say space(32) color b/w* font 標楷體,17 style tb else define window win20 from 6,15 to 36,134 in win0 font 標楷體,14 panel &定義視窗win20 activate windows win20 &開啟視窗win20 set color to rgb(0,0,0,135,222,156) 0,7 say 書名 color b+/bg* font 標楷體,18 0,col()+26 say 作者 color b+/bg* font 標楷體,18 0,col()+16 say 出版社 color b+/bg* font 標楷體,18 0,col()+6 say 版本 color b+/bg* font 標楷體,18 0,col()+4 say ISBN color b+/bg* font 標楷體,18 remod=recnt % 26 go top &將檔案指標移至檔頭 declare nme26,nne26 ll=1 do while .t. if ll=1 recbeg=recno() endif ll,7 say bnme nmell=bnme ll,col()+1 say baut ll,col()+1 say bpre ll,col()+1 say bver ll,col()+1 say isbn skip &將檔案指標移至下一筆 ll=ll+1 if eof() .or. ll=27 &End Of File EOF()函數-檢查是否檔尾 28,35 say Esc結束 color b+/w* 28,col()+1 say PgUp上頁 color r+/w* 28,col()+1 say PgDn下頁 color r+/w* yold=0 do while .t. do while .t. aa=inkey(0.2,M) x1=mcol() y1=mrow() * 27,1 say x1 * 28,1 say y1 if aa=27 .or. aa=18 .or. aa=3 .or. aa=151 .or. aa=28 .or. aa=-2 & ASCII 傳回值 PgUp=18 PgDn=3 exit endif enddo vx=(x1=7 .and. x1=23) do case case aa=151 .and. vx if yold0 yy,7 say nmeyold color rgb(0,0,0,135,222,156) font 標楷體,12 endif yy=int(y1) if yy0 go recbeg skip -26 else if test=0 jmp=-25 else jmp=-1*(remod-1) endif go bott skip jmp endif exit case aa=3 ll=1 do clrscr if eof() go top endif exit endcase enddo if aa=27 exit endif endif enddo endif deactivate windows win20 &關閉視窗win20 set filter to &關閉過濾器return 作者查詢 出版社查詢系統資料維護維護是系統不可或缺的一部份，資料的新增、修改跟刪除，系統資料的備份、回存維護畫面流程圖程式碼: procedure servicedefine window win20 from 10,35 to 32,114 in win0 font 標楷體,14 panelactivate window win20set color to w+/br* 5,10 say Esc離開維護 color b+/w* 5,col()+1 say F1 新增資料 color b+/w* 5,col()+1 say F3 修改資料 color b+/w* 5,col()+1 say F5 刪除資料 color b+/w* 5,col()+1 say F8 系統備份 color b+/w* do while .t. do while .t. x1=mcol() y1=mrow() aa=inkey(0.2,M) if aa=27 .or. aa=28 .or. aa=-2 .or. aa=-4 .or. aa=-7 .or. aa=151 exit endif enddo do case case aa=27 exit case aa=28 do indata case aa=-2 do sub2 with 刪除 case aa=-4 do sub2 with 修改 case aa=-7 do copy endcase enddo deactivate windows win20 return資料的新增又分為書籍資料以及使用者部份新增選項 書籍新增 使用者新增程式碼:procedure indata define window win10 fr