圖書管理系統(tǒng)實驗報告（精）

1、Vfp課程設(shè)計報告系統(tǒng)名稱：圖書管理系統(tǒng)姓名：華丹學號：指導教師：朱鵬合作組員：陳丹雅目錄1、系統(tǒng)概述1.1 所選課題 開發(fā)工具1.3 設(shè)計目的2、需求分析及業(yè)務(wù)流程說明2.1 需求分析2.2 業(yè)務(wù)流程圖3、小組成員及分工3.1 小組成員3.2 具體分工4、功能模塊說明5、數(shù)據(jù)庫結(jié)構(gòu)5.1 所建數(shù)據(jù)庫表5.2 表結(jié)構(gòu)介紹5.3 所建表單6、心得體會1、系統(tǒng)概述 選題：圖書管理系統(tǒng) 開發(fā)工具：visual foxpro 開發(fā)目的：使圖書管理更為方便快捷，讓同學們在查詢書籍時更方便，讓管理者能夠更快的查詢信息，包括查詢同學信息，借閱信息與書籍錄入。2、需求分析及業(yè)務(wù)流程說明需求分析：圖書管理系統(tǒng)主

2、要是對館內(nèi)書籍的基本信息及借閱學生的基本資料進行管理，可以進行查詢、新增、刪除等操作，管理系統(tǒng)的另外一個重要功能便是可以進行借閱操作，并查看借閱狀態(tài)，預覽逾期未歸還名冊。系統(tǒng)登錄流程說明：書籍資料書記借閱學生資料查詢書籍添加/刪除書籍借閱狀態(tài)查詢續(xù)借添加/刪除讀者查詢讀者3.小組成員及分工小組成員：陳丹雅、華丹分工：陳丹雅主要負責了系統(tǒng)主要表單的實施，包括建立編號查詢（findb）、讀者查詢（finds）、題名查詢、借閱狀態(tài)、添加讀者、添加書籍等表單以及系統(tǒng)登錄界面表單和菜單1的建立，并建立了逾期未歸還名冊報表。 我負責數(shù)據(jù)庫表結(jié)構(gòu)及其關(guān)系的設(shè)計，建立管理人員、借閱記錄、書籍信息、學生資料表，

3、并建立書刊借閱表單和圖書查詢結(jié)果、學生查詢結(jié)果表單，最后對程序進行連編。 最后共同查找和改正了設(shè)計過程中的一些錯誤以及完善程序中的一些細節(jié)。4、功能模塊說明系統(tǒng)登錄模塊：點擊程序圖標后出現(xiàn)登錄界面。管理員可以輸入證件號以及密碼后點擊“登錄”，進入到圖書管理系統(tǒng)的主界面并執(zhí)行相應(yīng)菜單操作。學生數(shù)據(jù)模塊：可以通過證件號查尋學生的基本數(shù)據(jù)，也可以辦理圖書借閱，查看借閱狀態(tài)及預覽逾期未歸還名冊等等。借閱操作模塊：可以查閱借還書學生的基本資料以及借閱情況，也可以辦理續(xù)借。書籍查詢模塊：讀者可以通過書籍題目、書籍編號來查詢所要找的書籍以及相關(guān)信息。系統(tǒng)退出模塊：點擊主界面上的“退出”命令按鈕，彈出“您確定

4、要退出圖書管理系統(tǒng)嗎？”對話框，單擊“是”按鈕，則退出圖書管理系統(tǒng)，單擊“否”按鈕，則繼續(xù)留在當前頁面。4、數(shù)據(jù)庫結(jié)構(gòu)所建數(shù)據(jù)庫表 數(shù)據(jù)庫表結(jié)構(gòu)1、管理人員表2、借閱記錄表3、書籍資料表4、學生資料表所建表單1、findb表單，功能：根據(jù)編號查找書籍（code）界面：表單的load代碼為Select 書籍資料use c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)書籍資料.dbf exclusive確定按鈕click事件代碼為 CJ=ALLTRIM(THISFORM bo1.value)do form c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)學生查詢結(jié)果(此路徑為自己電

5、腦上設(shè)置的)取消的click 事件代碼為此表單數(shù)據(jù)環(huán)境為2、finds表單 功能：根據(jù)學號查詢學生界面此表單的load 代碼為close alluse c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)學生資料表.dbf exclusive確定按鈕的click事件代碼為CJ=ALLTRIM(THISFORM bo1.value)do form c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)學生查詢結(jié)果3、題名查詢表單 功能：按題名查詢書籍界面此表單load代碼為Select 書籍資料use c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)書籍資料.dbf exclusi

6、ve查詢按鈕click代碼為tm=ALLTRIM(THISFORM bo1.value)DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)圖書查詢結(jié)果其余同findb表單4、添加讀者表單 功能：向?qū)W生資料表中添加一條記錄界面 此表單load代碼為close alluse c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)學生資料表.dbf exclusive確定按鈕的click事件代碼public g,h,i,j,k,l,m,n,o,pg=alltrim(thisform.txt1.value)h=alltrim(thisform.txt2.value)i=allt

7、rim(thisform.txt3.value)j=Val(alltrim(thisform.txt4.value)k=alltrim(thisform.txt5.value)l=Val(alltrim(thisform.txt6.value)m=alltrim(thisform.txt7.value)n=alltrim(thisform.txt8.value)o=alltrim(thisform.txt9.value)p=empty(thisform.check1.value)insert into 學生資料表(stuid,name,sex,grade,depno,class,tel,add

8、r,password,是否超期);values (g,h,i,j,k,l,m,n,o,p)messagebox(確定要輸入這條記錄嗎？,48,提示)刪除按鈕的click事件代碼為IF MESSAGEBOX(你確定刪除該記錄嗎？,4+64+256,提示)=6DELETEPACKRELEASE THISFORMENDIF5、添加書籍表單 功能：向書籍資料表中添加一條記錄，包括code,bookname,writer,publisher,buydate,isloan,number,是否借出這幾個字段 界面 此表單的load事件代碼為Select 書籍資料use c:usersuserdesktop數(shù)

9、據(jù)庫管理系統(tǒng)(1)書籍資料.dbf exclusive添加按鈕的click事件代碼為public g,h,i,j,k,l,mg=alltrim(thisform.txt1.value)h=alltrim(thisform.txt2.value)i=alltrim(thisform.txt3.value)j=alltrim(thisform.txt4.value)k=ctod(alltrim(thisform.txt5.value)l=val(alltrim(thisform.txt6.value)m=empty(thisform.check1.value)insert into 書籍資料(co

10、de,bookname,writer,publisher,buydate,number,isloan);values (g,h,i,j,k,l,m)messagebox(確定要輸入這條記錄嗎？,48,提示)刪除按鈕的click事件代碼為IF MESSAGEBOX(你確定刪除該記錄嗎？,4+64+256,提示)=6DELETEPACKRELEASE THISFORMENDIF6、圖書查詢結(jié)果表單 功能：在findb和題名查詢表單運行后顯示出相應(yīng)結(jié)果（在這兩個表單后附加使用）界面上一條的click事件代碼為skip -1 if .not. bof() thisform.refresh else m

11、essagebox(已經(jīng)是第一條紀錄！,0,記錄情況) endif下一條的click事件代碼為skip 1if .not. eof() thisform.refresh else messagebox(已經(jīng)是最后一條紀錄！,0,記錄情況) endif7、登陸界面表單界面8、系統(tǒng)登錄表單界面登錄的click事件代碼PRIVATE Zj,mm,ST &定義私有變量zj(輸入的證件號)，mm(輸入的密碼)，ST(提示信息)ST=密碼不正確，請重新輸入！ Zj=alltrim(THISFORM.text1.value)mm=alltrim(THISFORM.text2.value)LOCATE FOR

12、 Zj=alltrim(管理人員.登錄名)IF FOUND() AND alltrim(管理人員.密碼)=mmcaozuoyuan=alltrim(管理人員.登錄名)THISFORM.Visible=.F. DO c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)菜單ELSEWAIT WINDOW ST TIMEOUT 2 thisform.password1.value= endif退出的click事件代碼tuichu=messagebox(您確定要退出圖書管理系統(tǒng)嗎?,4+32+0,圖書管理系統(tǒng))if tuichu=6caozuoyuan=endifclear events9、學生查

13、詢結(jié)果表單 功能：運行finds后顯示界面（作為這個表單附加使用）上一條的click事件代碼為skip -1 if .not. bof() thisform.refresh else messagebox(已經(jīng)是第一條紀錄！,0,記錄情況) endif下一條的click事件代碼為skip 1if .not. eof() thisform.refresh else messagebox(已經(jīng)是最后一條紀錄！,0,記錄情況) endif10、書刊借閱表單 功能：續(xù)借書籍界面其中表grd借閱記錄的init事件代碼為WITH This.column6 .addobject(Check1,CheckBo

14、x) .currentcontrol=Check1 .sparse=.f.Check1.Caption=.Check1.visible=.t.Text1.visible=.f.ENDWITH續(xù)借按鈕的click事件代碼為借閱記錄.column6.check1.value=.T. THENREPLACE 借閱記錄.應(yīng)還日期 with 借閱記錄.應(yīng)還日期+35messagebox(已續(xù)借成功,0,提示)endif11、借閱狀態(tài)表單 功能：查看借閱狀態(tài)界面建立報表 逾期未歸還名冊 建立主程序 程序1代碼為SET DATE TO YMDSET DECIMALS TO 2SET RESOURCE ONS

15、ET FDOW TO 1SET FWEEK TO 1SET MARK TO .SET SEPARATOR TO .do form c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)登陸界面.scxREAD EVENTSSET SYSMENU TO DEFAULTSET SYSMENU ONSET NOTIFY ONSET EXCLUSIVE OFFSET SAFETY ONMODIFY WINDOWS SCREEN建立菜單 菜單1書目查詢有子菜單 界面按題名查詢命令為DO form c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)題名查詢按編號查詢命令為do form c:use

16、rsuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)findb其他均無子菜單借閱狀態(tài)的命令為DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)借閱狀態(tài)書刊借閱的命令為DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)書刊借閱讀者查詢讀者信息的命令為DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)finds讀者添加的命令為DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)添加讀者書籍添加的命令為DO FORM c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)添加書籍退出系統(tǒng)是一個過程，代碼為set pro

17、cedure to c:usersuserdesktop數(shù)據(jù)庫管理系統(tǒng)(1)菜單close databasesclose allclear eventsquit6、心得體會由于對vfp系統(tǒng)的各種不了解，我們在制作過程中還是遇到了相當多的難題。就建立幾個功能為查詢的表單（finds, findb ,題名查詢）而言，問題也不是非常大，但是到建立添加表單比如說添加書籍時就遇到了不小對的問題，首先是代碼格式，目的在于添加一條記錄到表中，可以用append 或者insert into，經(jīng)過我?guī)状卧囼?，發(fā)現(xiàn)還是insert 語句好用一點，于是就采用了這種方式。第二個是操作類型或者操作符不匹配的問題。很慚愧的我不知道這是什么意思，只知道不能運行并試了很多方法都無