數(shù)據(jù)庫powerbuilder報刊訂閱管理系統(tǒng)-全文預(yù)覽
【正文】 fprice 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。39。39。39。 then MessageBox(系統(tǒng)提示 ,對不起 !部門號不能為空 !) () 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)提示 ,對不起 !真實姓名不能為空 !) () return end if if sex= or sex=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)提示 ,確認修改？ ,exclamation!,yesno!) if b_select=1 then name=trim() pass=trim() 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 26 realname=trim() dept=trim() phone=trim() address=trim() if =true then sex=男 elseif =true then sex=女 end if if pass= or pass=39。制作管理員按用戶統(tǒng)計界面 w_stat_consumer,按部門統(tǒng)計界面w_stat_department，按 報刊統(tǒng) 計界面 w_stat_magazine。 then messagebox(系統(tǒng)提示 ,請輸入報刊號 !) return end if select Mnumber,Mname into :copynumber,:name from magazine where Mnumber=:number。 messagebox(系統(tǒng)提示 ,信息保存成功 !) return end if end if if =b_4 then close(parent) end if 數(shù)據(jù)窗口： 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 17 界面： （ 9）制作 管理員 主菜單中查詢菜單：分別制作制作查詢數(shù)據(jù)窗口 d_consumer_ruery, d_dept_query, d_magazine_query, 分 別 制 作 管 理 員 按 用 戶 查 詢 界 面w_consumer_ruery ， 按 部 門 查 詢 界 面 w_dept_query ， 按 報 刊 查 詢 界 面 w _magazine_query； 將 d_consumer_ruery, d_dept_query, d_magazine_query分別 放入w_consumer_query， w_dept_query， w _magazine_query中 。 if 0 then messagebox(警告 ,您輸入的部門號無效 !無此部門 !) = () return 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 14 end if INSERT INTO consumer (Uname,Upassword,Urealname,Usex,Dnumber,Uphone,Uaddress) VALUES(:name,:password,:realname,:sex,:number,:phone,:address) 。39。39。 if 0 then messagebox(系統(tǒng)提示 ,無此用戶 !) = = () return 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 11 elseif getpasswordgs_password then messagebox(警告 ,口令錯誤 !) = () return end if gs_operator_id=id open(w_consumermain) close(w_login) elseif =false and =false then messagebox(系統(tǒng)提示 ,請選擇用戶類型 !) return end if （ 5）制作注冊界面 w_enroll； 代碼： 注冊按鈕： string name,realname,password,copypassword,sex,number,phone,address,number1 string n 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 12 name=trim() password=trim() copypassword=trim() realname=trim() if =true then sex=男 elseif =true then sex=女 end if number=trim() phone=trim() address=trim() if name= or name=39。 then MessageBox(系統(tǒng)提示 ,請輸入用戶名 !) return elseif getpassword= or getpassword=39。 本系統(tǒng)的結(jié)構(gòu)功能圖： 數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 4 系統(tǒng)數(shù)據(jù)模型設(shè)計 ER 圖 本系統(tǒng)采用 ER 圖（實體 關(guān)系圖）的方法進行數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計。 ? （ 5）統(tǒng)計功能：管理員可以按用戶、部門、報刊統(tǒng)計報刊的銷售情況，并對一些重要的訂閱信息進行統(tǒng)計；普通用戶可以統(tǒng)計出自己的訂閱情況。 ? （ 2）錄入新信息功能：對于管理員，包括新用戶信息和新報刊信息的錄入功能，信息數(shù)據(jù)庫原理及應(yīng)用課程設(shè)計報告 3 一旦提交就存入到后臺數(shù)據(jù)庫中；普通用戶自行注冊進行 錄入個人信息。下面分角色對該系統(tǒng)的不同操作范圍做說明。 它能夠?qū)崿F(xiàn)報刊訂閱的基本功能，包括新報刊信息的錄
試題試卷相關(guān)推薦
鄂ICP備17016276號-1