【文章內(nèi)容簡介】
顯示系統(tǒng)主界面。事件代碼:Form1的init事件代碼:SET EXACT ON amp。amp。精確比較PUBLIC ARRAY rr[18] amp。amp。數(shù)組用于實現(xiàn)菜單項權(quán)限PUBLIC i amp。amp。i用于記錄用戶名及口令輸入次數(shù)PUBLIC operat amp。amp。operat用于保存操作員姓名 i=0“確定”按鈕(COMMAND1)CLICK事件代碼:*判斷密碼是否正確i=i+1SELECT operatorLOCATE FOR 操作員姓名=ALLTRIM()DO CASE CASE i=3 AND FOUND() AND = amp。amp。輸入次數(shù)未超過3次且用戶名正確、口令正確 operat= INSERT INTO log(操作員代號,操作員姓名,登錄時間) VALUES(,DATETIME()) =”學生管理系統(tǒng)+SPACE(40)+DTOC(DATE())+SPACE(40)+操作員:+operat SELECT 權(quán)限 FROM menuright INTO ARRAY rr WHERE 操作員代號= ORDER BY 菜單項編號 RELEASE THISFORM DO .\main\ CASE i=3 AND FOUND() AND != amp。amp。輸入次數(shù)未超過3次且用戶名正確、口令不正確 MESSAGEBOX(密碼錯誤,請重輸!,警告) = CASE i=3 AND NOT FOUND() amp。amp。輸入次數(shù)未超過3次且用戶名不正確 MESSAGEBOX(操作員姓名錯誤,請重輸!,警告) = = CASE i3 amp。amp。輸入次數(shù)超過3次 MESSAGEBOX(禁止進入系統(tǒng)!,警告) ENDCASE 退出按鈕(COMMAND2)CLICK事件代碼:RELEASE THISFORMCLEAR EVENTS(四)系統(tǒng)菜單設計 學生信息管理系統(tǒng)的菜單在應用系統(tǒng)中,各個了模塊是通過菜單組織在一起的。通過對人事工資管理系統(tǒng)功能模塊的設計,可以交系統(tǒng)劃分為3大模塊:學生信息管理、學生成績查詢、系統(tǒng)管理,具體的菜單設計見下表:學生信息管理學生成績管理系統(tǒng)管理學生信息維護學生成績查詢操作員管理口令設置學生信息查詢權(quán)限管理系統(tǒng)日志數(shù)據(jù)備份數(shù)據(jù)恢復退出系統(tǒng) 在菜單設計器中實現(xiàn)權(quán)限設置在菜單項設計器中,通過[提示選項]對話框設置菜單項的跳過條件可以實現(xiàn)用戶權(quán)限。每個操作員對每個菜單項有兩種權(quán)限:0或1。“0”表示此操作員對該菜單項沒有操作權(quán),系統(tǒng)運行后,該菜單項為灰色。不能打開對應的表單,“1”代表該操作員對該菜單項具有操作權(quán),系統(tǒng)運行后,該菜單項可用,鼠標單擊菜單項能打開對應的表單。,在登錄系統(tǒng)時讀出該操作員對應各菜單項的權(quán)限,并賦值給一個數(shù)組RR。本系統(tǒng)共10個菜單項,所以定義的數(shù)組也包含10個元素。 學生信息維護表單包換下列功能:數(shù)據(jù)錄入、修改、刪除、查詢、瀏覽、保存、打印等。本表單左邊是瀏覽窗口,便于用戶瀏覽數(shù)據(jù);右邊是編輯窗口,主要用于輸入修改數(shù)據(jù)。 在表單數(shù)據(jù)環(huán)境中添加表:、cjb、dbf。學生人事表和成績表的結(jié)構(gòu)請打開數(shù)據(jù)庫表查看。在表單數(shù)據(jù)環(huán)境的BRFOREOPENTABLES事件中添加代碼:=.t. 事件代碼:FORM1的INIT事件代碼:=.F.=.F.=.T.=.T.=.T.=.T.=.T.=.T.=.T.=.T.=.T.=.T.=.F.=.T.=.T.