【正文】
只有了知識(shí)的積淀,才能為自己的發(fā)展鋪平道路! 。 經(jīng)過對(duì)這個(gè)系統(tǒng)的開發(fā),在開發(fā)過程中遇到但也解決了很多問題,所以說我們不能懼怕有困難而不去接觸認(rèn)識(shí)它,我們要知難而上,只有這樣我們才能成長(zhǎng),才能有所 發(fā)展 。剛開始的時(shí)候,對(duì)于 PowerBuilder 的語法,用法等一系列知識(shí)都不熟 悉 。 這個(gè)課程設(shè)計(jì)使我鞏固了數(shù)據(jù)庫的知識(shí)。但只有兩周的課程設(shè)計(jì)時(shí)間,時(shí)間比較倉促,所以開發(fā)的系統(tǒng)不是很完善,有一些功能未實(shí)現(xiàn),但是報(bào)刊訂閱的基本功能均已實(shí)現(xiàn)。 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計(jì)報(bào)告 36 5 課程設(shè)計(jì)心得 這次課程設(shè)計(jì)的主要目的是掌握數(shù)據(jù)庫應(yīng)用系統(tǒng)分析設(shè)計(jì)的基本方法 ,基本掌握PowerBuilder,進(jìn)一步提高分析解決問題的綜合 能力。本系統(tǒng)功能還不夠強(qiáng)大,較真正的管理系統(tǒng)還有不足之處。比較其他的管理系統(tǒng),本系統(tǒng)可以比較方便的統(tǒng)計(jì)出訂閱的所需金額及各報(bào)刊的訂閱總數(shù)。有比較強(qiáng)的安全性,可以阻止非法操作, 所有的企業(yè)內(nèi)部人員都可以進(jìn)行注冊(cè)并訂閱,用戶可以修改除用戶名之外的所有信息。+gs_operator_id+39。+name+39。 update consumer set subscribenum=:kindnum where Uname=:name 。 select Ssum into :money from subscribe where Uname=:name and Mnumber=:magazinenum 。 if 0 then messagebox(系統(tǒng)提示 ,該報(bào)刊未輸入價(jià)格 !) return end if if year= or year= or year= or year= or year= then summoney=(+year)*wholeprice+halfprice summoney=summoney*numb elseif year=1 or year=2 or year=3 or year=4 or year=5 then summoney=year*wholeprice summoney=summoney*numb end if select Uname,Mnumber into :name1,:num1 from subscribe where Uname=:name and Mnumber=:magazinenum。 if 0 then messagebox(系統(tǒng)提示 ,無此用戶 !) = = () return end if if passwordgs_password then messagebox(警告 ,口令錯(cuò)誤 !) = () return end if select Mnumber into :num from magazine 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計(jì)報(bào)告 31 where Mnumber=:magazinenum。39。39。39。39。39。 end if 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計(jì)報(bào)告 27 取消按鈕: close(parent) 界面: ( 15) 制作用戶菜單中訂閱菜單: 制作數(shù)據(jù)窗口 d_show_magazine,制作訂閱報(bào)刊界面 :w_subscribe,將 d_show_magazine加入其中 。 then MessageBox(系統(tǒng)提示 ,對(duì)不起 !部門號(hào)不能為空 !) () return end if update consumer set Upassword=:pass,Urealname=:realname, Usex=:sex,Dnumber=:dept,Uphone=:phone,Uaddress=:address where Uname=:name。 then MessageBox(系統(tǒng)提示 ,對(duì)不起 !性別不能為空 !) return end if if dept= or dept=39。 then MessageBox(系統(tǒng)提示 ,對(duì)不起 !真實(shí)姓名不能為空 !) () return end if if sex= or sex=39。 then MessageBox(系統(tǒng)提示 ,對(duì)不起 !密碼不能為空 !) () return end if if realname= or realname=39。 //無信息 if 0 then messagebox(,) return end if //在界面上顯示信息 =name =pass =realname =dept =phone =address if sex=男 then =true elseif sex=女 then =true end if 確定按鈕: string name,realname,pass,sex,dept,phone,address int b_select b_select=messagebox(系統(tǒng)提示 ,確認(rèn)修改? ,exclamation!,yesno!) if b_select=1 then name=trim() pass=trim() 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計(jì)報(bào)告 26 realname=trim() dept=trim() phone=trim() address=trim() if =true then sex=男 elseif =true then sex=女 end if if pass= or pass=39。制作管理員用戶信息維護(hù)界面 w_maintenance_consumer, 部 門 信 息 維 護(hù) 界 面 w _maintenance_dept , 報(bào) 刊 信 息 維 護(hù) 界 面 w _maintenance_magazine,訂閱信息維護(hù)界面 w _maintenance_subscribe;將d_maintenance_consumer , d_maintenance_dept , d_maintenance_magazine ,d_maintenance_subscribe分別放入 w_maintenance_consumer, w _maintenance_dept,w _maintenance_magazine, w _maintenance_subscribe中; 以下僅列出訂閱信息維護(hù)代碼和界面抓圖(其他信息維護(hù)類似,不再列出) 訂閱信息維護(hù)代碼: 窗口代碼: (sqlca) () 數(shù)據(jù)窗口控制框代碼: int b_select if =b_3 then b_select=messagebox(系統(tǒng)提示 ,確定刪除所選列? ,exclamation!,yesno!) 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計(jì)報(bào)告 22 if b_select=1 then (0) end if end if if