人事檔案管理系統(tǒng)

1、令上 助 表 管 理功能：設(shè)置使用人事管理系統(tǒng)的用戶及其使用整個(gè)人事管理系統(tǒng)由多個(gè)功能模塊組成j同的模塊完成不同的功能，所以可以為不 同的職工分配不同的功能，使其具有不同的權(quán)限， 完成其權(quán)限所對(duì)應(yīng)的功能，從而很好地管理好整個(gè)系統(tǒng)。操作：選擇該功能后，屏幕上顯示出所有人事管理系統(tǒng)員工的用戶名稱。這時(shí)，可進(jìn)行 如下的操作：1:增加卄權(quán)限。所輸入得模錄名一定不能重復(fù)。2:修改權(quán)限。編輯I加一用戶。按該按鈕后，就可輸入新用戶的內(nèi)容，如：用戶名稱，密碼和:修改用戶設(shè)置。按該按鈕后，就可修改選中用戶的用戶名，密碼和權(quán)限，每人事檔案管理系統(tǒng)分析時(shí)間行進(jìn)到21世紀(jì)，以計(jì)算機(jī)技術(shù)為主體的高新技術(shù)群體已經(jīng)將觸角深

2、入到國(guó)發(fā)經(jīng)濟(jì) 的方方面面。在市場(chǎng)經(jīng)濟(jì)的大環(huán)境下，越來越多的人士逐漸認(rèn)識(shí)到用計(jì)算機(jī)技術(shù)進(jìn)行名類管 理，交流的便捷?；凶顚?shí)出的是要算在廠礦企事業(yè)單位的人事檔案的計(jì)算機(jī)管理了。人事檔案數(shù)據(jù)庫(kù)管理系統(tǒng)是一個(gè)為適應(yīng)當(dāng)前各個(gè)行業(yè)對(duì)人事信息管理的迫志需求而設(shè) 計(jì)開發(fā)的軟件系統(tǒng)。該系統(tǒng)的前臺(tái)采用的是VB6.0軟件開發(fā)系統(tǒng)，后臺(tái)數(shù)據(jù)庫(kù)采用的是Access20RR 數(shù)據(jù)庫(kù)。整個(gè)系統(tǒng)有數(shù)據(jù)庫(kù)文件和數(shù)據(jù)庫(kù)管理系統(tǒng)兩大部他構(gòu)成。后臺(tái)的Access 20RR數(shù)據(jù)庫(kù)文件是集中存儲(chǔ)并管理分類人事檔案信息的大本營(yíng)，而前臺(tái)的數(shù)據(jù)庫(kù)管理系統(tǒng)是用來為數(shù)據(jù)庫(kù)中的各種資料進(jìn)行各種基本操作和管理。一、總體結(jié)構(gòu)和主要功能人事檔案管理系統(tǒng)主

3、要包含職工個(gè)人自然情況，工作情況，簡(jiǎn)歷，政治情況等各方面信息，內(nèi)容比較龐大復(fù)雜。同時(shí)還綜合考慮檔案管理工作的性質(zhì)，總結(jié)歸納出所需實(shí)現(xiàn)的功能。主要是為人事檔案進(jìn)行服務(wù)，對(duì)人事的變動(dòng)、人事資料、以及人事資料的查詢，統(tǒng)計(jì)等功能。 總體上說具有編輯，查詢，用戶管理，圖表統(tǒng)計(jì)等功能。一、靈活的數(shù)據(jù)記錄編輯功能，可以隨時(shí)對(duì)記錄進(jìn)行增加，修改，更新，刪除，瀏覽等編輯操作。并將查詢方式有機(jī)溶入編輯界面，可以實(shí)現(xiàn)對(duì)某項(xiàng)記錄定位，再進(jìn)行編輯， 修改，更新。二、多個(gè)數(shù)據(jù)庫(kù)表的任意組合條件的查詢。便于在實(shí)際檔案管理操作中呆對(duì)保種情況， 多種條件下的人員情況進(jìn)行統(tǒng)計(jì)查看。三、具備分級(jí)用戶權(quán)限管理設(shè)置 ，以確保檔案的保密

4、性和安全性。四、具有分類統(tǒng)計(jì)，使用圖表顯示的功能，該統(tǒng)計(jì)圖表可根據(jù)數(shù)據(jù)庫(kù)中記錄情況的變化而變化。五、具有比較友好的人機(jī)界面，各種操作可以在直觀的界面上通過人機(jī)交互式進(jìn)行。六、具有輔助表管理功能，主要是對(duì)“學(xué)歷”表中的字段“學(xué)歷”，“部門表”中的字段“部門”，“政治面貌” 表中的字段“政治面貌”，“職稱” 表中的字段“職稱”，進(jìn)行 添加，修改，刪除操作。人事檔案管理系統(tǒng)模型如下：二、各模塊功能1、用戶管理(1)設(shè)置用戶一權(quán)限對(duì)應(yīng)系統(tǒng)菜單上的一項(xiàng)功能，可為該用戶選擇任意的權(quán)限。用戶在使用本系統(tǒng)時(shí)， 要求輸入用戶的口令，為了安全，用戶需建立一個(gè)只有自己才知道的特殊口令，通常，系統(tǒng)的權(quán)限分為三大部分，

5、即：管理權(quán)限：設(shè)置用戶和系統(tǒng)參數(shù)。輸入權(quán)限：檔案卡片生成、個(gè)人簡(jiǎn)歷輸入和家庭成員輸入。查詢權(quán)限：檔案查詢、檔案統(tǒng)計(jì)。根據(jù)需要，可以把這些功能分配給不同的員工。3:刪除：刪除用戶。按該按鈕后，經(jīng)確認(rèn)，則選中的用戶被刪除（2）用戶登錄功能：用戶登錄進(jìn)入人事管理系統(tǒng)。系統(tǒng)啟動(dòng)后，首先要做的就是用戶登錄。若不登錄 系統(tǒng)，所有功能都無法使用。用戶只有登錄系統(tǒng)后，根據(jù)其具有的權(quán)限，才能執(zhí)行一定的操 作。操作：進(jìn)入該功能后，要求輸入用戶的登錄名及其口令，只有其登錄名和口令完全正確，才能進(jìn)入工資管理系統(tǒng)。系統(tǒng)會(huì)根據(jù)為用戶分配的權(quán)限，設(shè)置其對(duì)應(yīng)的功能為有效，用戶就可操作該功能。2、輔助表管理輔助表管理功能是高級(jí)

6、管理員及中級(jí)管理員擁有的權(quán)限，它的功能是對(duì)數(shù)據(jù)庫(kù)進(jìn)行新表的添加。主要是對(duì)“學(xué)歷”表中的字段“學(xué)歷”，“部門表”中的字段“部門”，“政治面貌”表中的字段“政治面貌”，“職稱” 表中的字段“職稱”，進(jìn)行添加，修改，刪除操作。通過 它的這個(gè)功能可以有效的對(duì)本單位人事部門的擴(kuò)充進(jìn)行及時(shí)的計(jì)算機(jī)管理。只要管理員進(jìn)行簡(jiǎn)單的數(shù)據(jù)字段添加即可。3、檔案編輯檔案編輯模塊中有4個(gè)子模塊。他們是檔案卡片、個(gè)人簡(jiǎn)歷、家庭成員、歷史檔案等功 能。這些功能因管理員的權(quán)限不同所表示出的功能使用也不同，普通管理員沒有數(shù)據(jù)修改及刪除的權(quán)利。在這些功能里詳細(xì)的記錄了所有單位員工的資料。（1）檔案卡片管理功能：對(duì)全部員工的信息進(jìn)行

7、瀏覽；添加記錄；對(duì)員工的詳細(xì)資料進(jìn)行修改；刪除員 工記錄；按編號(hào)進(jìn)行查找，快速查找該員工的詳細(xì)資料；按某一字段的內(nèi)容進(jìn)行篩選， 篩選最后的結(jié)果是將和所選內(nèi)容相同的全部找到。（2）個(gè)人簡(jiǎn)歷管理功能：該模塊與檔案卡片管理類似，但是在界面設(shè)計(jì)上有一些不同，可以對(duì)員工個(gè)人 簡(jiǎn)歷進(jìn)行全局瀏覽。除了瀏覽信息的功能外，還有一些基本操作的功能：添加記錄； 對(duì)已有員工的個(gè)人簡(jiǎn)歷信息進(jìn)行修改；刪除員工個(gè)人簡(jiǎn)歷的記錄；可以按編號(hào)進(jìn)行查 找，快速查找該員工個(gè)人簡(jiǎn)歷的資料。（3）家庭成員管理功能：對(duì)全部員工的家庭成員信息進(jìn)行編輯，瀏覽；實(shí)現(xiàn)方法同個(gè)人簡(jiǎn)歷功能實(shí)現(xiàn)的方法一樣。（4）歷史檔案管理功能：對(duì)于一些從檔案卡片中刪

8、除的員工信息記錄，需要存下來以供將來進(jìn)行統(tǒng)計(jì)。此模塊的主要功能就是完成對(duì)從檔案卡片中刪除的員工信息記錄的保存工作。4、檔案查詢功能:對(duì)檔案卡片的查詢功能，包括唯一條件查詢和模糊條件查詢。該模塊的主要分為兩部分：一是完成選擇要查詢的字段、條件操作符等功能；二是用來 顯示用戶進(jìn)行查詢的完整條件及查詢、退出按鈕。當(dāng)查詢的條件選擇完畢，點(diǎn)擊確定按鈕， 在顯示部分顯示出來后， 點(diǎn)擊查詢按鈕才正式完成該模塊的查詢功能。會(huì)調(diào)出另外一個(gè)窗口來顯示用戶所要查詢的符合條件的所有員工的資料。根據(jù)檔案卡片中的各字段， 選擇相應(yīng)的條件操作符輸入相應(yīng)的值即可進(jìn)行檔案查詢。查出的記錄可按兩種形式瀏覽：只有該員工檔案卡片中的

9、資料；綜合該員工檔案卡片、個(gè)人簡(jiǎn)歷、家庭成員中的所有資料。查詢用戶可以 按自己的需要選擇兩種瀏覽方式。在這里可以查到符合程序要求的任何信息。再這里的選項(xiàng) 中輸入規(guī)定的范圍即可查到相關(guān)的人事信息。5、檔案統(tǒng)計(jì)功能：綜合統(tǒng)計(jì)、單項(xiàng)統(tǒng)計(jì)和圖表統(tǒng)計(jì)。單項(xiàng)統(tǒng)計(jì)是輸入規(guī)定的要求后進(jìn)行的統(tǒng)計(jì)它可以較詳細(xì)直觀的統(tǒng)計(jì)出要求的結(jié)果。圖表統(tǒng)計(jì)可以詳細(xì)的按性別、按政治面貌、按職稱級(jí)別、按學(xué)歷以直方圖和餅型圖進(jìn)行表示。檔案統(tǒng)計(jì)模塊，分三個(gè)小模塊：（1）綜合統(tǒng)計(jì)：綜合統(tǒng)計(jì)中將單位內(nèi)所有的人事信息進(jìn)行全面的統(tǒng)計(jì)。該模塊主要是綜合各方面的人數(shù)統(tǒng)計(jì)；對(duì)各部門的人數(shù)、符合檔案卡片中各字段條件的員工人數(shù)、各年齡段人數(shù)以及工齡段人數(shù)

10、等的統(tǒng)計(jì)。并且本查塊提供重新統(tǒng)計(jì)功能，方便在一定時(shí)間段內(nèi)對(duì)各項(xiàng)人數(shù)的進(jìn)行更新，保持?jǐn)?shù)據(jù)庫(kù)中數(shù)據(jù)的即時(shí)性。（2）單項(xiàng)統(tǒng)計(jì)：是按各單項(xiàng)條件對(duì)人數(shù)的統(tǒng)計(jì)功能。分為四部分：在選擇分組統(tǒng)計(jì)的字段，一次只可選擇一個(gè)字段；可選擇統(tǒng)計(jì)條件，包括條件操作符及條件值；可選 擇統(tǒng)計(jì)是否包括平均工資匯總及工資總額匯總；可顯示要統(tǒng)計(jì)的完整條件，包括上述 的分組字段、完整的統(tǒng)計(jì)條件及是否包括各類工資匯總。每完成一項(xiàng)選擇，要點(diǎn)擊確 定按鈕，各條件才能在右下角顯示出來以供統(tǒng)計(jì)。可同時(shí)選擇分組統(tǒng)計(jì)、條件統(tǒng)計(jì)、工資匯總，也可只選擇一項(xiàng)來進(jìn)行統(tǒng)計(jì)。（3）圖表統(tǒng)計(jì)：將各類統(tǒng)計(jì)圖表化。用戶可以選擇按性別、政治面貌、職稱級(jí)別或?qū)W歷進(jìn)行人

11、數(shù)統(tǒng)計(jì)。用戶還可以選擇直方圖或餅形圖的圖表顯示方式三、功能的實(shí)現(xiàn)方法及實(shí)現(xiàn)的代碼1、本系統(tǒng)中VB6與數(shù)據(jù)庫(kù)是如何連接的？寫出簡(jiǎn)要代碼？本系統(tǒng)采用的數(shù)據(jù)庫(kù)是 Access20RR數(shù)據(jù)庫(kù)，使用是 ADO （ Active Data Object） 代碼訪問方式，它通過在程序中的一段代碼與數(shù)據(jù)庫(kù)建立連接。代碼如下：Private cnn As New ADODB.Co nn ecti onDim StrSql As Stri ngcnn .Provider = Microsoft.Jet.OLEDB.4.0cnn .Co nn ectio nStri ng = d:VBAccess20RRrs.md

12、bcnn. Ope n注：在進(jìn)行ADC方式數(shù)據(jù)庫(kù)的連接時(shí)，要先進(jìn)行類型庫(kù)引用：Microsoft ActiveR Data Object 2.6 librarR2、瀏覽、恢復(fù)、添加、保存、修改、查找、篩選、解除篩選、排序、恢復(fù)排序、退出各功能是如何實(shí)現(xiàn)的？寫出簡(jiǎn)要代碼。瀏覽：先將數(shù)據(jù)庫(kù)打開，然后選擇所需的表進(jìn)行操作。代碼如下：Public rs1 As New ADODB.RecordsetDim StrSql As Stri ngStrSql = select R from 檔案卡片 order bR 職工編號(hào)”rsl.ActiveC onn ectio n = cnnrsl.CursorT

13、Rpe = adOpe nKeRset rsl.CursorLocati on = adUseClie nt rsl.LockTRpe = adLockOptimistic rsl.Ope n StrSql移動(dòng)記錄指針有四種方法： （1）記錄首：rsl.MoveFirst （ 2）前一個(gè)：rsl.MovePrevious （3 ）后一個(gè)：rsl.MoveNeRt （ 4）記錄尾 rsl.MoveLast恢復(fù)：恢復(fù)功能是在用戶選擇添加或修改后出現(xiàn)的，是為了使用戶在進(jìn)行誤操作后 能夠恢復(fù)數(shù)據(jù)的一個(gè)功能。代碼為：rsl.Ca ncelUpdate添加：在編輯窗口中，先將文本框清空，然后進(jìn)行添加。并且

14、要判斷所輸入的信息與所建的表的格式符合。最后添加到庫(kù)中。代碼為：rsl.AddNew保存：rsl.Update修改：修改的的功能是與添加類似的，但是他會(huì)更新數(shù)據(jù)庫(kù)中被要求修改的記錄。 先將各個(gè)字段所對(duì)應(yīng)的控件置為可用，然后進(jìn)行修改。修改之后保存。RsMai n.rs2.Update temp = RsMa in .rs2.Fields(”RsMai n.rs2.RequerRRsMa in .rs2.Fi nd End If查詢：代碼為，StrSql = select R fromIf AddNewOrModifR = ModifR The n序號(hào)”)序號(hào)=& temp & ”, , , ad

15、BookmarkFirst個(gè)人簡(jiǎn)歷order bR職工編號(hào)”RsMai n.rs2.ActiveC onn ectio n = RsMa nRsMa in .rs2.CursorTRpe = adOpe nKeRsetRsMai n. rs2.CursorLocatio n = adUseClie ntRsMa in. rs2.LockTRpe = adLockOptimisticRsMa in .rs2.Ope n StrSqlSet DataGrid1.DataSource = RsMai n.rs2篩選：代碼為，F(xiàn)ieldsName = RsMain.lrs1.Fields(”

16、 職工編號(hào) ”).NameIf Len (Trim(Label1.Captio n) = 0 The nFilterStr = FieldsName & = NullElseFilterStr = FieldsName & = & ” & Label1.Caption & ”End IfRsMai n. lrs1.Filter = FilterStr排序：代碼為，RsMa inrs1.Sort = FieldsName ASCENDING DESCENDING刪除：代碼為，RsMai n. rs2.Delete退出：關(guān)閉記錄集操作，代碼為，RsMa in. rs2.closeUn Load M

17、e3. 本系統(tǒng)瀏覽和修改是兩個(gè)界面，是如何實(shí)現(xiàn)的？寫出基本思想。系統(tǒng)中瀏覽和修改的界面不同是因?yàn)樵邳c(diǎn)擊相應(yīng)的按鈕時(shí)通過布爾型變量控制不同控件的Enabled屬性為True或False來實(shí)現(xiàn)的。在瀏覽時(shí)信息的顯示窗口采用的是Lable控件不能進(jìn)行修改，并且將他們Enabled設(shè)置為True，而將和他們放在一起的其他控件Enabled設(shè)置為False，而在進(jìn)行修改時(shí)瀏覽時(shí)顯示信息的lable控件的Enabled屬性變?yōu)镕alse而和他們重合的其他控件的Enabled屬性變?yōu)門rue，這樣就實(shí)現(xiàn)了瀏覽與修改的不同的兩個(gè)界面。4. 照片是如何使用的？寫出基本思想。照片在系統(tǒng)文件的 PICTURE文件夾

18、下，照片的文件名與系統(tǒng)中職工編號(hào)相對(duì)應(yīng)， 當(dāng)選擇某個(gè)職工時(shí)，程序讀取他的職工編號(hào)與照片文件名一致時(shí)就會(huì)顯示照片。如果將 照片文件名更改，則系統(tǒng)就不能正確的讀取照片的信息了。代碼為：Dim i As In tegerDim bool As Boolea nDim fname As Stri ngDim picturepath As Stringfname = Trim(Label1.Caption) & .bmpIf Dir(f:VBLpicture & fname) = Then bool = FalseElsebool = TrueEnd IfIf bool = True The npict

19、urepath = f:VBLpicture & fname Elsepicturepath =End Iflmage1.Picture = LoadPicture(picturepath)5. 單擊照片可以顯示該記錄的個(gè)人簡(jiǎn)歷和家庭成員，該功能是如何實(shí)現(xiàn) 的？寫出基本思想。單擊照片時(shí)激發(fā)了 Image控件的click事件，程序會(huì)按調(diào)用同樣職工編號(hào)的職工資料 顯示窗體(Rs1 Rs2Edit)。這樣就實(shí)現(xiàn)了單擊照片顯示個(gè)人簡(jiǎn)歷和家庭成員。代碼為，Private Sub lmage1_Click()If Rs1Edit.TeRt1.Visible And Len (Trim(Rs1Edit.Te

20、Rt1.TeRt) = 0 The nERit SubElseLoad Rs1A ndRs2EditRs1A ndRs2Edit.Show 1End IfEnd Sub6. 本系統(tǒng)中的三個(gè)表，檔案卡片表、個(gè)人簡(jiǎn)歷表和家庭成員表是如何實(shí)現(xiàn) 數(shù)據(jù)參數(shù)完整性的(連續(xù)更新、連鎖刪除)？在數(shù)據(jù)庫(kù)的關(guān)系中右鍵單擊表之間的連線可以彈出編輯關(guān)系，選中實(shí)施參照完成性，選中級(jí)連更新相關(guān)字段、級(jí)連刪除相關(guān)記錄就可以實(shí)現(xiàn)數(shù)據(jù)的連續(xù)更新和連鎖刪除了。四、在查詢模塊中，下述功能是如何實(shí)現(xiàn)的？1.請(qǐng)選擇字段列表框中的內(nèi)容是從表中取出的字段名，簡(jiǎn)述基本方法 并寫出簡(jiǎn)要代碼。Dim i As In tegerList1.Cle

21、arFor i = 0 To RsMain.rs1.Fields.Count - 1List1.AddItem RsMai n.rs1.Fields(i).NameNeRt iList2.ClearList2.AddItem 等于”List2.AddItem 不等”List2.AddItem 小于”List2.AddItem 小于等于”List2.AddItem 大于”List2.AddItem 大于等于”List2.AddItem 在之間”List2.AddItem 不在之間”List2.AddItem Like操作符”2.多個(gè)條件的組合查詢代碼如下:Public Qcnn As New A

22、DODB.Co nn ectionPublic Qrs As New ADODB.Recordset s1 = & List1 List(List1. ListI ndeR) & s2 = List2 .L ist（List2 .L istl ndeR）s3 = TeRtl.TeRt s = si & s2 & s3Dim StrSql As Stri ngQcnn .Provider = MSDataShape.1Qcnn .Co nn ectio nStri ng = Data Source = f:VBAccess20RRrs.mdb _& ; Data Provider=Microso

23、ft.Jet.OLEDB.4.0Qcnn. Ope nStrSql = SHAPE select R from檔案卡片 where & s & ” order bR職工編號(hào) & APPEND （select R from 個(gè)人簡(jiǎn)歷 RELATE 職工編號(hào) to 職工編號(hào)），” & ” （select R from家庭成員 RELATE 職工編號(hào)to 職工編號(hào)）Qrs.ActiveC onnection = QcnnQrs.CursorTRpe = adOpe nKeRset Qrs.CursorLocati on = adUseClie nt Qrs.LockTRpe = adLockOpti

24、mistic Qrs.Ope n StrSql五、統(tǒng)計(jì)模塊中的綜合統(tǒng)計(jì)中，可實(shí)現(xiàn)部門的動(dòng)態(tài)變化， 簡(jiǎn)述實(shí)現(xiàn)的基本思想。在綜合統(tǒng)計(jì)的窗體中有重新統(tǒng)計(jì)按鈕，該按鈕的功能就是實(shí)現(xiàn)數(shù)據(jù)的動(dòng)態(tài)統(tǒng)計(jì)功能。在重新統(tǒng)計(jì)的功能中有實(shí)現(xiàn)重新統(tǒng)計(jì)的代碼。由于添加數(shù)據(jù)后數(shù)據(jù)提交到數(shù)據(jù)庫(kù)，這事 重新統(tǒng)計(jì)按鈕在打開這個(gè)表，所以數(shù)據(jù)就是新的了。通過設(shè)置一個(gè)循環(huán)變量I,在表里進(jìn)行循環(huán)統(tǒng)計(jì)，每經(jīng)過一個(gè)字段，i的值加1，最后在對(duì)應(yīng)響應(yīng)的項(xiàng)目提交到數(shù)據(jù)庫(kù)中，通 過DataGrid控件輸出顯示出來。RsMn.ERecute （DELETE FROM 綜合統(tǒng)計(jì)）Trs.RequerRSet DataGrid1.DataSource = Trs六、圖表統(tǒng)計(jì)模塊可以實(shí)