小型圖書(shū)管理系統(tǒng)畢業(yè)設(shè)計(jì)

上傳人：奔*** IP屬地：河北更新時(shí)間：2024-03-01 格式：doc 頁(yè)數(shù)：47 大小：846.50KB 人氣指數(shù)：12 舉報(bào) 版權(quán)申訴

小型圖書(shū)管理系統(tǒng)畢業(yè)設(shè)計(jì)_第1頁(yè)

已閱讀1頁(yè)，還剩46頁(yè)未讀，繼續(xù)免費(fèi)閱讀

版權(quán)說(shuō)明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

1、　　前言　　為了提高圖書(shū)管理的工作效率，及時(shí)有效地了解各種信息，特開(kāi)發(fā)此“小型圖書(shū)管理系統(tǒng)”。該系統(tǒng)本著簡(jiǎn)單、實(shí)用、方便的宗旨，為管理人員、讀者提供快捷有效的軟件平臺(tái)，從而，提高圖書(shū)管理工作效率，節(jié)省大量人力和時(shí)間，提高了圖書(shū)館的信息化程度。　　本系統(tǒng)具有易學(xué)、易用的特點(diǎn)，用戶可以很快掌握其操作方法

2、，方便、快捷完成各項(xiàng)工作，正確無(wú)誤地進(jìn)行各種信息的處理工作。　　本系統(tǒng)是由本人在楊成、郗亞輝老師的指導(dǎo)下開(kāi)發(fā)完成的。為了這次畢業(yè)設(shè)計(jì)本人做了大量的準(zhǔn)備和努力，但由于本人知識(shí)和能力有限，系統(tǒng)難免存在許多不完善的地方甚至漏洞，敬請(qǐng)各位老師不吝提出寶貴建議，本人將不勝感激!　　一、系統(tǒng)分析<p

3、>　　1.1系統(tǒng)功能分析　　系統(tǒng)開(kāi)發(fā)的總體任務(wù)是實(shí)現(xiàn)各種信息的系統(tǒng)化、歸范化。圖書(shū)管理是圖書(shū)館管理工作的重要組成部分，為了提高圖書(shū)管理工作的效率，利用計(jì)算機(jī)和數(shù)據(jù)庫(kù)技術(shù)設(shè)計(jì)開(kāi)發(fā)了圖書(shū)管理系統(tǒng)是圖書(shū)管理工作的迫切需要。　　本系統(tǒng)的主要功能如下：　　有關(guān)讀者基本信息的輸入，

4、包括讀者編號(hào)、讀者類別、讀者姓名、讀者性別、工　　作單位、家庭住址、電話號(hào)碼、電子郵件、辦證日期、備注等。　　讀者基本信息的查詢、修改，包括讀者編號(hào)、讀者姓名、讀者類別、讀者性別、工　　作單位、家庭住址、電話號(hào)碼、電子郵件、辦證日期、備注等。　　圖書(shū)信息的輸入，包括書(shū)籍編

5、號(hào)、書(shū)籍名稱、書(shū)籍類別、作者姓名、出版社、出　　日期、書(shū)籍價(jià)格、書(shū)籍類別、登記日期、備注信息等。　　圖書(shū)信息的查詢、修改，包括書(shū)籍編號(hào)、書(shū)籍名稱、書(shū)籍類別、作者姓名、出版社　　名稱、出版日期、書(shū)籍價(jià)格、書(shū)籍類別、登記日期、備注信息等。　　借書(shū)信息的輸入，包括借書(shū)信息編號(hào)、

6、讀者編號(hào)、讀者姓名、書(shū)籍編號(hào)、書(shū)籍名稱、　　借書(shū)日期、備注等。　　借書(shū)信息的查詢、修改，包括借書(shū)信息編號(hào)、讀者編號(hào)、讀者姓名、書(shū)籍編號(hào)、書(shū)　　籍名稱、借書(shū)日期、備注等。　　還書(shū)信息的輸入、查詢和修改，包括還書(shū)信息編號(hào)、讀者編號(hào)、讀者姓

7、名、書(shū)籍編　　號(hào)、書(shū)籍名稱等。　　還書(shū)信息的查詢和修改，包括還書(shū)信息編號(hào)、讀者編號(hào)、讀者姓名、書(shū)籍編　　號(hào)、書(shū)籍名稱等。　　二、系統(tǒng)設(shè)計(jì)

8、　　2.1總體設(shè)計(jì)　　結(jié)構(gòu)結(jié)構(gòu)設(shè)計(jì)主要包括運(yùn)行模式選擇、操作系統(tǒng)選擇、數(shù)據(jù)庫(kù)管理系統(tǒng)選擇、系統(tǒng)功能結(jié)構(gòu)設(shè)計(jì)。　　選用單機(jī)模式，有一臺(tái)奔騰以上的微型計(jì)算機(jī)，操作系統(tǒng)選擇windows 98/2000，開(kāi)發(fā)工具選擇powerbuilder8.0,數(shù)據(jù)庫(kù)管理系統(tǒng)（DBMS）選擇powerbuilder8

9、.0自帶Sybase SQL anywhere 7.0。　　2.2詳細(xì)設(shè)計(jì)　　詳細(xì)設(shè)計(jì)主要包括用戶界面設(shè)計(jì)和數(shù)據(jù)庫(kù)設(shè)計(jì)。　　用戶界面設(shè)計(jì)　　用戶運(yùn)行該系統(tǒng)時(shí)，首先出現(xiàn)一個(gè)登錄窗口，提示輸入用戶名

10、或編號(hào)、密碼，輸入正確進(jìn)入系統(tǒng)主窗口，如圖：（2-1）　　圖2-1　　主窗口的上部是菜單和工具欄，系統(tǒng)中的受所有功能通過(guò)選擇菜單項(xiàng)或單擊工具欄中的圖標(biāo)即可。通過(guò)選擇各個(gè)菜單項(xiàng)或工具欄圖標(biāo)，分別進(jìn)入各個(gè)具體界面，實(shí)現(xiàn)不同的操作功能。　　數(shù)據(jù)庫(kù)設(shè)計(jì)</b&

11、gt;　　數(shù)據(jù)庫(kù)需求分析　　系統(tǒng)的數(shù)據(jù)流程圖如下：　　針對(duì)上述圖書(shū)管理工作過(guò)程的內(nèi)容和數(shù)據(jù)流程圖分析，設(shè)計(jì)如下所述的數(shù)據(jù)項(xiàng)和數(shù)據(jù)結(jié)構(gòu)。　　讀者信息，包括的數(shù)據(jù)項(xiàng)有：讀者編號(hào)、讀者類別、讀者姓名、讀者性別、工&l

12、t;p>　　作單位、家庭住址、電話號(hào)碼、電子郵件、辦證日期、備注等。　　圖書(shū)信息，包括數(shù)據(jù)項(xiàng)有：書(shū)籍編號(hào)、書(shū)籍名稱、書(shū)籍類別、作者姓名、出版社、　　出版日期、書(shū)籍價(jià)格、書(shū)籍類別、登記日期、備注信息等。　　借書(shū)信息，包括數(shù)據(jù)項(xiàng)有：借書(shū)信息編號(hào)、讀者編號(hào)、讀者姓名、書(shū)籍編號(hào)、書(shū)<p

13、>　　籍名稱、借書(shū)日期、備注等。　　用戶表信息，包括的數(shù)據(jù)項(xiàng)有：讀者編號(hào)、讀者姓名、權(quán)限。　　圖書(shū)類別信息，包括的數(shù)據(jù)項(xiàng)有：類別編號(hào)、圖書(shū)類別。　　數(shù)據(jù)庫(kù)概念設(shè)計(jì)　　根據(jù)上面設(shè)計(jì)，規(guī)劃出的實(shí)體有：讀者信息實(shí)體、書(shū)籍信息實(shí)體、借閱

14、信息實(shí)體、用戶實(shí)體、讀者信息實(shí)體。E-R圖如圖所示：　　。。。　　。。。　　。。。　?。?E-R圖）

15、　　數(shù)據(jù)庫(kù)邏輯結(jié)構(gòu)設(shè)計(jì)　　圖書(shū)管理系統(tǒng)各個(gè)表設(shè)計(jì)如下：　?。▓D書(shū)信息表）　?。〞?shū)籍類別表）　?。ń栝喰畔⒈恚?lt;/

16、b>　　（讀者信息表）　?。ㄓ脩舯恚?lt;/b>　?。ǜ鱾€(gè)表的主鍵）　　三、系統(tǒng)實(shí)施

17、　　在系統(tǒng)中主要實(shí)現(xiàn)對(duì)圖書(shū)信息、讀者信息、借閱信息以及用戶表中數(shù)據(jù)的增、刪、改、查詢等功能。　　３.１建立應(yīng)用對(duì)象　　設(shè)置SQLCA的屬性以及數(shù)據(jù)庫(kù)的連接參數(shù)　　應(yīng)用對(duì)象OPEN事件腳本如下：　　// Profile guoshush

18、eng　　SQLCA.DBMS = "ODBC"　　SQLCA.AutoCommit = False　　SQLCA.DBParm = "ConnectString='DSN=guoshusheng;UID=dba;PWD=sql'"&

19、lt;p>　　CONNECT;　　//錯(cuò)誤處理　　if sqlca.sqlcode <> 0 then　　MessageBox ("Cannot Connect to Database", sqlca

20、.sqlerrtext)　　return　　end if　　//打開(kāi)啟動(dòng)窗口　　open(w_start)<b

21、>　　idle(10)　　在事件中加入如下腳本：　　disconnect using sqlca;　?。?2登錄界面窗口　　對(duì)于該信統(tǒng)用戶分為三類：系統(tǒng)管理員、數(shù)據(jù)管理員、普通用戶。&

22、lt;p>　　登錄窗口w_login的主要是驗(yàn)證用身份并確定權(quán)限，如圖所示：　　其登錄按鈕代碼如下：　　if sle_1.text = "" then　　//pop a message box　　messagebox("PayAtten

23、tion!","The user name cant be null")　　//sle_1 get the focus　　sle_1.setfocus()　　elseif sle_2.text = "" then　　//p

24、op a message box　　messagebox("PayAttention!","The password cant be null")　　//sle_2 get the focus　　sle_2.setfocus()&l

25、t;b>　　else　　G_INPUT_TIME =G_INPUT_TIME+1　　G_USER = sle_1.text　　G_PWD =sle_2.text　　//取出數(shù)據(jù)庫(kù)用戶口令表格中對(duì)應(yīng)用戶的口令

26、;　　SELECT user_PWD ,purview INTO :CORRECT_PSWD,:G_right FROM USER_info 　　WHERE user_id=:G_USER or username=:G_USER;　　//將數(shù)據(jù)庫(kù)中保存的口令和用戶輸入的口令作比較　　IF G_PWD=CORREC

27、T_PSWD THEN　　//輸入正確，打開(kāi)主窗口　　OPEN(W_MAIN)　　CLOSE(W_LOGIN)　　ELSE　　//不正確，在3次以內(nèi)可重新輸入，超過(guò)3次結(jié)束程序</p&g

28、t;　　IF G_INPUT_TIME >3 THEN　　MESSAGEBOX("警告","輸入用戶口令的次數(shù)太多！")　　CLOSE(W_LOGIN)　　ELSE

29、　MESSAGEBOX("警告","輸入的用戶口令有誤，請(qǐng)重新輸入")　　END IF　　END IF　　end if

30、;　　close(w_start)　　(W_login)　　　　　　　　　3.3啟動(dòng)界面設(shè)計(jì)　　OPEN事件代碼如下：　　prog++　　hpb_1.po

31、sition=prog　　st_2.text=string(prog)+"%"　　if prog=100 then　　timer(0)　　w_start.visible=false<p

32、>　　open(w_login)　　end if　　w_start　?。?４　屏幕保護(hù)界面　　(w_screen)　　3.4 菜單

33、設(shè)計(jì)　　菜單項(xiàng)代碼如下：　　opensheet (w_login_re,w_main,6,layered!)　　opensheet (w_change_password,w_main,6,layered!)　　op

34、ensheet (w_user,w_main,6,layered!)　　close(w_main) 　　opensheet (w_readers,w_main,6,layered!)　　opensheet (w_readers_grid,w_main,6,layered!)

35、;　　opensheet (w_readers_find,w_main,6,layered!)　　opensheet (w_books,w_main,6,layered!)　　opensheet (w_books_grid,w_main,6,layered!)　　opensheet (w_books_find,w

36、_main,6,layered!)　　opensheet (w_borrow,w_main,6,layered!) 　　opensheet (w_return,w_main,6,layered!)　　opensheet (w_borrow_find,w_main,6,layered!)&l

37、t;p>　　opensheet (w_store,w_main,6,layered!)　　opensheet (w_kucun,w_main,6,layered!)　　W_MAIN.ArrangeSheets(CASCADE!)　　W_MAIN.ArrangeSheets(LAYER!)

38、　　close(w_about)　　close(w_books)　　close(w_books_find)　　close(w_books_grid)　　close(w_borrow)　　close(w_bor

39、row_find)　　close(w_change_password)　　close(w_kucun)　　close(w_login)　　close(w_login_re)　　close(w_readers)

40、　　close(w_readers_find)　　close(w_readers_grid)　　close(w_return)　　close(w_user)　　opensheet (w_about,w_main,6,original!)</p&g

41、t;　　重新登錄界面如下：　　確定按鈕代碼如下：　　string correct_pswd　　if sle_1.text = "" then　　//pop

42、 a message box　　messagebox("PayAttention!","The user name cant be null")　　//sle_1 get the focus　　sle_1.setfocus()　　e

43、lseif sle_2.text = "" then　　//pop a message box　　messagebox("PayAttention!","The password cant be null")　　//sle_2 get the focus

44、　　sle_2.setfocus()　　else　　G_INPUT_TIME =G_INPUT_TIME+1　　G_USER = sle_1.text　　G_PWD =sle_2.text&l

45、t;/p>　　//取出數(shù)據(jù)庫(kù)用戶口令表格中對(duì)應(yīng)用戶的口令　　SELECT user_PWD ,purview INTO :CORRECT_PSWD,:G_right FROM USER_info 　　WHERE user_id=:G_USER or username=:G_USER;

46、　//將數(shù)據(jù)庫(kù)中保存的口令和用戶輸入的口令作比較　　IF G_PWD=CORRECT_PSWD THEN　　//輸入正確，打開(kāi)主窗口　　OPEN(W_MAIN)　　//setredraw(false)　　CLOSE(W_LOGI

47、N_re)　　ELSE　　//不正確，在3次以內(nèi)可重新輸入，超過(guò)3次結(jié)束程序　　IF G_INPUT_TIME >3 THEN　　MESSAGEBOX("警告","輸入用戶口令的次數(shù)太多！"

48、;)　　CLOSE(W_LOGIN_re)　　ELSE　　MESSAGEBOX("警告","輸入的用戶口令有誤，請(qǐng)重新輸入")　　END IF</p

49、>　　END IF　　end if　　if G_right<>1 then 　　m_main.m_1.m_13.enabled=false

50、　　end if　　修改用戶信息界面如下：　　確定按鈕代碼如下：　　//輸入次數(shù)加1　　G_INPUT_TIME =G_INPUT_TIME+1<

51、p>　　//判斷兩次輸入的新口令是否一致　　IF SLE_2.TEXT <>SLE_3.TEXT THEN　　IF G_INPUT_TIME >3 THEN　　MESSAGEBOX("警告","輸入的次數(shù)太多！")<p&

52、gt;　　CLOSE(W_CHANGE_PASSWORD)　　ELSE　　MESSAGEBOX("警告","兩次輸入的口令不一致，請(qǐng)重新輸入")　　END IF<p&g

53、t;　　ELSE　　//判斷輸入的原口令是否正確　　IF SLE_1.TEXT <>G_PWD THEN　　IF G_INPUT_TIME >3 THEN　　MESSAGEBOX("警告",&qu

54、ot;輸入的次數(shù)太多！")　　CLOSE(W_CHANGE_PASSWORD)　　ELSE　　MESSAGEBOX("警告","輸入的原口令不正確，請(qǐng)重新輸入")

55、END IF　　ELSE　　//修改數(shù)據(jù)庫(kù)中的該用戶的口令　　UPDATE user_info　　SET user_pwd=:sle_2.text　　WHERE user_

56、id=:G_USER or username=:G_USER;　　MESSAGEBOX("注意","你的口令已經(jīng)修改，請(qǐng)牢記")　　//提交修改，關(guān)閉口令修改窗口　　COMMIT;　　CLOSE

57、(W_CHANGE_PASSWORD)　　END IF　　END IF　　OPEN事件代碼如下：　　//將全局變量-輸入用戶名和口令的次數(shù)賦初值0　　G_

58、INPUT_TIME=0　　//定義變量　　Environment l_env　　int l_ScrWidth,l_ScrHeight　　//關(guān)閉窗口刷新

59、　　setRedraw(false)　　//取得屏幕的高度和寬度　　GetEnvironment(l_env)　　l_ScrWidth=PixelsToUnits(l_env.ScreenWidth,XpixelsToUnits!)　　l_ScrHeight=Pixels

60、ToUnits(l_env.ScreenHeight,YpixelsToUnits!)　　//移動(dòng)窗口到屏幕中間　　Move((l_scrwidth - this.width)/2,(l_scrheight - this.height)/2)　　//打開(kāi)窗口刷新</p&

61、gt;　　setredraw(true)　　用戶管理界面如下：　　添加按鈕代碼如下：　　//insert a row in the end of dw_1　　g_RowNum

62、ber=dw_1.InsertRow(0)　　//dw_1 get the focus　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1.ScrollToRow(G_RowNumber) <

63、p>　　//the first column get the focus　　dw_1.SetColumn(1)　　刪除按鈕代碼如下：　　//得到當(dāng)前記錄　　G_RowNumber=dw_1.

64、getrow()　　//將當(dāng)前記錄中的員工號(hào)取出賦值給全局變量emp_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實(shí)要?jiǎng)h除嗎?

65、",Question!, YesNoCancel!, 3)　　if a=1 then 　　cb_3.triggerevent( Clicked!)　　else 　　dw_1.retrieve()&l

66、t;p>　　end if　　保存按鈕代碼如下：　　if update(dw_1,true,false)=1 then　　//保存修改成功，提交修改　　dw_1.resetupdate()&l

67、t;/p>　　commit;　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!")　　else　　//保存修改失敗，取消所作的修改&l

68、t;p>　　rollback;　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!")　　end if　　cols

69、equery事件如下:　　integer li_rc　　// Accept the last data entered into the datawindow　　dw_1.AcceptText()　　//Check to see if any data has chang

70、ed 　　IF dw_1.ModifiedCount() > 0 THEN　　li_rc = MessageBox("提示", &　　"是否保存所做的修改?", Question!, &　　YesNoCanc

71、el!, 3)　　//User chose to updata and close window　　IF li_rc = 1 THEN 　　cb_3.triggerevent( Clicked!)　　RETURN 0</p&g

72、t;　　//User chose to close window without updating　　ELSEIF li_rc = 2 THEN　　RETURN 0　　//User canceled<b&g

73、t;　　ELSE　　RETURN 1 　　END IF　　ELSE　　// No changes to the data, window will just close<

74、;/p>　　RETURN 0 　　END IF　　添加讀者信息界面如下：　　前一條：　　//定義參數(shù)當(dāng)前行行數(shù)　　integ

75、er row_current 　　//數(shù)據(jù)窗口向前滾動(dòng)一條記錄　　row_current=dw_1.ScrollPriorRow()　　//如果已經(jīng)到達(dá)第一條記錄，則彈出一個(gè)對(duì)話框警告　　if row_current=1 then

76、;　　MessageBox("警告","已經(jīng)是最前一條記錄")　　end if　　后一條：　　//定義參數(shù) 表的總行數(shù)　　integer row_count

77、 　　//定義參數(shù) 當(dāng)前行　　integer row_current 　　//數(shù)據(jù)窗口向后滾動(dòng)一條紀(jì)錄　　row_current=dw_1.ScrollNextRow()　　//得到表的總行數(shù)</b&g

78、t;　　row_count=dw_1.RowCount()　　//判斷是否是最后一條記錄　　if row_current= row_count then　　MessageBox("警告","已經(jīng)是最后一條記錄")

79、　　end if　　保存：　　//if update(dw_1,true,false)=1 then　　////保存修改成功，提交修改　　//dw_1.resetupda

80、te()　　//commit;　　//messagebox("提示!!!","數(shù)據(jù)更新成功!!!")　　//else　　////保存修改失敗，取消所作的修改<

81、p>　　//rollback;　　////彈出一個(gè)對(duì)話框警告　　//messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!")　　//end if　　if update(dw_1

82、,true,false)=1 then　　//保存修改成功，提交修改　　dw_1.resetupdate()　　commit;　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!")&

83、lt;/p>　　end if 　　if update(dw_1,true,false)=2 then　　//保存修改失敗，取消所作的修改　　rollback;　　//

84、彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!")　　end if　　添加：　　//insert a row in the

85、 end of dw_1　　g_RowNumber=dw_1.InsertRow(0)　　//dw_1 get the focus　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1

86、.ScrollToRow(G_RowNumber) 　　//the first column get the focus　　dw_1.SetColumn(1)　　刪除：　　//得到當(dāng)前記錄<

87、;/p>　　G_RowNumber=dw_1.getrow()　　//將當(dāng)前記錄中的員工號(hào)取出賦值給全局變量emp_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=Me

88、ssageBox("提示","確實(shí)要?jiǎng)h除嗎?",Question!, YesNoCancel!, 3)　　if a=1 then 　　cb_3.triggerevent( Clicked!)　　else <

89、p>　　dw_1.retrieve()　　end if　　closequery事件：　　integer li_rc　　// Accept the last data entered into the datawindow<

90、;/p>　　dw_1.AcceptText()　　//Check to see if any data has changed 　　IF dw_1.ModifiedCount() > 0 THEN　　li_rc = MessageBox("提示", &

91、;　　"是否保存所做的修改?", Question!, &　　YesNoCancel!, 3)　　//User chose to updata and close window　　IF li_rc = 1 THEN &

92、lt;p>　　cb_3.triggerevent( Clicked!)　　RETURN 0　　//User chose to close window without updating　　ELSEIF li_rc = 2 THEN

93、;　　RETURN 0　　//User canceled　　ELSE　　RETURN 1 　　END IF<

94、b>　　ELSE　　// No changes to the data, window will just close　　RETURN 0 　　END IF　　退出：&

95、lt;/p>　　integer li_rc　　// Accept the last data entered into the datawindow　　dw_1.AcceptText()　　//Check to see if any data has changed

96、;　　IF dw_1.ModifiedCount() > 0 THEN　　li_rc = MessageBox("提示", &　　"是否保存所做的修改?", Question!, &　　YesNoCancel!, 3)</

97、p>　　//User chose to updata and close window　　IF li_rc = 1 THEN 　　cb_3.triggerevent( Clicked!)　　RETURN 0

98、;　　//User chose to close window without updating　　ELSEIF li_rc = 2 THEN　　RETURN 0　　//User canceled　　ELSE<

99、/b>　　RETURN 1 　　END IF　　ELSE　　// No changes to the data, window will just close<

100、;p>　　RETURN 0 　　END IF　　修改讀者信息界面如下：　　添加：//insert a row in the end of dw_1　　g_RowNumber=dw_1.InsertRow(0)

101、;　　//dw_1 get the focus　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get

102、the focus　　dw_1.SetColumn(1)　　刪除：　　//得到當(dāng)前記錄　　G_RowNumber=dw_1.getrow()　　//將當(dāng)前

103、記錄中的員工號(hào)取出賦值給全局變量emp_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實(shí)要?jiǎng)h除嗎?",Question!, YesNoCancel!, 3)&l

104、t;/p>　　if a=1 then 　　cb_3.triggerevent( Clicked!)　　else 　　dw_1.retrieve()　　end if&l

105、t;/p>　　保存：　　if update(dw_1,true,false)=1 then　　//保存修改成功，提交修改　　dw_1.resetupdate()　　commit;</

106、b>　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!")　　else　　//保存修改失敗，取消所作的修改　　rollback;</

107、p>　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!")　　end if　　closequery事件如前。

108、　退出：　　close(parent)　　修改讀者信息界面：　　添加：//insert a row in the end of dw_1　　g_RowNumber=dw_1.InsertRow(0)</p&g

109、t;　　//dw_1 get the focus　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get

110、 the focus　　dw_1.SetColumn(1)　　刪除：//得到當(dāng)前記錄　　G_RowNumber=dw_1.getrow()　　//將當(dāng)前記錄中的員工號(hào)取出賦值給全局變量emp_no　　deleterow(dw_1,

111、g_rownumber)　　int a 　　a=MessageBox("提示","確實(shí)要?jiǎng)h除嗎?",Question!, YesNoCancel!, 3)　　if a=1 then 　　cb_3

112、.triggerevent( Clicked!)　　else 　　dw_1.retrieve()　　end if　　保存：if update(dw_1,true,false)=1 then<

113、;/p>　　//保存修改成功，提交修改　　dw_1.resetupdate()　　commit;　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!")&l

114、t;b>　　else　　//保存修改失敗，取消所作的修改　　rollback;　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!"

115、)　　end if　　退出：　　close(parent)　　添加讀者信息界面：　　前一條：<

116、;/b>　　//定義參數(shù)當(dāng)前行行數(shù)　　integer row_current 　　//數(shù)據(jù)窗口向前滾動(dòng)一條記錄　　row_current=dw_1.ScrollPriorRow()　　//如果已經(jīng)到達(dá)第一條記錄，則彈出一個(gè)

117、對(duì)話框警告　　if row_current=1 then　　MessageBox("警告","已經(jīng)是最前一條記錄")　　end if　　后一條：</p

118、>　　//定義參數(shù) 表的總行數(shù)　　integer row_count 　　//定義參數(shù) 當(dāng)前行　　integer row_current 　　//數(shù)據(jù)窗口向后滾動(dòng)一條紀(jì)錄　　row_current=

119、dw_1.ScrollNextRow()　　//得到表的總行數(shù)　　row_count=dw_1.RowCount()　　//判斷是否是最后一條記錄　　if row_current= row_count then

120、　　MessageBox("警告","已經(jīng)是最后一條記錄")　　end if　　保存：　　if update(dw_1,true,false)=1 then

121、　　//保存修改成功，提交修改　　dw_1.resetupdate()　　commit;　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!")

122、else　　//保存修改失敗，取消所作的修改　　rollback;　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)更新失敗!!!")</p&g

123、t;　　end if　　添加：　　//insert a row in the end of dw_1　　g_RowNumber=dw_1.InsertRow(0)　　//dw

124、_1 get the focus　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get the focus

125、;　　dw_1.SetColumn(1)　　刪除：　　//得到當(dāng)前記錄　　G_RowNumber=dw_1.getrow()　　//將當(dāng)前記錄中的員工號(hào)取出賦值給全局變量em

126、p_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實(shí)要?jiǎng)h除嗎?",Question!, YesNoCancel!, 3)

127、;　　if a=1 then 　　cb_3.triggerevent( Clicked!)　　else 　　dw_1.retrieve()　　end if

128、;　　退出：　　//定義兩個(gè)變量　　int MCount //修改后沒(méi)有保存的行數(shù)　　int UpdateOrNot //是否修改　　//得到修改后沒(méi)有保存的行數(shù)

129、　　MCount=w_books.dw_1.ModifiedCount()　　if MCount=0 then　　//沒(méi)有未保存的修改　　close(w_books)　　elseif Mcount>0 then<p

130、>　　//詢問(wèn)是否保存所做的修改　　UpdateOrNot=MessageBox("保存修改","您修改了數(shù)據(jù)窗口中的數(shù)據(jù)，現(xiàn)在是否保存?",Question!,YesNoCancel!)　　if UpdateOrNot=1 then　　//保存&l

131、t;/b>　　if update(w_books.dw_1,true,false)=1 then　　//保存修改成功，提交修改　　w_books.dw_1.resetupdate()　　commit;&l

132、t;p>　　else　　//保存修改失敗，取消所作的修改　　rollback;　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!","數(shù)據(jù)保存失敗

133、")　　end if　　close(w_books)　　elseif UpdateOrNot=2 then　　//不保存　　r

134、ollback;　　close(w_books)　　end if　　end　if 　　修改書(shū)籍界面如下：<p

135、>　?。?lt;/b>　　添加：　　//insert a row in the end of dw_1　　g_RowNumber=dw_1.InsertRow(0)　　//dw_1 get the foc

136、us　　dw_1.SetFocus()　　//到當(dāng)前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get the focus

137、dw_1.SetColumn(1)　　刪除：　　//得到當(dāng)前記錄　　G_RowNumber=dw_1.getrow()　　//將當(dāng)前記錄中的員工號(hào)取出賦值給全局變量emp_no

138、　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實(shí)要?jiǎng)h除嗎?",Question!, YesNoCancel!, 3)　　if a=1 then

139、 　　cb_3.triggerevent( Clicked!)　　else 　　dw_1.retrieve()　　end if　　保存：if updat

140、e(dw_1,true,false)=1 then　　//保存修改成功，提交修改　　dw_1.resetupdate()　　commit;　　messagebox("提示!!!","數(shù)據(jù)更新成功!!!&q

141、uot;)　　else　　//保存修改失敗，取消所作的修改　　rollback;　　//彈出一個(gè)對(duì)話框警告　　messagebox("錯(cuò)誤!!!

眾賞文庫(kù)> 全部分類> 畢業(yè)設(shè)計(jì)

溫馨提示

1. 本站所有資源如無(wú)特殊說(shuō)明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽，若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫(kù)僅提供信息存儲(chǔ)空間，僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請(qǐng)與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

小型圖書(shū)管理系統(tǒng)畢業(yè)設(shè)計(jì)

文檔簡(jiǎn)介

溫馨提示

最新文檔

評(píng)論

小型圖書(shū)管理系統(tǒng)畢業(yè)設(shè)計(jì)

文檔簡(jiǎn)介

溫馨提示

最新文檔

評(píng)論

免費(fèi)下載