在項(xiàng)目管理器中,單擊ALL選項(xiàng)卡中的Date左邊的+號(hào),選擇Datebases選項(xiàng),或者直接在Date選項(xiàng)卡中選擇Datebases選項(xiàng),然后單擊New按鈕,建立老師信息管理系統(tǒng)數(shù)據(jù)庫(kù),保存后就會(huì)進(jìn)入Datebasedesigner(數(shù)據(jù)庫(kù)設(shè)計(jì)器)。
雖然單獨(dú)使用自由表,可以存儲(chǔ)和查看許多信息。但是,當(dāng)信息量很大,而且各個(gè)數(shù)據(jù)表之間的關(guān)系又非常復(fù)雜時(shí),自由表就很難勝任了。為此就需要將若干個(gè)表組織到一個(gè)數(shù)據(jù)庫(kù)中,理清數(shù)據(jù)間的關(guān)系,減少數(shù)據(jù)冗余存儲(chǔ),保證數(shù)據(jù)完整性。因此為該數(shù)據(jù)庫(kù)創(chuàng)建7數(shù)據(jù)庫(kù)表,分別為:教師表、課程表、信息表、科研表、課題表、發(fā)表論文表、待遇表。這7個(gè)表的結(jié)構(gòu)分別為表1至7所示。
表1教師表
教師編號(hào)課程名教室時(shí)間
表2 課程表教師編號(hào)籍貫現(xiàn)住址辦公電話手機(jī)號(hào)碼電子郵箱
表3 信息表教師編號(hào)課題編號(hào)論文編號(hào)
表4 科研表
表5 課題表論文編號(hào)論文名稱發(fā)表時(shí)間發(fā)表位置獲得評(píng)價(jià)
表6 發(fā)表論文表教師編號(hào)基本工資獎(jiǎng)金公積金福利津貼
表7 待遇表
利用視圖設(shè)計(jì)器創(chuàng)建本地視圖,在項(xiàng)目管理器中選擇本地視圖,新建視圖khcsd。
1.選擇數(shù)據(jù)源,教師表,課程表。
2.視圖設(shè)計(jì)
選取字段:教師表.教師編號(hào)、教師表.姓名、課程表.課程名、課程表.教室、課程表.時(shí)間;
設(shè)置連接:教師表.教師編號(hào)=課程表.教師編號(hào);
排序依據(jù):課程表.時(shí)間,升序;
分組依據(jù):教師表.教師編號(hào);
系統(tǒng)啟動(dòng)是由系統(tǒng)啟動(dòng)表單begin.scx負(fù)責(zé),該表單被執(zhí)行后,出現(xiàn)教師信息管理系統(tǒng),和進(jìn)入、退出兩個(gè)按鈕。單擊進(jìn)入按鈕可以進(jìn)入下一級(jí)權(quán)限認(rèn)證表單,單擊退出就退出系統(tǒng)了。相關(guān)代碼如下:進(jìn)入,DOformD:教師信息管理教師信息管理系統(tǒng)formspassword.scx;退出,thisform.Release CLEAREVENTS QUIT。
權(quán)限認(rèn)證由權(quán)限認(rèn)證表單password.scx負(fù)責(zé),如果單擊該表單的確認(rèn)按鈕控件,將驗(yàn)證用戶名、密碼的有效性,即與數(shù)據(jù)庫(kù)中口令表password.dbf比較;如果輸入的用戶名及密碼任一有錯(cuò),都會(huì)提示重新輸入。當(dāng)都輸入正確時(shí)單擊確認(rèn)將啟動(dòng)mainform.scx表單,進(jìn)入系統(tǒng)主界面同時(shí)將用戶名和權(quán)限存放在變量username和rank中,以備后面的表單驗(yàn)證權(quán)限時(shí)使用。單擊退出按鈕,系統(tǒng)退回至系統(tǒng)啟動(dòng)表單。
表單init過(guò)程代碼
PUBLICusername變量username用來(lái)存放用戶名
username=
thisform.combo1.SetFocus
控件CombolInteractiveChange過(guò)程代碼
username=thisform.combol.value
thisform.Text1.SetFocus
進(jìn)入單擊事件(Click)過(guò)程代碼
IFLEN(ALLTRIM(thisform.combol.value))0.and.len(ALLTRIM(thisform.text1.Value))0
SELECTpassword
LOCATEforALLTRIM(password.用戶)==ALLTRIM(thisform.control.combol.value)
IFALLTRIM(password.密碼)==ALLTRIM(thisform.Text1.Value)
thisform.Release
DOformformsmainform.scx
ELSE
MESSAGEBOX(密碼不正確,請(qǐng)重新輸入,0,提示!)
thisform.text1.Value=
thisform.text1.SetFocus
ENDIF
ELSE
MESSAGEBOX(密碼或用戶名不能為空,請(qǐng)重新輸入,0,提示!)
thisform.text1.SetFocus
ENDIF
退出單擊事件(Click)過(guò)程代碼
thisform.Release
DOformD:教師信息管理教師信息管理系統(tǒng)formsbegin.scx
系統(tǒng)主界面表單是mainform.scx執(zhí)行表單后,單擊不同的命令按鈕,選擇并執(zhí)行其他表單;單擊退出命令,返回權(quán)限認(rèn)證表單。通過(guò)命令按鈕組控件可以選擇下列表單:數(shù)據(jù)維護(hù)表單sjwh.scx 數(shù)據(jù)查詢表單sjcx.scx 打印表單dy.scx。
圖1
通過(guò)該表單,完成對(duì)系統(tǒng)主要數(shù)據(jù)表的基本維護(hù)功能。完成對(duì)相關(guān)信息的查詢。在打印中要制作打印報(bào)表文件khcsd.frk。
根據(jù)系統(tǒng)模塊的劃分,同時(shí)對(duì)應(yīng)用程序的功能和結(jié)構(gòu)進(jìn)行測(cè)試。在表單設(shè)計(jì)和編碼中就交替進(jìn)行著不斷的測(cè)試。
清理項(xiàng)目,在項(xiàng)目菜單下,選清理項(xiàng)目。連編項(xiàng)目,點(diǎn)擊項(xiàng)目管理器中的連編。可執(zhí)行文件運(yùn)行。
信息發(fā)布:廣州名易軟件有限公司 http://m.jetlc.com