數(shù)據(jù)庫圖書管理系統(tǒng)_免費(fèi)下載-資料下載頁
2025-01-22 08:59本頁面
【導(dǎo)讀】1)圖書室有各種圖書一萬多冊。定價(jià)和內(nèi)容簡介。3)借書證記錄有借閱者的姓名、所在單位、職業(yè)等。4)憑借書證借書，每次最多能借8本書。借書期限最長為30天。4．書籍類別信息的查詢、修改，包括類別編號、類別名稱。根據(jù)1）所要實(shí)現(xiàn)的功能設(shè)計(jì)，可能建立它們之間的關(guān)系，進(jìn)而實(shí)現(xiàn)邏輯結(jié)構(gòu)功能。用E-R圖一一描述這些實(shí)體（其中矩形代表實(shí)體，橢圓代表屬性，菱形代表
【正文】 f =useid and =key and sta1=管理員 thenopen(w_main)close(w_denglu)elseMessageBox(wrong,密碼錯(cuò)誤)=end ifend ifcase 工作人員 select ,into :useid,:key ,:sta1from managerwhere =:。if = and = and sta1=工作人員 thenMessageBox(wrong,用戶名跟密碼不能為空)elseif =useid and =key thenm_no=useidopen(w_main)close(w_denglu)elseMessageBox(wrong,密碼錯(cuò)誤)=end ifend ifcase 讀者open(w_mian_1)close(w_denglu)case else Messagebox(提示,你還沒有選擇任何登陸類型!)。end choose圖書信息查詢窗口與代碼的設(shè)計(jì)：string aif = and = and =thenmessagebox(wrong,請輸入查找信息)else if () = true thenselect into :afrom bookwhere bookid=:。if =a then()(bookid=39。+trim()+39。)(sqlca)()=yeselsemessagebox(sorry,你要查找該編號的書不存在)end ifelseif ()=true then select into :afrom bookwhere bookname=:。if =a then()(bookname=39。+trim()+39。)(sqlca)()=yeselsemessagebox(sorry,你要查找該名字的書不存在)end ifelseif ()=true then string bookname,jstj=bookname=righttrim()if len(bookname)0 thenif len(jstj)0 thenjstj=jstj+ and pos(bookname,39。+bookname+39。)0elsejstj=pos(bookname,39。+bookname+39。)0end ifend if(jstj) (sqlca)() else MessageBox(wrong,請選擇查找方式)end if end if end ifend
公司管理相關(guān)推薦
鄂ICP備17016276號-1