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

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

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

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

文檔簡介

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

16、b>　　（讀者信息表）　?。ㄓ脩舯恚?lt;/b>　　（各個表的主鍵）　　三、系統(tǒng)實施

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

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

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

20、.sqlerrtext)　　return　　end if　　//打開啟動窗口　　open(w_start)<b

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

22、lt;p>　　登錄窗口w_login的主要是驗證用身份并確定權(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ù)庫用戶口令表格中對應(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ù)庫中保存的口令和用戶輸入的口令作比較　　IF G_PWD=CORREC

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

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

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

30、;　　close(w_start)　　(W_login)　　　　　　　　　3.3啟動界面設(shè)計　　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　　３.４　屏幕保護界面　　(w_screen)　　3.4 菜單

33、設(shè)計　　菜單項代碼如下：　　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ù)庫用戶口令表格中對應(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ù)庫中保存的口令和用戶輸入的口令作比較　　IF G_PWD=CORRECT_PSWD THEN　　//輸入正確，打開主窗口　　OPEN(W_MAIN)　　//setredraw(false)　　CLOSE(W_LOGI

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

48、;)　　CLOSE(W_LOGIN_re)　　ELSE　　MESSAGEBOX("警告","輸入的用戶口令有誤，請重新輸入")　　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("警告","兩次輸入的口令不一致，請重新輸入")　　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("警告","輸入的原口令不正確，請重新輸入")

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

56、id=:G_USER or username=:G_USER;　　MESSAGEBOX("注意","你的口令已經(jī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!)　　//移動窗口到屏幕中間　　Move((l_scrwidth - this.width)/2,(l_scrheight - this.height)/2)　　//打開窗口刷新</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()　　//到當前行　　dw_1.ScrollToRow(G_RowNumber) <

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

64、getrow()　　//將當前記錄中的員工號取出賦值給全局變量emp_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實要刪除嗎?

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;　　//彈出一個對話框警告　　messagebox("錯誤!!!","數(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ù)當前行行數(shù)　　integ

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

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

77、 　　//定義參數(shù) 當前行　　integer row_current 　　//數(shù)據(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;　　////彈出一個對話框警告　　//messagebox("錯誤!!!","數(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、彈出一個對話框警告　　messagebox("錯誤!!!","數(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()　　//到當前行　　dw_1

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

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

88、ssageBox("提示","確實要刪除嗎?",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()　　//到當前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get

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

103、記錄中的員工號取出賦值給全局變量emp_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實要刪除嗎?",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>　　//彈出一個對話框警告　　messagebox("錯誤!!!","數(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()　　//到當前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get

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

111、g_rownumber)　　int a 　　a=MessageBox("提示","確實要刪除嗎?",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;　　//彈出一個對話框警告　　messagebox("錯誤!!!","數(shù)據(jù)更新失敗!!!"

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

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

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

118、>　　//定義參數(shù) 表的總行數(shù)　　integer row_count 　　//定義參數(shù) 當前行　　integer row_current 　　//數(shù)據(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;　　//彈出一個對話框警告　　messagebox("錯誤!!!","數(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()　　//到當前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get the focus

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

126、p_no　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實要刪除嗎?",Question!, YesNoCancel!, 3)

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

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

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

130、>　　//詢問是否保存所做的修改　　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;　　//彈出一個對話框警告　　messagebox("錯誤!!!","數(shù)據(jù)保存失敗

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

134、ollback;　　close(w_books)　　end if　　end　if 　　修改書籍界面如下：<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()　　//到當前行　　dw_1.ScrollToRow(G_RowNumber) 　　//the first column get the focus

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

138、　　deleterow(dw_1,g_rownumber)　　int a 　　a=MessageBox("提示","確實要刪除嗎?",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;　　//彈出一個對話框警告　　messagebox("錯誤!!!

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

溫馨提示

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

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

文檔簡介

溫馨提示

最新文檔

評論

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

文檔簡介

溫馨提示

最新文檔

評論

免費下載