人事管理信息系統(tǒng)實驗報告.docx

管理信息系統(tǒng)課程設計 成員：陳紅英（組長） 周皓 盧亦天 平念 魏婷 劉雨琪 指導老師：蘇駿 任務及負責人：1. 代碼編寫及編譯：陳紅英（200906190123）2. 數(shù)據(jù)庫設計：平念（200906190125）3. 系統(tǒng)界面：劉雨琪（200906190133）4. 流程圖設計：魏婷（200906190129）5. 需求分析及數(shù)據(jù)字典：周皓（200906190134）6. 實驗報告編寫：盧亦天（200906190126） 09信息管理與信息系統(tǒng) 2011年12月29號人事管理信息系統(tǒng)開發(fā) 目錄1. 系統(tǒng)需求分析-31、系統(tǒng)概述、必要性分析-32. 數(shù)據(jù)流程圖-3、43. 登錄模塊開發(fā)-4、54. 業(yè)務流程圖-5、65. 系統(tǒng)主界面與菜單-6、76. 數(shù)據(jù)庫的設計-7、87. 系統(tǒng)功能模塊設計-8、98. 系統(tǒng)的實現(xiàn)-9、181. 登錄模塊的設計-102. 系統(tǒng)管理模塊的設計-103. 員工基本信息模塊的設計-11、12、134. 員工考勤管理模塊的設計-13、14、155. 員工工作評價管理模塊的設計-15、16、176. 員工工資管理模塊的設計-17、189. 小結-181.系統(tǒng)需求分析1.系統(tǒng)概述、必要性分析人事管理信息系統(tǒng)是任何事業(yè)單位都需要進行的一項工作，因此開發(fā)制作人事管理信息系統(tǒng)具有較大的社會現(xiàn)實意義，同時人事管理信息系統(tǒng)是一切應用系統(tǒng)的典范，它具有一切應用系統(tǒng)的特征，系統(tǒng)結構與現(xiàn)實生活緊密結合，具體直觀，具有典范的數(shù)據(jù)庫系統(tǒng)的特征。人事管理信息系統(tǒng)主要用于公司內部員工的檔案、工資、考勤、評價的管理，便于公司領導人掌握人員的動向，及時調整人才的分配，同時也減少了手工操作帶來的一些繁瑣與不便，使員工情況的記錄和統(tǒng)計變得十分簡單。2.數(shù)據(jù)流程圖系統(tǒng)登錄模塊員工及管理員均可進入。根據(jù)系統(tǒng)規(guī)定，通過身份驗證，方可進入系統(tǒng)，否則不能進。用戶登錄系統(tǒng)的程序流程如圖所示開 始顯示登錄界面用戶登錄用戶名是否存在NY用戶名是否為空YNY跳轉主界面Y密碼是否正確密碼是否為空NN3.登錄模塊的開發(fā)在工程1中添加普通窗體，將窗體命名為“xitong”，這是用戶的登錄窗口。在這個窗體中增加文字標簽“用戶名：”、“密碼：”，再增加兩個文本框和兩個命令按鈕，文本框和命令按鈕分別默認命名為“text1”、“text2”command1”和“Command2”，最后適當修改文本框和命令按鈕的Caption屬性。最終效果如圖所示。雙擊命令按鈕“Command1”，進入其Command1_Click代碼編寫狀態(tài)，輸入代碼如下：登錄模塊的代碼4.業(yè)務流程圖該人事管理信息系統(tǒng)包括系統(tǒng)管理模塊、員工基本信息模塊、員工考勤信息模塊、員工工作評價管理模塊、員工工資管理模塊?？梢詫@些模塊中的信息進行查詢和管理，即查詢、添加、修改、刪除等操作。其業(yè)務流程圖為：人事管理信息系統(tǒng)員工工資查詢員工工作評價管理員工工作評價查詢員工考勤管理員工考勤查詢員工基本信息管理退出員工基本信息查詢員工工作評價管理員工工資管理員工考勤管理員工基本信息管理重新登錄系統(tǒng)管理5.系統(tǒng)主界面與菜單設置主界面如下圖，根據(jù)系統(tǒng)設計階段對用戶類別的劃分，已經明確了各類用戶在系統(tǒng)中的操作權限。1. 操作過程及系統(tǒng)主界面與菜單如圖所示：6.數(shù)據(jù)庫的設計在F盤下新建一個文件夾命名為人事管理信息系統(tǒng)，在此文件夾下新建這個數(shù)據(jù)庫下新建數(shù)據(jù)庫，一個命名為用戶，用以存放用戶登錄信息；另一個命名為人事管理信息，在里面創(chuàng)建5張數(shù)據(jù)表，分別為：用戶信息表、員工檔案表、員工工資信息表、員工考勤信息表和員工評價信息表。正確地設置數(shù)據(jù)表中各個字段的名稱、類型、寬度等信息，并設置每個數(shù)據(jù)表的主鍵。表結構如下：用戶信息表（uid（用戶名），PWD（密碼）員工檔案信息表（ygid(員工編號)，ygname（員工姓名），ygdept(員工部門)ygsex(員工性別),ygbirthday(員工)，ygplace(員工籍貫)，yglevel(員工學歷)，ygspecial(員工專業(yè))，ygdate1(參加工作時間)，ygdate2(入黨時間)，ygbusi(職稱），ygdate3(職稱時間)，ygdate4(進入公司時間)，ygdate5(起薪時間)，ygdate6(調入部門時間)，ygno(檔案號)員工考勤信息表（kqid(編號)，kqname(姓名)，kqdate(考勤日期)，qkdays(本月天數(shù))，kqrday（公休假天數(shù)）,qktday(應出勤天數(shù))，kqwork(出勤)，kqabsent(曠工)，kqrest(年休)，kqleave(請假)，kqlate（遲到），kqearly(早退)，kqforget(忘定卡)，kqover1(假日加班)，kqover2（其它加班），kqfill(補休天數(shù))，kqgo(出差天數(shù))，kqpay(加班費)，kqdeduct(扣考核)）員工評價信息表（pjid(評價編號)，pjname(姓名)，pjno(評價代碼)，pjdate(時間)，pjresult(工作業(yè)績)，pjposition(工作態(tài)度)，pjlevel(業(yè)務水平)）員工工資信息表（gzid(工資編號)，gzname(姓名)，gzbase(底薪)，gzall(補貼)，gzbonus(獎金)，gzpay(加班)，gzdeduct(扣考核)，gzage(代扣養(yǎng)老金)，gzmedical(代扣醫(yī)療保險)，gzhouse1(代扣住房公積金)，gztotal(稅前小計)，gzduty(所得稅)，gzhouse2(房貼)，gzhouse3(房租)，gzlaborage(實發(fā)工資)，gzdate(時間)）7.系統(tǒng)功能模塊設計選取了與人事管理相關的檔案、評價、考勤和工資發(fā)放等流程進行設計，系統(tǒng)由系統(tǒng)管理、員工基本信息管理、員工考勤管理、以工作評價信息管理和員工工資管理等模塊組成，各個功能模塊介紹如下：1. 系統(tǒng)管理模塊：在這個模塊中，可以通過身份驗證重新登錄和退出系統(tǒng)。2. 員工基本信息模塊：在這個模塊中，員工可以查詢自己的檔案情況，并且可以根據(jù)編號查詢他人的檔案情況，但不能修改；而管理員可以管理所有員工的檔案信息，可以進行查詢、添加、刪除等操作。3. 員工考勤信息模塊：在這個模塊中，員工可以查詢自己的考勤情況，并且可以根據(jù)編號查詢他人的考勤情況，但不能修改；而管理員可以管理所有員工的考勤信息，可以進行查詢、添加、刪除等操作。4. 員工工作評價管理模塊：在這個模塊中，員工可以查詢自己的工作情況，并且可以根據(jù)編號查詢他人的工作情況，但不能修改；而管理員可以管理所有員工的工作信息，可以進行查詢、添加、刪除等操作。5. 員工工資管理模塊：在這個模塊中，員工可以查詢自己的工資情況，并且可以根據(jù)編號查詢他人的工資情況，但不能修改；而管理員可以管理所有員工的工資信息，可以進行查詢、添加、刪除等操作。8.系統(tǒng)的實現(xiàn)1. 登錄模塊的設計：運行程序首先看到的是登錄界面，輸入用戶名和密碼（分別為yy,123）,單擊【確定】，進入程序主界面，如圖所示： 系統(tǒng)登錄界面 2. 系統(tǒng)管理模塊的設計用戶單擊【系統(tǒng)】/【重新登錄】項即可退出當前界面并重新登錄，單擊【系統(tǒng)】/【退出】項即可退出系統(tǒng)。 主程序界面3. 員工基本信息模塊的設計：用戶在主界面中單擊【員工基本信息】/【查詢員工基本信息】即可進入到員工信息查詢界面，在主界面單擊【員工基本信息】/【員工信息管理】項，即可進入員工信息管理界面，如圖所示：這部分代碼實現(xiàn)如下：Private Sub Command1_Click()Dim msg As Integermsg = InputBox(請輸入編號, 查找記錄)Adodc1.Recordset.Find ygid= & msg & , , , 1If Adodc1.Recordset.EOF ThenMsgBox 無此員工信息, , 提示End IfEnd SubPrivate Sub Command2_Click()Dim ask As IntegerOn Error Resume Nextask = MsgBox(確定刪除嗎？, vbYesNo)If ask = 6 ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLastEnd IfEnd SubPrivate Sub Command3_Click()Adodc1.Recordset.MovePreviousIf Adodc1.Recordset.BOF ThenAdodc1.Recordset.MoveFirstMsgBox (已經是第1條記錄了！)End IfEnd SubPrivate Sub Command4_Click()Adodc1.Recordset.MoveFirstEnd SubPrivate Sub Command5_Click()Adodc1.Recordset.AddNewMsgBox 您已成功添加！End SubPrivate Sub Command6_Click()Adodc1.Recordset.MoveLastEnd SubPrivate Sub Command7_Click()Adodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF ThenAdodc1.Recordset.MoveLastMsgBox (已經是最后1條記錄了！)End IfEnd SubPrivate Sub Command9_Click()End SubPrivate Sub Command8_Click()Form2.ShowEnd Sub4.員工考勤管理模塊的設計：用戶在主界面中單擊【員工考勤管理】/【查詢員工考勤】即可進入到員工信息查詢界面，在主界面單擊【員工考勤管理】/【員工考勤管理】項，即可進入員工考勤管理界面，如圖所示：這部分代碼實現(xiàn)如下：Private Sub Command1_Click()Form2.ShowEnd SubPrivate Sub Command2_Click()Dim ask As IntegerOn Error Resume Nextask = MsgBox(確定刪除嗎？, vbYesNo)If ask = 6 ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLastEnd IfEnd SubPrivate Sub Command3_Click()Dim msg As Integermsg = InputBox(請輸入編號, 查找記錄)Adodc1.Recordset.Find kqid= & msg & , , , 1If Adodc1.Recordset.EOF ThenMsgBox 無此員工信息, , 提示End IfEnd SubPrivate Sub Command4_Click()Adodc1.Recordset.AddNewMsgBox 您已成功添加！End Sub5.員工工作評價管理模塊的設計：用戶在主界面中單擊【員工工作評價管理】/【查詢工作評價信息】即可進入到員工信息查詢界面，在主界面單擊【員工工作評價管理】/【工作評價信息管理】項，即可進入員工考勤管理界面，如圖所示：這部分代碼實現(xiàn)如下：Private Sub Command1_Click()Dim msg As Integermsg = InputBox(請輸入編號, 查找記錄)Adodc1.Recordset.Find pjid= & msg & , , , 1If Adodc1.Recordset.EOF ThenMsgBox 無此員工信息, , 提示End IfEnd SubPrivate Sub Command2_Click()Adodc1.Recordset.AddNewMsgBox 您已成功添加！End SubPrivate Sub Command3_Click()Dim ask As IntegerOn Error Resume Nextask = MsgBox(確定刪除嗎？, vbYesNo)If ask = 6 ThenAdodc1.Recordset.DeleteAdodc1.Recordset.MoveNextIf Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveLastEnd IfEnd SubPrivate Sub Command4_Click()Form2.ShowEnd Sub6. 員工工資管理模塊的設計：用戶在主界面中單擊【員工工資管理】/【查詢員工工資信息】即可進入到員工信息查詢界面，如圖所示：這部分代碼實現(xiàn)如下：9.小結： 在組員的共同努力、老師的指導、同學的幫助和課本的參考下，我們的課程設計圓滿完成，