課程設(shè)計(jì)---公司人事管理系統(tǒng)的設(shè)計(jì)-文庫吧資料
2025-06-12 16:04本頁面
【正文】 for j = 1 to li_empt ls_empid = (j,id) ls_empname = (j,name) ls_temp = ls_empid + + ls_empname (ll_hd_lv1,ls_temp,2) next next (ll_root) (true) //destroy dt_dept //destroy dt_emp = infor_depart (sqlca) () tv_1 控件下的代碼： int li_tlv,li_maj string ls_deptid,ls_majid,ls_empid string ls_tlabel,ls_mlabel treeviewitem ltvi_tmp,ltvi_dept () //handle 為此事件的參數(shù)。 ll_root = (0,部門信息 ,1) 12 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_dutyt = ()//得到該部門下屬職務(wù) for j = 1 to li_dutyt ls_dutyid = (j,duty_id) ls_dutyname = (j,duty_name) ls_temp = ls_dutyid + + ls_dutyname (ll_hd_lv1,ls_temp,2) next next (ll_root) (true) 組織結(jié)構(gòu)窗口 首先創(chuàng)建 treeview 所需的 datawindow infor_depart（同上） Infor_major 13 Infor_employee 14 Infor_employee_one Open 事件代碼 datastore dt_dept,dt_duty,dt_maj,dt_emp long ll_root,ll_hd_lv1 integer li_deptt,li_empt,i,j string ls_deptid,ls_deptname,ls_majid,ls_majname,ls_empid,ls_empname string ls_temp dt_dept = create datastore//創(chuàng)建數(shù)據(jù)存儲對象 = infor_depart (sqlca) () dt_maj = create datastore = infor_major (sqlca) () dt_emp = create datastore = infor_employee (sqlca) () //如是寫在窗口的 open()事件，此段代碼可省略。 if dl_mima1 lr_mima and dl_mima2lr_mima then messagebox(對不起 ,密碼錯！ ) = () return end if open(wstart) close(parent) “退出”按鈕的代碼 close(parent) 組織結(jié)構(gòu)圖窗口 11 核心代碼 首先創(chuàng)建 treeview 所需的 datawindow infor_depart xx_duty1 OPEN 事件代碼： datastore dt_dept,dt_duty long ll_root,ll_hd_lv1 integer li_deptt,li_dutyt,i,j string ls_deptid,ls_deptname,ls_dutyid,ls_dutyname string ls_temp dt_dept = create datastore//創(chuàng)建數(shù)據(jù)存儲對象 = infor_depart (sqlca) () dt_duty = create datastore = xs_duty1 (sqlca) () //如是寫在窗口的 open()事件，此段代碼可省略。該菜單的具體結(jié)構(gòu)如下圖所示： 9 “登陸”按鈕的代碼 string dl_name,dl_mima1,dl_mima2,lr_name,lr_mima int i lr_name=trim() lr_mima=trim() select count(*) into :i from passem,pass 10 where =:lr_name or =:lr_name using sqlca。 connect。UID=。 // Profile 123 = ODBC = False = ConnectString=39。 它們之間關(guān)系如下圖所示： 6 “ employee”結(jié)構(gòu)如下圖所示 7 “ major”結(jié)構(gòu)如圖所示 “ depart”結(jié)構(gòu)如圖所示 “ duty”結(jié)構(gòu)如圖所示 “ pass(主管密碼 )” 結(jié)構(gòu)如圖所示 “ passem（雇員密碼）”結(jié)構(gòu)如圖所示 “ depart”表 8 “ duty”表 應(yīng)用程序的創(chuàng)建 單擊菜單 File/New 項(xiàng)，在彈出式對話框中選取 Workspace 標(biāo)簽下的Workspace，填入路徑保存；然后單擊菜單 File/New 項(xiàng)，選擇 Target 標(biāo)簽下的Application，建立 humen 的應(yīng)用。最后單擊保存按鈕，鍵入表的名字。 ： （ 1）展開數(shù)據(jù)庫目錄，選中“ Tables”，單擊鼠標(biāo)右鍵，在彈出的選單中單擊“ New Tables”，就會出現(xiàn)表的設(shè)計(jì)子窗口。 （ 5）使用默認(rèn)的用戶 UserID 項(xiàng)“ dba”和默認(rèn)的口令 Password 項(xiàng)“ sql”，單擊 ok 按鈕，就可以創(chuàng)建一個(gè) ASA 數(shù)據(jù)庫 humenresource，同時(shí) ，系統(tǒng)自動的為數(shù)據(jù)庫配置了 ODBC 和 DB Profile，并且已經(jīng)到新建的數(shù)據(jù)庫。 （ 3）雙擊 Utilities 目錄下的“ Create ASA DataBase”對話框，如圖示，彈出“ Create Server AnyWhere Database”對話框。 3 數(shù)據(jù)庫設(shè)計(jì) 設(shè)計(jì)規(guī)劃出的實(shí)體有：主管信息實(shí)體 、雇員信息實(shí)體、部門實(shí)體、職務(wù)實(shí)體。 人事主管進(jìn)行人事管理模塊：人事主管具有部門之間的人事調(diào)配權(quán)利，以及公司 人員的辭退和招聘。在刪除本部門雇員時(shí)，對應(yīng)人員的密碼會隨之注銷。同時(shí)可以進(jìn)行密碼的修改功能。 修改雇員和主管信息模塊：修改
畢業(yè)設(shè)計(jì)相關(guān)推薦
鄂ICP備17016276號-1