用pb開發(fā)的人事管理系統(tǒng)分析與設(shè)計(已改無錯字)
2023-02-13 13:44:11 本頁面
【正文】 位號 integer 10 4 職位名稱 varchar 10 5 性別 char 2 6 籍貫 varchar 10 7 民族 varchar 10 8 身份證號 varchar 15 表 36 職位表 字段 字段名 類型 長度 1 職位號 integer 10 2 職位名稱 varchar 10 表 37 職位變動表 字段 字段名 類型 長度 1 員工編號 integer 10 2 職位號 integer 10 3 職位名稱 varchar 10 代碼設(shè)計 代碼是代表事物名稱、屬性、狀態(tài)等的符號，為了方便于計算機(jī)處理，一般用數(shù)字、字母或它用 PB 開發(fā)的人事管理系統(tǒng)分析與設(shè)計 14 們的組合來表示。 代碼分為順序碼、區(qū)間碼和記憶碼，本系統(tǒng)采用的是順序碼。順序碼是以連續(xù)的數(shù)字或字符代表編碼對象的代碼。 員工編號的代碼設(shè)計：采用順序碼，以一連串的數(shù)字來代表編碼對象，使信息在項目表中按出現(xiàn)的數(shù)字順序排列。 職位號的代碼設(shè)計：：采用順序碼，以一連串的數(shù)字來代表編碼對象，使信息在項目表中按出現(xiàn)的數(shù)字順序排列。 系統(tǒng)安全設(shè)計 主要針 對提高數(shù)據(jù)的安全保密性方面而言： ﹡對系統(tǒng)中的數(shù)據(jù)庫定義訪問權(quán)限。只有管理員輸入正確密碼才能訪問，并對功能進(jìn)行操作，其他用戶無訪問權(quán)。 ﹡提供數(shù)據(jù)備份及恢復(fù)功能，以防系統(tǒng)遭到嚴(yán)重危害后，可恢復(fù)到較早前的狀態(tài)。 4 系統(tǒng)實(shí)施 源程序代碼 應(yīng)用程序的 open代碼 。 // Profile Renshi = ODBC = False = Connectstring=39。DSN=Renshi。uid=dba。pwd=sql39。 connect。 open(w_login) close代碼： disconnect。 登陸模塊，如圖 41所示 用 PB 開發(fā)的人事管理系統(tǒng)分析與設(shè)計 15 圖 41 登陸界面 設(shè)置權(quán)限，只有管理員輸入正確的用戶名 admin和密碼 123后才可以進(jìn)入系統(tǒng)主界面，進(jìn)行功能操作。 “登陸”的 click代碼如下： string username,password username= password= if username=admin and password=123 then messagebox(提示 ,登錄成功！ ) open(w_main) close(w_login) else messagebox(提示 ,用戶名或密碼輸入錯誤，請重新輸入！ ) end if “退出”的 click代碼： halt 輸入的用戶名和密碼正確后，進(jìn)入主界面，主界面如圖 42所示。 圖 42 系 統(tǒng)主界面 “員工管理”的 click 代碼： open(w_usermanage) “職位管理”的 click 代碼： open(w_position) “職位變動管理”的 click 代碼： open(w_change) “退出”的 click代碼： close(w_main) 點(diǎn)擊員工管理，進(jìn)入員工管理功能界面，如圖 43所示 用 PB 開發(fā)的人事管理系統(tǒng)分析與設(shè)計 16 圖 43 員工管理界面 “預(yù)覽”的 click代碼： // Profile 人事管理 = ODBC = False = Connectstring=39。DSN=人事管理 39。 connect。 (sqlca) () “增加”的 click代碼： (0) =true () (()+1) “刪除”的 click代碼 (0) “保存”的 click代碼： // Profile 人事管理 = ODBC = False = Connectstring=39。DSN=人事管理 39。 connect。 () int row,id,posid string posname 用 PB 開發(fā)的人事管理系統(tǒng)分析與設(shè)計 17 if ()=1 then row=() id=(row,員工編號 ) posid=(row,職位號 ) posname=(row,職位名稱 ) insert into change(員工編號 ,職位號 ,職位名稱 ) values(:id,:posid,:posname)。 if =0 then messagebox(提示 ,保存成功！ ) else messagebox(提示 ,更新職位變化表失敗！ ) end if else messagebox(提示 ,增加員工失敗！ ) end if “退出”的 click代碼： close(parent) “查詢”的 click代碼： (員工編號 =++) () 主界面點(diǎn)擊“職位管理”進(jìn)入職位管理模塊，如圖 44所示。 圖 44 職位管理界面 預(yù)覽的“ click”代碼： // Profile 人事管理 = ODBC = False 用 PB 開發(fā)的人事管理系統(tǒng)分析與設(shè)計 18 = Connectstring=39。DSN=人事管理 39。 connect。 (sqlca) () “增加”的 click代碼： (0) =true () (()+1) “刪除”的 click代碼
規(guī)章制度相關(guān)推薦
鄂ICP備17016276號-1