學(xué)校圖書(shū)借閱管理系統(tǒng)-課程設(shè)計(jì)報(bào)告(編輯修改稿)
2025-01-22 13:54 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 前運(yùn)行的圖書(shū)管理系統(tǒng)，恢復(fù)到 vfp系統(tǒng)繼續(xù)進(jìn)行操作。 ER 圖 Booksinfo ER圖 Booksinfo 書(shū)名 作者 出版社 定價(jià) 冊(cè)數(shù) 圖書(shū)種類 書(shū)號(hào) 編號(hào) Dairy ER圖 Lend infoER 圖 Passwordinfo ER 圖 Lendinfo ER 圖 Dairy 作者 圖書(shū)種類 編號(hào) 借閱日期 預(yù)約日期 借閱天數(shù) 歸還日期 借閱情況 冊(cè)數(shù) 是否延期 讀者編號(hào) 書(shū)號(hào) 備注 密碼 備注 用戶名 Lendinfo Passwordinfo 姓名 性別 年齡 詳細(xì)地址 聯(lián)系電話 冊(cè)數(shù) 注冊(cè)日期 密碼 讀者編號(hào) 是否允許借 Lendinfo 設(shè)計(jì)過(guò)程或程序代碼 主程序： set talk off set safe off set sysmenu off close all *系統(tǒng)環(huán)境設(shè)計(jì) release windows 常用 ,項(xiàng)目管理器 ,表單控件 ,布局 ,命令 modify window screen title 迷你圖書(shū)管理系統(tǒng) zoom window screen max *屏幕和標(biāo)題設(shè)置 set defa to left(sys(16),rat(\,sys(16)))*設(shè)置路徑 set path to data。form。pic。class*系統(tǒng)環(huán)境設(shè)計(jì) open database library*打開(kāi)數(shù)據(jù)庫(kù) =.f. =.\ public cyonghu,cmima,jiage,checked checked=1 cyonghu= cmima= do form start *執(zhí)行表單，開(kāi)始進(jìn)入系統(tǒng) read events =.t. = do form 入口 read events do read events quit 封面 代碼 SET BELL ON SET BELL TO 39。39。,2 CHR(7) 計(jì)時(shí)器： if thisform. label5. left thisform. width thisform. label5. left = thisform. label5. left + 1 else thisform. label5. left = 110 endif 入口 其中讀者入口的 click event 代碼為： do form dzdl 管理員入口的 click events 代碼為 : do form logo 讀者登陸界面： 登陸按鈕的 click代碼為： sele readerinfo if n3 if allt()== wait window at ,65 用戶名為空，請(qǐng)輸入 else if allt()== wait window at 20,65 密碼為空，請(qǐng)輸入 else locate for allt(讀者編號(hào) )==allt() if found() if allt(密 碼 )==allt() clear event else = wait window at 20,65 密碼錯(cuò)誤，請(qǐng)重新輸入 n=n+1 endif else = = wait window at ,65 沒(méi)有此用戶 ,請(qǐng)重新輸入 n=n+1 endif endif endif else n=1 =.f. =.f. =.f. =登錄已錯(cuò)誤三次，系統(tǒng)即將自動(dòng)退出！！ ” endif 該表單的初始化 init代碼： public n n=1 checked=0 管理員登陸界面： 確認(rèn)按鈕的 click代碼： sele passwordinfo if n3 if allt()== wait window at ,65 用戶名為空，請(qǐng)輸入 else if allt()== wait window at 20,65 密碼為空，請(qǐng)輸入 else locate for allt(用戶名 )=allt() if found() if allt(密碼 )==allt()
研究報(bào)告相關(guān)推薦
鄂ICP備17016276號(hào)-1