課程設(shè)計(jì)---公司人事管理系統(tǒng)的設(shè)計(jì)(參考版)
2025-06-08 16:04本頁面
【正文】 10 總分 五分制成績 評(píng)閱教師簽字： 年 月 日 。 30 工作量 程序功能完善，工作量飽滿 。 30 程序質(zhì)量 代碼正確，質(zhì)量高；應(yīng)用知識(shí)點(diǎn)多，控件應(yīng)用不單一。 (sqlca) (bumenid) 主界面運(yùn)行窗口 38 程序設(shè)計(jì)方法課程設(shè)計(jì)評(píng)分表 程序設(shè)計(jì)方法課程設(shè)計(jì)評(píng)分表 評(píng)分項(xiàng)目 具 體 要 求 分值 評(píng) 分 選題質(zhì)量 選題符合要求，體現(xiàn)綜合訓(xùn)練基本要求；題 目難易適 度。 dw_1 下的代碼為： 35 統(tǒng)計(jì)圖窗口 現(xiàn)狀 創(chuàng)建 graph 形式的 datawindow。 messagebox(提示 ,數(shù)據(jù)保存失敗 ) end if end if 34 人事調(diào)動(dòng) 此窗口的創(chuàng)建和“雇員增刪”窗口的創(chuàng)建類似，而且更加簡單。 ) end if end if “刪除”按鈕下的代碼是： int i,j 33 string dw j=() dw=(j,id) (dw) i=messagebox(提示 ,您真的要?jiǎng)h除該記錄嗎？,question!,yesnocancel!,3) if i=1 then (0) (0) “添加”按鈕下的代碼是： string dwtj int i i=() (i+1) (id) (i+1) () “更新”按鈕下的代碼是： int i_count,j_count i_count=() j_count=() if i_count0 or j_count 0 then if ()=1 and ()=1 then mit using sqlca。021010139。 messagebox(提示 ,您已經(jīng)成功添加 +string(i_count)+條數(shù)據(jù)，新添加的雇員登陸密碼為“ 0000”！ ) else rollback using sqlca。 if dl_mimalr_mima then messagebox(提示 ,對(duì)不起，您輸入的密碼錯(cuò)誤！請重新輸入。 messagebox(提示 ,數(shù)據(jù)保存失敗 ) end if end if 27 增加刪除雇員 28 dw_1 數(shù)據(jù)窗口的創(chuàng)建同“修改雇員信息”窗口所創(chuàng)建名為 lr_increase1 的datawindow 一樣 .dw_2（用于修改密碼表中的信息）的創(chuàng)建如下： “登陸”按鈕下的代碼是 : string lr_id,lr_mima,dl_id,dl_mima,partid int i lr_id = trim() lr_mima=trim() select count(*) into :i from pass where id=:lr_id using sqlca。 ) else (depid) end if 數(shù)據(jù)窗口 dw_1 下得代碼是： “更新”按鈕下的代碼是： int i_count i_count=() if i_count0 then if ()=1 then mit using sqlca。 if i1 then messagebox(對(duì)不起 ,該用戶不存在！ ) = = () return end if select password,part into :dl_mima,:depid 26 from pass where id=:lr_id。 if y_mimaymima then messagebox(提示 ,您的原密碼錯(cuò)誤，請重新輸入！ ) else if xmimaqmima then messagebox(提示 ,確認(rèn)密碼輸入錯(cuò)誤，請重新輸入 ) = = () else update pass set password=:xmima where id=:id。 if y_mimaymima then messagebox(提示 ,您的原密碼錯(cuò)誤，請重新輸入！ ) else if xmimaqmima then messagebox(提示 ,確認(rèn)密碼輸入錯(cuò)誤，請重新輸入 ) = = () else update passem set password=:xmima where id=:id。 messagebox(提示 ,數(shù)據(jù)保存失敗 ) end if 22 修改密碼窗口 “修改密碼”按鈕下的代碼： string id,ymima,xmima,qmima,y_mima int i id = trim() ymima=trim() xmima=trim() qmima=trim() select count(*) into :i from passem,pass where =:id or =:id using sqlca。 if xs_mima = mima then (sqlca) (cxeid) else messagebox(提示 ,密碼輸入錯(cuò)誤，請重新輸入！ ) = end if “保存”按鈕下的代碼是： string cxeid cxeid=trim() () if =0 then mit using sqlca。 =maj_name =maj_num (sqlca) (bumenname) 修改個(gè)人信息窗口 20 員工信息窗口的創(chuàng)建： 創(chuàng)建名為“ xg_emp”的 datawindow： 在 job 列懸掛 xg_job 數(shù)據(jù)窗口， xg_job 的創(chuàng)建如下： 21 “登陸”按鈕下的代碼是： string mima,xs_mima,cxeid int i cxeid=trim() mima=trim() select count(*) into :i from passem where id=:cxeid using sqlca。 ll_root = (0,部門信息 ,1) li_deptt = ()//得到部門個(gè)數(shù) for i = 1 to li_deptt ls_deptid = (i,depart_id) ls_deptname = (i,depart_name) ls_temp = ls_deptid + + ls_deptname ll_hd_lv1 = (ll_root,ls_temp,1) () (ls_deptid)//為所建數(shù)據(jù)窗口中聲明的參數(shù) li_empt = ()//得到該部門的人數(shù)
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號(hào)-1