Oracle10g數(shù)據(jù)庫應(yīng)用教程圖書借閱管理系統(tǒng)

1、Oracle 10g數(shù)據(jù)庫應(yīng)用教程 授課教師：職務(wù)：第12章 圖書借閱管理系統(tǒng)課程描述很多學(xué)校和單位都有自己的圖書館或閱覽室，需要管理大量的圖書和期刊雜志。圖書借閱管理系統(tǒng)可以有效地管理圖書資源，控制圖書借閱的流程，對圖書館或閱覽室的管理有很大的益處。本章將講述如何使用Visual Basic + Oracle開發(fā)圖書借閱管理系統(tǒng)。此實(shí)例具有很強(qiáng)的實(shí)用性，可以幫助讀者更方便地了解開發(fā)Oracle數(shù)據(jù)庫應(yīng)用程序的過程。本章知識(shí)點(diǎn)圖書借閱管理系統(tǒng)總體設(shè)計(jì)圖書借閱管理系統(tǒng)各模塊詳細(xì)設(shè)計(jì)開發(fā)Visual Basic + Oracle數(shù)據(jù)庫應(yīng)用系統(tǒng)的完整過程12.1 系統(tǒng)總體設(shè)計(jì)系統(tǒng)功能描述創(chuàng)立數(shù)據(jù)庫用

2、戶數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)系統(tǒng)功能描述創(chuàng)立數(shù)據(jù)庫用戶 - 創(chuàng)立用戶 CREATE USER BOOKMAN IDENTIFIED BY BOOKMAN DEFAULT TABLESPACE USERS TEMPORARY TABLESPACE TEMP;- 設(shè)置角色權(quán)限 GRANT CONNECT TO BOOKMAN;GRANT RESOURCE TO BOOKMAN;- 設(shè)置系統(tǒng)權(quán)限 GRANT UNLIMITED TABLESPACE TO BOOKMAN;數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表BookType- 創(chuàng)立表BookType CREATE TABLE BOOKMAN.BookType (TypeIdNu

3、mber Primary Key, TypeName Varchar2(50) NOT NULL, Describe Varchar2(400), UpperIdNumber );編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1TypeIdNumber分類編號(hào)2TypeNameVarchar2 50分類名稱3DescribeVarchar2 400描述信息4UpperIdNumber上級(jí)分類的編號(hào)數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表BookInfo - 創(chuàng)立表BookInfoCREATE TABLE BOOKMAN.BookInfo (BookNoVarchar2(50) Primary Key, BookNameVarchar2

4、(50) NOT NULL, AuthorVarchar2(50) NOT NULL, PublisherVarchar2(50), PtimesVarchar2(50), BpriceNumber(8,2), BtypeNumber, TotalNumNumber, );編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1BookNoVarchar2 50書號(hào)2BookNameVarchar2 50圖書名稱3AuthorVarchar2 50作者4PublisherVarchar2 50出版社5PtimesVarchar2 50版次6BpriceNumber( 8, 2)價(jià)格7BtypeNumber圖書分類8Tot

5、alNumNumber當(dāng)前庫存數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表StoreIn- 創(chuàng)立表StoreInCREATE TABLE BOOKMAN.StoreIn (StoreIdVarchar2(50) Primary Key, BookNoVarchar2(50) NOT NULL, BookNumNumber NOT NULL, StorePosVarchar2(200), EmpNameVarchar2(50), OptDateChar(10) );編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1StoreIdVarchar2 50入庫編號(hào)2BookNoVarchar2 50書號(hào)3BookNumNumber入庫數(shù)量4Stor

6、ePosVarchar2 200圖書存放位置5EmpNameVarchar2 50經(jīng)辦人6OptDateChar 10入庫日期數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表Books- 創(chuàng)立表BooksCREATE TABLE BOOKMAN.Books (BookNoVarchar2(50) Primary Key, BookNumNumber NOT NULL, CountNumNumber, EmpNameVarchar2(50), CountDateChar(10) );編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1BookNoVarchar2 50書號(hào)2BookNumNumber圖書原始數(shù)量3CountNumNumber圖書盤點(diǎn)

7、數(shù)量4EmpNameVarchar2 50盤點(diǎn)人5CountDateChar 10盤點(diǎn)日期數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表Cards- 創(chuàng)立表CardsCREATE TABLE BOOKMAN.Cards (CardnoVarchar2(50) Primary Key, DepName Varchar2(50) NOT NULL, EmpNameVarchar2(50), IdcardVarchar2(50), CreateDateChar(10), FlagNumber(1) );編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1CardnoVarchar2 50借閱證編號(hào)2DepNameVarchar2 50所屬部門3Emp

8、NameVarchar2 50員工姓名4IdcardVarchar2 50有效證件號(hào)碼5CreateDateChar 10發(fā)證日期6FlagNumber 1掛失標(biāo)記數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表Cards- 創(chuàng)立表BorrowCREATE TABLE BOOKMAN.Borrow (BidNumber Primary Key, BookNoVarchar2(50) NOT NULL, CardnoVarchar2(50) NOT NULL, BdateChar(10), RdateChar(10), RRdateChar(10), ForfeitNumber(8,2), FlagNumber(1) );編

9、號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1BidNumber編號(hào)2BookNoVarchar2 50書號(hào)3CardnoVarchar2 50借閱證編號(hào)4BdateChar 10借出日期5RdateChar 10應(yīng)歸還日期6RRDateChar 10實(shí)際歸還日期 / 掛失日期7ForfeitNumber (8,2)超期罰款金額8FlagNumber(1)借閱標(biāo)記（0-借閱，1-續(xù)借，2-歸還，3-掛失）數(shù)據(jù)庫表結(jié)構(gòu)設(shè)計(jì)表Users- 創(chuàng)立表UsersCREATE TABLE BOOKMAN.Users ( UserNameVarchar2(50) Primary Key, UserPwdVarchar2(50)

10、 NOT NULL );INSERT INTO BOOKMAN.Users VALUES(Admin, Admin)編號(hào)字段名稱數(shù)據(jù)結(jié)構(gòu)說 明1UserNameVarchar2 50用戶名2UserPwdVarchar2 50密碼12.2 設(shè)計(jì)工程框架創(chuàng)立工程添加模塊添加類模塊創(chuàng)立工程首先需要?jiǎng)?chuàng)立工程存儲(chǔ)的目錄。運(yùn)行Visual Basic 12.0主程序，并選擇新建“標(biāo)準(zhǔn)EXE工程。新建工程后，在Visual Basic窗口中有一個(gè)缺省的窗體Form1，在此根底上設(shè)計(jì)系統(tǒng)的主界面。選擇“工程菜單中的“工程1屬性命令，在“工程屬性對話框中，將工程名設(shè)置為Books。單擊“保存按鈕，將工程存儲(chǔ)為

11、Books.vbp，將Form1窗體保存為FrmMain.frx。添加模塊Const 用來管理工程中的常量；DbFunc 用來管理工程中與數(shù)據(jù)庫操作相關(guān)的聲明、變量和函數(shù)；GeneralFunc 用來管理工程中一些通用的自定義函數(shù)；Variable 用來管理工程中的全局變量。添加類模塊BookType類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量Delete刪除指定的圖書分類記錄。參數(shù)TmpId表示要?jiǎng)h除的圖書類型編號(hào)GetId根據(jù)指定的圖書分類名稱，讀取圖書分類編號(hào)。參數(shù)TmpName表示指定的分類名稱GetInfo讀取指定的圖書分類記錄。參數(shù)TmpId表示要讀取的圖書分類編號(hào)GetNam

12、e根據(jù)指定的圖書分類編號(hào)，讀取圖書分類名稱。參數(shù)TmpId表示指定的圖書分類編號(hào)GetNewId生成新記錄的圖書分類編號(hào)HaveSon判斷指定的圖書分類是否存在下一級(jí)分類。參數(shù)TmpUpperId表示指定的圖書分類編號(hào)In_DB判斷指定的圖書分類名稱是否已經(jīng)在數(shù)據(jù)庫中。參數(shù)TypeName表示指定的分類名稱Insert插入新的圖書分類記錄Load_by_Upper讀取指定圖書分類的所有子分類。參數(shù)UpperId表示指定的圖書分類的編號(hào)Update修改指定的圖書分類記錄。參數(shù)TmpId表示要修改的圖書分類的編號(hào)表12.8 BookType類的成員函數(shù)添加類模塊 BookInfo類的成員函數(shù)函數(shù)名

13、具體說明Init初始化成員變量Delete刪除指定的圖書信息記錄。參數(shù)TmpBookNo表示要?jiǎng)h除的圖書信息編號(hào)GetInfo讀取指定的圖書信息記錄。參數(shù)TmpBookNo表示要讀取的圖書信息編號(hào)GetName根據(jù)指定的圖書編號(hào)，讀取圖書信息名稱。參數(shù)TmpBookNo表示指定的圖書信息編號(hào)GetNo根據(jù)指定的圖書名稱，讀取圖書信息編號(hào)。參數(shù)TmpName表示指定的圖書名稱GetTotalNum返回指定圖書的庫存數(shù)量In_DB判斷指定的圖書名稱是否已經(jīng)在數(shù)據(jù)庫中。參數(shù)TmpBookName表示指定的圖書名稱Insert插入新的圖書信息記錄Update修改指定的圖書信息記錄。參數(shù)OriBookN

14、o表示要修改的圖書編號(hào)UpdateStoreNum圖書入庫時(shí)，更改指定圖書的基本庫存數(shù)量。參數(shù)OriBookNo表示要修改的圖書編號(hào)，addNum表示入庫的圖書數(shù)量UpdateTotalNum圖書盤點(diǎn)時(shí)，更改指定圖書的庫存數(shù)量。參數(shù)OriBookNo表示要修改的圖書編號(hào)，CountNum表示入庫的圖書數(shù)量添加類模塊StoreIn類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量HaveBook判斷入庫記錄中是否包含指定的圖書信息。參數(shù)TmpBookNo表示指定的圖書編號(hào)GetInfo讀取指定的入庫記錄。參數(shù)TmpStoreId表示要讀取的入庫記錄編號(hào)Insert插入新的入庫信息記錄添加類模塊Bo

15、ok類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量Delete刪除指定的庫存圖書記錄。參數(shù)TmpNo表示要?jiǎng)h除的圖書編號(hào)GetNum讀取指定圖書的庫存數(shù)量。參數(shù)TmpNo表示圖書編號(hào)In_DB判斷指定的圖書是否已經(jīng)在庫存中。參數(shù)TmpNo表示圖書編號(hào)Insert插入新的庫存圖書記錄添加類模塊 Cards類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量Delete刪除指定的借閱證記錄。參數(shù)TmpNo表示要?jiǎng)h除的借閱證編號(hào)GetFlag讀取指定借閱證的掛失標(biāo)記。參數(shù)TmpNo表示指定的借閱證編號(hào)GetInfo讀取指定的借閱證記錄。參數(shù)TmpNo表示要讀取的借閱證編號(hào)Insert插入新的借閱證記錄

16、Update修改指定的借閱證記錄。參數(shù)TmpNo表示要修改的借閱證編號(hào)UpdateFlag更改借閱證的掛失狀態(tài)。參數(shù)TmpNo表示要修改的借閱證編號(hào)，參數(shù)FlagNum表示掛失狀態(tài)添加類模塊Borrow類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量Delete刪除指定的借閱記錄。參數(shù)TmpId表示要?jiǎng)h除的借閱編號(hào)GetInfo讀取指定的借閱記錄。參數(shù)TmpId表示要讀取的借閱編號(hào)GetNewId生成新記錄的借閱信息編號(hào)Insert插入新的借閱記錄Update修改指定的借閱記錄。參數(shù)TmpId表示要?jiǎng)h除的借閱編號(hào)UpdateFlag更新借閱標(biāo)志。0表示借閱，1表示續(xù)借，2表示歸還，3表示掛失U

17、pdateLost更新圖書掛失罰款記錄及日期UpdateReturn更新圖書歸還日期添加類模塊Users類的成員函數(shù)函數(shù)名具體說明Init初始化成員變量Delete刪除指定的用戶記錄。參數(shù)TmpUser表示要?jiǎng)h除的用戶名GetInfo讀取指定的記錄。參數(shù)TmpUser表示要讀取數(shù)據(jù)的用戶名In_DB判斷指定的用戶名是否已經(jīng)在數(shù)據(jù)庫中。參數(shù)TmpUsers表示用戶名Insert插入新的用戶記錄Update修改指定的用戶記錄。參數(shù)TmpUser表示要修改的用戶名12.3 系統(tǒng)主界面和登錄模塊設(shè)計(jì)設(shè)計(jì)主界面 設(shè)計(jì)登錄模塊主界面主界面窗體的屬性窗體屬性設(shè)置值具體說明名稱FrmMain設(shè)置窗體名稱Bor

18、derStyle1 Fixed Single設(shè)置窗體的邊框?qū)傩訡aption圖書借閱管理系統(tǒng)窗體的標(biāo)題條文本MaxButtonTrue取消最大化按鈕MinButtonTrue激活最小化按鈕PictureImgMain.jpg設(shè)置窗體背景StartUpPosition2 屏幕中心設(shè)置窗體彈出時(shí)，位置在屏幕中心登錄窗體12.4 圖書分類管理模塊設(shè)計(jì)使用TreeView控件管理圖書分類的方法設(shè)計(jì)圖書分類信息編輯窗體設(shè)計(jì)圖書分類信息管理窗體設(shè)計(jì)圖書分類選擇窗體添加控件 設(shè)計(jì)圖書分類信息編輯窗體設(shè)計(jì)圖書分類信息管理窗體 設(shè)計(jì)圖書分類選擇窗體窗體名為FrmBookTypeSel12.5 圖書信息管理模塊設(shè)計(jì)設(shè)計(jì)圖書信息編輯窗體設(shè)計(jì)圖書信息管理窗體設(shè)計(jì)圖書選擇窗體設(shè)計(jì)圖書信息編輯窗體圖書信息編輯窗體可以用來添加和修改圖書的根本信息，窗體名稱為FrmBookInfoEdit.設(shè)計(jì)圖書信息管理窗體圖書根本信息管理窗體的名稱為FrmBookInfo。設(shè)計(jì)圖書選擇窗體在圖書借閱時(shí)，需要選擇圖書，選擇圖書窗體的名稱為FrmBookSel。12.6 圖書庫存管理模塊設(shè)計(jì)設(shè)計(jì)圖書庫存編輯模塊設(shè)計(jì)圖書庫存管理模塊設(shè)計(jì)庫存盤點(diǎn)編輯模塊設(shè)計(jì)庫存盤點(diǎn)管理模塊設(shè)計(jì)圖書庫存編輯模塊創(chuàng)立一個(gè)新窗體，窗