【正文】 Char 12 2 學(xué)號 Char 12 3 性別 Char 2 4 懲罰名 char 30 5 懲罰時間 Date 6 班級 Char 20 7 原因 char 50 8 備注 char 50 9 扣分 numeric 3,1 表 328 學(xué)籍變動記錄 表 字段號 字段名 數(shù)據(jù)類型 數(shù)據(jù)長度 1 學(xué)號 char 8 2 姓名 char 8 3 時間 date 4 原因 Char 50 5 原班名 Char 20 6 現(xiàn)班名 Char 20 7 說明 char 50 8 備注 char 50 9 類別 Char 6 表 329 課程內(nèi)容記錄表 字段號 字段名 數(shù)據(jù)類型 數(shù)據(jù)長度 1 課號 char 10 2 課名 Char 30 3 簡介 Char 50 4 參考教材 char 50 5 先行課 Char 50 6 備注 Char 50 表 3210 以上為本系統(tǒng)開發(fā)所需要的各類圖表，還有一部分不常用的表，限于篇幅在此未列出，數(shù)據(jù)庫建好之后，便為程序設(shè)計準(zhǔn)備了數(shù)據(jù)基礎(chǔ)。從這個角度出發(fā)，我設(shè)計了友好的、易于操作的用戶界面。從而來避免苦苦的等待系統(tǒng)連接數(shù)據(jù)庫而存在的枯燥、無味問題，不能讓用戶感覺是死機了一樣，沒有反映，另一方面還向用戶展示了所運行的是什么應(yīng)用程序。 當(dāng)你運行系統(tǒng)時初次與您見面的窗口如下： 圖 41 登錄界面設(shè)計 數(shù)據(jù)庫系統(tǒng)的用戶的權(quán)限是數(shù)據(jù)庫的安全措施之一，它保證了非授權(quán)用戶的非法進入，而破壞數(shù)據(jù)庫的信息，使那些權(quán)限較地的用戶不能來修改數(shù)據(jù)庫的信息。該窗口是在后臺有一用戶管理的用戶表，登陸時訪問該數(shù)據(jù)表的內(nèi)容，驗證用戶名是否正確，正確后并驗證用戶的權(quán)限而登陸。因為這樣可以避免一些非授權(quán)用戶選擇用戶名后，自己試著輸入密碼而登陸系統(tǒng)。實現(xiàn)的用戶驗證部分代碼如下： integer number string aa SELECT count(*) into :number from mima where yonghu=: and mima=: using sqlca。當(dāng)用戶前兩次輸入錯誤時，系統(tǒng)將提示“你的登錄信息不對，請 重新輸入！”用戶名和密碼框?qū)⑶蹇詹⒌却匦螺斎搿２煌挠脩魬?yīng)有不同的權(quán)限，只有管理員才可以錄入和修改信息，可以添加新的用戶，清除其他用戶的信息，使他不能進入系統(tǒng)。 密碼驗證部分是系統(tǒng)設(shè)計過程中的最重要的一關(guān)，他限制了普通用戶的操作權(quán)限，如果稍有疏忽變使得非法用戶進入系統(tǒng)，更改重要的信息，甚至破壞整個系統(tǒng)，從而帶來的損失是不可估計的。從而保證了用戶的信息安全性。為了方便用戶的使用在主窗口中是按照模塊的劃分來是設(shè)計菜單的，這樣清晰明了，操作便捷。首先介紹錄入基本資料窗體，該窗體并不用數(shù)據(jù)窗口控件來完成的而是應(yīng)用窗口控件的單行文本編輯器、下拉列表、單選按鈕、命令按鈕以及靜態(tài)文本來完成的。其中確定按鈕的代碼為： long ll_id,ll_i,ll_shenfen,ll_luqu date ld_birthday,ld_luqu string ls_name,ls_nation,ls_sex,ls_home,ls_tel,ls_party,ls_school,ls_nian,ls_fang,ls_xz,ls_ban,ls_ //數(shù)據(jù)格式檢驗 if =or isnull()then messagebox(缺少數(shù)據(jù) ,請輸入學(xué)號 ) () return elseif =or isnull()then messagebox(缺少數(shù)據(jù) ,請輸入學(xué)生姓名 ) () return end if if and not isnull(sle_birthday)then if isdate()then ld_birthday=date() else messagebox(輸入數(shù)據(jù)錯誤 ,請使用 39。的日期格式 ) () return end if end if if and not isnull(sle_luqu)then if isdate()then ld_luqu=date() else messagebox(輸入數(shù)據(jù)錯誤 ,請使用 39。的日期格式 ) () return end if end if ll_id=long() if =true then ls_party= else if =true then ls_party= else ls_party= end if end if if =true then ls_sex= else if =true then ls_sex= end if end if if =nonethen ls_nation= else ls_nation=trim() end if if =nonethen ls_nian= else ls_nian=trim() end if if =nonethen ls_xz= else ls_xz=trim() end if if =none then ls_ban= else ls_ban=trim() end if if =nonethen ls_fang= else ls_fang=trim() end if select into :ll_i from jiben1 where =:ll_id。 ) () return end if ls_name=trim() ll_shenfen=long() ll_luqu=long() ls_school=trim() ls_=trim() ls_home=trim() ls_tel=trim() insert into jiben1 (xuehao,xingming,xingbie,shengri,minzu,zzmm,jiguan,shenfenzheng,luquhao,nianji,banji,banming,fangxiang,luqushijian,gerenjianli,biezhu,yuanbiyexuexiao,dianhua,) values (:ll_id,:ls_name,:ls_sex,:ld_birthday,:ls_nation,:ls_party,:ls_home,:ll_shenfen,:ll_luqu,:ls_nian,:ls_xz,:ls_ban,:ls_fang,:ld_luqu,:mle_re,:,:ls_school,:ls_tel,:ls_)。其中應(yīng)用到了單行文本框、單選按鈕、下拉列表、命令按鈕等控件的使用。 學(xué)籍查詢窗體設(shè)計 當(dāng)你點擊“基本情況查詢”或者相應(yīng)的工具欄上的圖標(biāo)可以打開學(xué)生信息查詢的窗口，在這里主要應(yīng)用了 tab 控件來完成的，信息查詢多樣化適合不同用戶的查詢需求。還有精確查詢部分和模糊查詢部分，通過模糊查詢用戶可以輸入相關(guān)的字節(jié)來得到想要得信息。在其他的窗口 的設(shè)計之中也應(yīng)用了數(shù)據(jù)窗口控件的強大的功能。例如在設(shè)計成績統(tǒng)計時我使用了 Group 風(fēng)格的方式，可以使一個學(xué)生的多科成績的群組顯示，方便、直觀。在錄入信息中多采用Freeform 的風(fēng)格來錄入單條的信息。這種設(shè)計方法適合于一般的操作用戶，只要點擊一個條件即可查詢要的信息，方便易用。下面是在地址欄里輸入“遼寧”得到的相關(guān)信息： 注：（ 1）該窗口介紹了所有學(xué)生的信息，你可以按標(biāo)簽依次按不同的條件查詢信息。 （ 2）用戶可以單擊“打印”、“打印預(yù)覽”、“還原預(yù)覽”、完成需要的操作。 學(xué)籍修改窗體的設(shè)計 學(xué)生的信息不是一成不變的，有些信息要改變就需要修改，那么通過數(shù)據(jù)窗口控件就可以完成此功能，你可以方便的修改以注冊學(xué)生的信息。 （ 2）用戶可以根據(jù)“上一條”，“下一條”來滾動信息，也可查找來動態(tài)的查找而修改記錄。單擊“更新”按鈕即保存修改，又可以用刪除按鈕來刪除當(dāng)前記錄。 學(xué)生有些時候需要調(diào)換班級或轉(zhuǎn)學(xué)這就需要記錄信息，并更改基本數(shù)據(jù)數(shù)據(jù)的信息，應(yīng)用 sql 語句的強大功能，借助 inset 語句實現(xiàn)了數(shù)據(jù)的存儲與更改。年 月 日 39。 UPDATE jiben1 SET fangxiang = :, banming = : WHERE jiben1.xuehao = :aa messagebox(更新成功！ ,您的信息已經(jīng)更新成功 ) = = = = = = 界面設(shè)計如下： 組合查詢窗體的設(shè)計 應(yīng)不同用戶的需求單單的簡單查詢是遠遠不夠的，在此我設(shè)計了一個通過數(shù)據(jù)窗口控件動態(tài)的隨用戶需求而生成 sql 語句，來完成組合查詢的目的。是本次開發(fā)我自己的滿意之處。 該功能實現(xiàn)的“開始 統(tǒng)計”按鈕的代碼如下： string ls_xb,ls_zhi,ls_fh,ls_yu,aaa,ls_csny date ld_jzsj,ld_gzny,ld_xb int ll_rows,a,b,i ll_rows=() if ll_rows0 then a=long(ll_rows) ls_xb=trim([1,1]) ls_fh=trim([1,2]) ls_zhi=trim([1,3]) aaa=string(+trim(ls_xb)+)+trim(ls_fh)+39。 if string(ls_xb)=39。or string(ls_xb)=39。 or string(ls_xb)=39。then aaa=+ls_xb++trim(ls_fh)++ls_zhi+ end if if ll_rows=1 then (+aaa+) () (sqlca) () else for i=2 to a ls_xb=trim([i,1]) ls_fh=trim([i,2]) ls_zhi=trim([i,3]) b=i 1 ls_yu=trim([b,4]) if string(ls_xb)=39。or string(ls_xb)=39。 or string(ls_xb)=39。then aaa=(+aaa+) + +trim(ls_yu)+ + +ls_xb++trim(ls_fh)++ls_zhi+ else aaa=(+aaa+) + +trim(ls_yu)+ + string(+trim(ls_xb)+)+trim(ls_fh)+39。 end if end for i=i+1 (+aaa+) () (sqlca) () end if else messagebox(錯誤提示 ,請點擊增加查詢條件！ ) end if int ll_row ll_row=() if ll_row=0 then messagebox(提示窗口 ,沒有符合條件的記錄！ ) end if 學(xué)生成績的錄入窗體設(shè)計 在學(xué)生的成績錄入過程中，有的課程信息、班名、選修方向是相同的，為了避免大量的信息 的重復(fù)性的錄入問題。而學(xué)生的基本信息是通過游標(biāo)來實現(xiàn)的，避免了將未注冊的學(xué)生填進來，實現(xiàn)了數(shù)據(jù)的完整性。這也是本人開發(fā)的滿意之處。 select count(distinct jiben1.banming) into :ch3 FROM jiben1 where jiben1.fangxiang=:。 () string str,xh,xm int ch3,i,ch DECLARE keming CURSOR FOR SELECT distinct jiben1.xuehao FROM jiben1 where jiben1.banming=:。 open keming。 (str) end for close keming。其他的按鈕則是記錄的前后滾動及退出。 成績查詢窗體的設(shè)計 下面介紹成績查詢界面，通過該窗口可以查詢到學(xué)生的成績。在這里要強調(diào)的是要在文本框內(nèi)輸入要查的條件，點擊查詢或按enter 鍵便可以得到信息。下圖即為成績查詢的窗體 : 本統(tǒng)在設(shè)計報表時是通過 group 風(fēng)格的數(shù)據(jù)窗口實現(xiàn) 的，可以動態(tài)的顯示當(dāng)前的選修方向。和此相似的窗口有打印成績報告表補考通知單，在次就不一一列出，但在技術(shù)方面也有不同。當(dāng)信息過多時要備份，需要數(shù)據(jù)時要導(dǎo)入。窗口如下： 用戶管理窗體的設(shè)計 由于系統(tǒng)中人員的變動系統(tǒng)的登陸口令也可能 會發(fā)生變化，這就要用到密碼變動?；谏鲜鲈颍以O(shè)計了“用戶維護”子模塊，它包括“密碼變動”和“增刪用戶”下面是用戶維護的窗口： 注：當(dāng)選擇好用戶名，并且密碼確認后下面的密碼修改框變亮可以修改。下面是增刪用戶的窗口： 注：當(dāng)選擇用戶名后才能刪除，并且同時提示是否真的刪除。