vf課程設計--圖書管理系統(tǒng)

1、<p><b>　　xx圖書管理系統(tǒng)</b></p><p><b>　　引言</b></p><p><b>　　背景介紹</b></p><p>　　隨著計算機的不斷發(fā)展，人們對于計算機的應用不再是最初的簡單的文字處理和科學計算，現(xiàn)在，利用計算力來進行管理也成了日常需要。</p&g

2、t;<p>　　在學校，一直以來，人們都是用傳統(tǒng)的方式來管理圖書、期刊、論文、以及報紙。這種管理方式存在很大的效率低下、保密性差的缺點。并且，隨著時間的積累，圖書越來越多，查找維護或者更新起來非常麻煩。手工管理顯然已經(jīng)不能滿足以上需求，應該使用現(xiàn)代化的手段來提提高管理和服務的水平。圖書管理系統(tǒng)就是一個為輔者提供充足的信息和快捷的查詢手段的一種工具。</p><p><b>　　2、實現(xiàn)目標

3、</b></p><p>　　管理員可以通過圖書管理系統(tǒng)查詢某位讀者、某種圖書的借閱情況；還可以對當前圖書借閱進行一些統(tǒng)計，給出統(tǒng)計表格，方便匯總，以便全面掌握圖書的流通情況。讀者可以通過圖書信息管理系統(tǒng)查詢圖書館新進書的情況等。</p><p><b>　　二、需求分析</b></p><p><b>　　功能需求<

4、;/b></p><p>　　根據(jù)上述目標，我們可以確定系統(tǒng)有如下功能：</p><p>　　系統(tǒng)登錄：系統(tǒng)的使用人員只有在輸入了正確的證件號和密碼后才可以進入該系統(tǒng)，只知道證件號的人員，不知道密碼，也不能進入。這主要是為了防止信息被非法盜用。</p><p>　　權限設置：不同的登入人員具有不同的權限，訪問的系統(tǒng)資源是不一樣的。在這主要是防止權限越位的現(xiàn)象。

5、</p><p>　　書目查詢管理：對書目的查詢進行管理，主要包括對圖書信息進行按書名查詢、按著者查詢以及按出版社信息查詢等進行查詢。</p><p>　　讀者查詢管理：對讀者信息查詢進行管理，主要包括：讀者信息查詢、書刊借閱查詢、以及書刊借閱及時查詢等。讀者信息查詢應包括按證件號查詢以及按姓名查詢。對于讀者的信息，圖書管理者也可以進行查詢。讀者信息主要包括：證件號、讀者類型、姓名、出生日

6、期、性別、文化程度、工作單位、職位、辦證日期、違章狀態(tài)、失效日期、累計借書、欠款狀態(tài)、電話、Email、地址以及郵編字段。</p><p>　　信息公布管理：對一些公有的信息進行管理、包括：超期罰款、超期催款、預約到書等。這些信息對讀者可見。</p><p>　　系統(tǒng)維護：對系統(tǒng)數(shù)據(jù)進行維護。主要包括：修改密碼、以及添加人員等。</p><p>　　退出系統(tǒng)：離開圖

7、書管理系統(tǒng)。</p><p><b>　　性能需求</b></p><p>　　系統(tǒng)運行對運行環(huán)境的一些要求：</p><p><b>　　1）硬件環(huán)境 </b></p><p>　　處理器：80486/50MHz及以上處理器</p><p><b>　　內(nèi)存：不低

8、于16M</b></p><p><b>　　硬盤空間：100M</b></p><p><b>　　2）軟件環(huán)境</b></p><p>　　操作系統(tǒng)：Windows 9x、2000或XP</p><p>　　數(shù)據(jù)庫：Visual FoxPro</p><p>

9、　　開發(fā)平臺：Visual FoxPro</p><p><b>　　三、總體設計</b></p><p>　　1、系統(tǒng)總體結構如圖所示：</p><p><b>　　2、數(shù)據(jù)庫結構設計</b></p><p>　　按照系統(tǒng)不同的功能模塊，需要不同的表來存儲信息，數(shù)據(jù)庫設計如下：</p>

10、<p>　　（1）讀者信息表結構：</p><p><b>　?。?）借閱表結構：</b></p><p>　?。?）館藏信息表結構：</p><p><b>　?。?）圖書表結構：</b></p><p><b>　　（5）預約表結構：</b></p>

11、;<p>　　（6）人員配置表結構：</p><p><b>　　詳細設計</b></p><p><b>　　登陸界面</b></p><p>　　登陸界面的load事件代碼如下所示：</p><p>　　set talk off</p><p>　　set

12、safety off</p><p><b>　　close all</b></p><p>　　open database c:\vfp\圖書管理xx.dbc exclu</p><p><b>　　selec A</b></p><p>　　use c:\vfp\人員配置表xx.dbf<

13、/p><p>　　caozuoyuan=''</p><p>　　return caozuoyuan</p><p><b>　　close all</b></p><p>　　unload事件代碼如下：</p><p>　　caouoyuan=''</p>

14、<p>　　return caozuoyuan</p><p><b>　　close all</b></p><p>　　確認按鈕的click事件代碼如下：</p><p>　　PRIVATE zj,mm,st</p><p>　　st='密碼不正確，請重新輸入!'</p>

15、<p>　　zj=alltrim(thisform.no.value)</p><p>　　mm=alltrim(thisform.password1.value)</p><p>　　locate for zj==alltrim(人員配置表xx.證件號)</p><p>　　if found()and alltrim(人員配置表xx.密碼)==mm<

16、;/p><p>　　caozuoyuan=alltrim(人員配置表xx.證件號)</p><p>　　thisform.visible=.f.</p><p>　　do zhumenu.mpr</p><p><b>　　else</b></p><p>　　wait window st timeo

17、ut 2</p><p>　　thisform.password1.value=''</p><p>　　thisform.password1.setfocus</p><p><b>　　endif</b></p><p>　　退出按鈕的click事件代碼如下：</p><p>

18、　　tuichu=messagebox('親，您確定要退出嗎？',4+32+0,'圖書管理系統(tǒng)xx')</p><p>　　if tuichu=6</p><p>　　caozuoyuan=''</p><p>　　thisform.release</p><p><b>　　endi

19、f</b></p><p>　　clear events</p><p><b>　　主界面模塊</b></p><p><b>　　書目查詢模塊：</b></p><p>　　對書目的查詢主要包括對圖書信息進行按書名查詢、按著者姓名查詢、以及按出版信息進行查詢等，查詢出來的圖書信息應該

20、包括是否在館信息、館藏地信息以及是否可借的信息等</p><p>　　按題名查詢的Init事件代碼如下：</p><p><b>　　public tm</b></p><p>　　use c:\vfp\圖書表xx</p><p>　　thisform.refresh</p><p><b&

21、gt;　　go top</b></p><p>　　thisform.combo1.value=圖書表xx.題名</p><p>　　查詢按鈕的代碼如下：</p><p>　　tm=alltrim(thisform.combo1.value)</p><p>　　thisform.release</p><p&

22、gt;　　do form c:\vfp\書目查詢結果xx</p><p>　　退出按鈕的代碼如下：</p><p>　　thisform.release</p><p>　　按出版信息查詢的界面如下：</p><p>　　按出版社查詢的Init事件代碼如下：</p><p><b>　　public cb&l

23、t;/b></p><p>　　use c:\vfp\圖書表xx</p><p>　　thisform.refresh</p><p><b>　　go top</b></p><p>　　thisform.combo1.value=圖書表xx.出版信息</p><p>　　查詢按鈕的代碼如

24、下：</p><p>　　cb=alltrim(thisform.combo1.value)</p><p>　　thisform.release</p><p>　　do form c:\vfp\書目查詢結果xx</p><p>　　退出按鈕的代碼如下：</p><p>　　thisform.release</

25、p><p>　　按著者查詢的界面如下：</p><p>　　按著者查詢的Init事件代碼如下：</p><p><b>　　public zz</b></p><p>　　use c:\vfp\圖書表xx</p><p>　　thisform.refresh</p><p>&

26、lt;b>　　go top</b></p><p>　　thisform.combo1.value=圖書表xx.著者</p><p>　　查詢按鈕的代碼如下：</p><p>　　zz=alltrim(thisform.combo1.value)</p><p>　　thisform.release</p>&

27、lt;p>　　do form c:\vfp\書目查詢結果xx</p><p>　　退出按鈕的代碼如下：</p><p>　　thisform.release</p><p><b>　　讀者查詢模塊：</b></p><p>　　對讀者信息的查詢主要包括；讀者信息查詢、書刊借閱查詢以及借閱歷史查詢等。讀者查詢包括按

28、證件號查詢、以及按姓名查詢。書刊借閱查詢包括圖書的借閱時間、到期時間的記錄，還包括違章狀態(tài)以及欠款狀態(tài)等。</p><p>　　讀者信息的界面如下：</p><p>　　讀者信息查詢結果的Init事件如下：</p><p>　　THISFORM.REFRESH</p><p>　　LOCATE FOR cj=ALLTRIM(讀者信息xx.證件

29、號)</p><p>　　THISFORM.txt證件號.enabled=.f.</p><p>　　THISFORM.txt姓名.enabled=.f.</p><p>　　THISFORM.txt性別.enabled=.f.</p><p>　　THISFORM.txt職位.enabled=.f.</p><p>

30、　　THISFORM.txt出生日期.enabled=.f.</p><p>　　THISFORM.txt讀者類型.enabled=.f.</p><p>　　THISFORM.txt文化程度.enabled=.f.</p><p>　　THISFORM.txt工作單位.enabled=.f.</p><p>　　THISFORM.txt辦證

31、日期.enabled=.f.</p><p>　　THISFORM.txt失效日期.enabled=.f.</p><p>　　THISFORM.chk違章狀態(tài).enabled=.f.</p><p>　　THISFORM.chk欠款狀態(tài).enabled=.f.</p><p>　　THISFORM.txt累計借書.enabled=.f.&l

32、t;/p><p>　　THISFORM.txt當年借書.enabled=.f.</p><p>　　THISFORM.txt電話.enabled=.f.</p><p>　　THISFORM.txt地址.enabled=.f.</p><p>　　THISFORM.txt郵編.enabled=.f.</p><p>　　T

33、HISFORM.txtEmail.enabled=.f.</p><p>　　第一個按鈕的代碼如下：</p><p><b>　　GO TOP</b></p><p>　　THISFORM.ENABLED=.T.</p><p>　　THISFORM.COMMAND2.ENABLED=.F.</p><

34、;p>　　THISFORM.COMMAND3.ENABLED=.T.</p><p>　　THISFORM.COMMAND4.ENABLED=.T.</p><p>　　THISFORM.COMMAND5.ENABLED=.T.</p><p>　　THISFORM.REFRESH</p><p>　　上一個按鈕的代碼如下：</p

35、><p><b>　　SKIP -1</b></p><p>　　THISFORM.COMMAND1.ENABLED=.T.</p><p>　　THISFORM.COMMAND3.ENABLED=.T.</p><p>　　THISFORM.COMMAND4.ENABLED=.T.</p><p>

36、　　THISFORM.COMMAND5.ENABLED=.T.</p><p>　　THISFORM.REFRESH</p><p><b>　　IF BOF( )</b></p><p>　　Messagebox("已經(jīng)到了表頭！",0=48,"提示")</p><p>　　TH

37、IS.ENABLED=.F.</p><p><b>　　ELSE</b></p><p>　　THIS.ENABLED=.F.</p><p><b>　　ENDIF</b></p><p>　　THISFORM.REFRESH</p><p>　　下一個按鈕的代碼如下：&

38、lt;/p><p><b>　　SKIP</b></p><p>　　THISFORM.COMMAND1.ENABLED=.T.</p><p><b>　　IF EOF( )</b></p><p>　　THIS.ENABLED=.F.</p><p>　　Messagebox

39、("已經(jīng)到了表尾！",0+48,"提示")</p><p>　　THISFORM.COMMAND1.ENABLED=.T.</p><p>　　THISFORM.COMMAND2.ENABLED=.T.</p><p>　　THISFORM.COMMAND3.ENABLED=.F.</p><p>　　

40、THISFORM.COMMAND5.ENABLED=.T.</p><p>　　THISFORM.REFRESH</p><p><b>　　ELSE</b></p><p>　　THIS.ENABLED=.T.</p><p>　　THISFORM.COMMAND1.ENABLED=.T.</p><

41、;p>　　THISFORM.COMMAND2.ENABLED=.T.</p><p>　　THISFORM.COMMAND3.ENABLED=.T.</p><p>　　THISFORM.COMMAND5.ENABLED=.T.</p><p><b>　　ENDIF</b></p><p>　　THISFORM.

42、REFRESH</p><p>　　最后一個按鈕的代碼如下：</p><p><b>　　GO BOTTOM</b></p><p>　　THIS.ENABLED=.T.</p><p>　　THISFORM.COMMAND1.ENABLED=.T.</p><p>　　THISFORM.COMM

43、AND2.ENABLED=.T.</p><p>　　THISFORM.COMMAND3.ENABLED=.F.</p><p>　　THISFORM.COMMAND5.ENABLED=.T.</p><p>　　THISFORM.REFRESH</p><p>　　退出按鈕的代碼如下：</p><p>　　thisf

44、orm.refresh</p><p>　　thisform.release</p><p><b>　　密碼修改模塊：</b></p><p>　　該模塊實現(xiàn)對密碼的修改功能。為了系統(tǒng)的安全，密碼使用一段時間之后就需要進行更換。</p><p>　　密碼修改的數(shù)據(jù)環(huán)境為人員配置表xx</p><p&

45、gt;　　確定按鈕的代碼如下：</p><p><b>　　public X</b></p><p><b>　　select a</b></p><p>　　use c:\vfp\人員配置表xx</p><p>　　x=alltrim(thisform.txt密碼.value)</p>

46、<p>　　replace 人員配置表xx.密碼 with alltrim(thisform.password2.value)</p><p>　　messagebox("親，你的密碼已修改了",0+48,"提示")</p><p>　　thisform.refresh</p><p>　　取消按鈕的代碼如下：&

47、lt;/p><p>　　replace 人員配置表xx.密碼 with x</p><p>　　messagebox("放棄密碼修改",0+48,"提示")</p><p>　　thisform.refresh</p><p>　　退出按鈕的代碼如下：</p><p>　　thisf