【正文】 ess 2021 數(shù)據(jù)庫編程技術(shù)實(shí)現(xiàn)了一個(gè)小型人事管理系統(tǒng)。如何管理好企業(yè)內(nèi)部員工的信息，成為企業(yè)管理中的一個(gè)大問題。 人事管理系統(tǒng)為企事業(yè)單位提供信息咨詢，信息檢索，信息存取等服務(wù)。對(duì)于大中型企業(yè)來說，利用計(jì)算機(jī)支持企業(yè)高效率完成勞動(dòng)人事管理的日常事務(wù)，是適應(yīng)現(xiàn)代企業(yè)制度要求、推動(dòng)企業(yè)勞動(dòng)人事管理走向科學(xué)化、規(guī)范化的必要條件；計(jì)算機(jī)管理所無法比擬的優(yōu)點(diǎn)檢索迅速、查找方便、可靠性高、存儲(chǔ)量大、保密性好、壽命長、成本低等。但是，對(duì)于企、事業(yè)單位的人事管理系統(tǒng)來說，不需要大型的數(shù)據(jù)庫系統(tǒng)。 從一定意義上講，在企業(yè)戰(zhàn)略實(shí)現(xiàn)過程中，人力資源體系不應(yīng)該是被動(dòng)去適應(yīng)，而是主動(dòng)、能動(dòng)影響企業(yè)的戰(zhàn)略實(shí)現(xiàn)。擬解決的主要問題有：軟件界面的設(shè)計(jì)，程序連接數(shù)據(jù)庫，程序?qū)?shù)據(jù)庫的數(shù)據(jù)錄入、修改、刪除等操作，數(shù)據(jù)的查詢，輸出， ER圖及數(shù)據(jù)流程圖的設(shè)計(jì)，軟件采用 VB編程，數(shù)據(jù)庫采用 Microsoft Office Access 以及數(shù)據(jù)庫可提供如數(shù)據(jù)錄入，查詢等功能。 Microsoft Visual Basic 簡介 作為數(shù)據(jù)庫系統(tǒng)的開發(fā)， Visual Basic 是一個(gè)非常理想選擇。 (4)事件驅(qū)動(dòng)編程機(jī)制 Visual Basic 通過事件來執(zhí)行對(duì)象的操作。 (7)對(duì)象的鏈接與嵌入 (OLE) 對(duì)象的鏈接與嵌入 (OLE)將每個(gè)應(yīng)用程序都看作是一個(gè)對(duì)象 (object)，將不同的對(duì)象鏈接 (link)起來，再嵌入 (embed)某個(gè)應(yīng)用程序中，從而可以得到具有聲音、影像、圖像、動(dòng)畫、文字等各種信息的集合式的文件。目前的 Access 2021是 Microsoft強(qiáng)大的桌面數(shù)據(jù)庫平臺(tái)的第七代產(chǎn)品，是 32位 Access的第四個(gè)版本。其實(shí) Access 也是微軟公司另一個(gè)通訊程序的名字，想與 ProComm 以及其他類似程序來競爭。人事管理系統(tǒng)的開發(fā)采用的是 VB+ACCESS的搭配。 (2)提出新系統(tǒng)的人員并不都是系統(tǒng)研究人員，有些人對(duì)于其功能和處理數(shù)據(jù)的方法沒有明確的認(rèn)識(shí)。 可行性分析概述 可行性分析是在用戶的要求和系統(tǒng)調(diào)研的基礎(chǔ)上進(jìn)行的，對(duì)新系統(tǒng)的開發(fā)從社會(huì)、技術(shù)、經(jīng)濟(jì)、管理等方面進(jìn)行分析，并得出新系統(tǒng)的開發(fā)工作可行、不可行、需要修改、追加投資、暫緩開發(fā)、分步實(shí)施等方案和結(jié)論，最后完成可行性分析。 (3)技術(shù)可行性分析：技術(shù)可行性分析是根據(jù)新系統(tǒng)的目標(biāo)來衡量是否具備所需要的技術(shù)，包括系統(tǒng)開發(fā)人員數(shù)量和水平，硬件方面，軟件方面及其它應(yīng)用技術(shù)。 (1)技術(shù)支持：首先根據(jù)新系統(tǒng)的目標(biāo)，考慮目前有關(guān)的技術(shù)能否支持所開發(fā)的新系統(tǒng)。 (3)軟件資源： 軟件資源的可行性分析主要考慮以下幾點(diǎn)是否滿足用戶的要求： ? 操作系統(tǒng)的選擇 ? 編譯系統(tǒng)的選擇 ? 數(shù)據(jù)庫管理系統(tǒng)的選擇 ? 高級(jí)編程語言的選擇 ? 漢字處理系統(tǒng)的選擇 ? 應(yīng)用軟件包的選擇 本系統(tǒng)在開發(fā)前，與指導(dǎo)老師以及相關(guān)人員進(jìn)行密切溝通，認(rèn)真聽取他們的意見，并吸收他們的積極觀點(diǎn)，使本系統(tǒng)的開發(fā)在相當(dāng)大的程度上具有一定的先進(jìn)性和合理性 [8]。 10 第 4 章 系統(tǒng)分析 系統(tǒng)需求分析 系統(tǒng)分析是開發(fā)管理信息系統(tǒng)的關(guān)鍵性階段，是一個(gè)從不斷認(rèn)識(shí)和逐步細(xì)化的過程，是下一階段的工作基礎(chǔ)，是為下一階段進(jìn)行物理方案設(shè)計(jì)、解決 “怎么做 ”提供依據(jù)，基關(guān)鍵性主要體現(xiàn)在 “理解需求 ”和 “表達(dá)需求 ”兩方面。 (3)環(huán)境需求：這是對(duì)系統(tǒng)運(yùn)行以及所處環(huán)境的要求。一旦需要時(shí)，就比較容易進(jìn)行補(bǔ)充和修改了 [9]。 系統(tǒng)的功能模塊組成主要有 7 個(gè)模塊： 員工基本信息管理、員工學(xué)習(xí)與工作經(jīng)歷管理、員工家庭主要成員管理、部門管理、員工考勤管理、員工考評(píng)管理和系統(tǒng)用戶維護(hù)。對(duì)數(shù)據(jù)流圖和功能模塊圖的設(shè)計(jì)對(duì)系統(tǒng)的功能設(shè)計(jì)有較好的鋪墊。只有合法的用戶在輸入正確的密碼后方可進(jìn)入系統(tǒng)。圖51為系統(tǒng)操作流程圖： 14 圖 51 系統(tǒng)操作流程圖 圖 51就是系統(tǒng)操作流程圖，系統(tǒng)用戶可以根據(jù)操作流程圖使用此系統(tǒng)，并可對(duì)必要的數(shù)據(jù)進(jìn)行處理。數(shù)據(jù)庫中的數(shù)據(jù)按照一定的數(shù)據(jù)模型組織、描述、和存儲(chǔ)，具有較小的冗余度，較高的數(shù)據(jù)獨(dú)立性和易擴(kuò)展性，并可為各種用戶共享。系統(tǒng)中所有數(shù)據(jù)內(nèi)容都是由數(shù)據(jù) 元素和數(shù)據(jù)結(jié)構(gòu)組成。 17 以下為以系統(tǒng)用戶信息作為登記： (1)系統(tǒng)用戶信息的登記：能夠把系統(tǒng)用戶的信息都存儲(chǔ)到數(shù)據(jù)庫中，分為管理員和普通用戶信息； (2)系統(tǒng)用戶信息瀏覽功能：能夠把系統(tǒng)用戶的用戶名一次性地顯示出來，供系統(tǒng)管理員瀏覽； (3)系統(tǒng)用戶信息添加功能：能夠往系統(tǒng)用戶信息的數(shù)據(jù)庫中增加一條系統(tǒng)用戶檔案記錄； (4)系統(tǒng)用戶信息刪除功能：能夠從系統(tǒng)用戶信息的數(shù)據(jù)庫中減少一條系統(tǒng)用戶檔案記錄； (5)系統(tǒng)用戶信息修改功能：能夠修改系統(tǒng)用戶信息中指定的一條系統(tǒng)用戶檔案記錄； 系統(tǒng)用戶表如表 52所示： 表 52 系統(tǒng)用戶表 (Users) 字段名 數(shù)據(jù)類型 長 度 索引 Nulls 備注 UserName 文本 10 否 用戶名 Pwd 文本 10 否 密碼 User_type 數(shù)字 2 否 用戶類別 表 52就是系統(tǒng)用戶表。 以下為以部門信息作為登記： (1)部門信息的登記：能夠把部門的信息都存儲(chǔ)到數(shù)據(jù)庫中； (2)部門信息瀏覽功能：能夠把部門的信息一次性地顯示出來，供系統(tǒng)管理員瀏覽； (3)部門信息添加功能：能夠部門信息的數(shù)據(jù)庫中增加一條部門檔案記錄； (4)部門信息刪除功能：能夠從部門信息的數(shù)據(jù)庫中減少一條部門信息檔案記錄； (5)部門信 息修改功能：能夠修改部門信息中指定的一條部門信息檔案記錄； 部門表如表 55所示： 表 55 部門表 (Departments) 字段名 數(shù)據(jù)類型 長度 索引 Nulls 備注 DepId 文本 10 否 部門代碼 DepName 文本 10 否 部門名稱 Describes 文本 50 否 功能描述 UpperId 數(shù)字 10 否 上級(jí)部門 表 55就是部門表，它包含部門代碼、部門名稱、功能描述和上級(jí)部門等信息。屬性的表間關(guān)系有三種類型：一對(duì)一、一對(duì)多和多對(duì)多。 本章小結(jié) 本章通過對(duì)系統(tǒng)功能的描述、系統(tǒng)操作流程圖的設(shè)計(jì)、數(shù)據(jù)庫表的設(shè)計(jì)和數(shù)據(jù)庫表關(guān)系圖的設(shè)計(jì)，對(duì)系統(tǒng)的數(shù)據(jù)庫進(jìn)行了詳細(xì)設(shè)計(jì)。如圖 61所示： 圖 61 身份驗(yàn)證對(duì)話框 圖 61就是等分驗(yàn)證窗口，單擊【確定】將提交用戶信息。數(shù)據(jù)有效性檢查 If Trim(txtUser) = Then MsgBox 請(qǐng)輸入用戶名 Exit Sub End If If Trim(txtPwd) = Then MsgBox 請(qǐng)輸入密碼 24 Exit Sub End If NameKey = MakeStr(txtUser) PasswordKey = MakeStr(txtPwd) 39。如圖 53所示： 25 圖 62 人事管理系統(tǒng)主界面 圖 62就是人事管理系統(tǒng)的主界面，它包括三個(gè)主要菜單：基本信息管理，考勤信息管理，系統(tǒng)用戶管理。如圖 63所示： 圖 63 部門管理界面 26 圖 63就是部門管理界面，其部門信息會(huì)以樹形顯示的方式顯示出來。用來將所有部門的信息樹狀顯示。設(shè)置根結(jié)點(diǎn) Set TmpNode = (, , a0, 部門信息 , 1, 3) = True = 2 39。根結(jié)點(diǎn) Exit Sub End If 39。 為了實(shí)現(xiàn)這些功能，需要如下控件： (1)7個(gè) CommandButton控件： 1個(gè)是用來處理員工家庭主要成員信息的【家庭主要成員管理】按鈕， 1個(gè)是用來處理員工學(xué)習(xí)與工作經(jīng)歷信息的【學(xué)習(xí)與工作經(jīng)歷】按鈕， 1個(gè)是添加員工基本信息的【添加職員】按鈕， 1個(gè)是用來修改員工基本信息的【修改資料】按鈕， 1個(gè)是用來刪除員工基本信息的【刪除職員】按鈕，1個(gè)是用來調(diào)轉(zhuǎn)職員去另外部門的【部門調(diào)轉(zhuǎn)】按鈕， 1個(gè)是用來退出該界面的【返回】按鈕。設(shè)置 ADO控件的連接字符串 = Provider=。Persist Security Info=False = 0 FocusDepName = 人事部 Focuskey = 39。單擊左鍵，則關(guān)閉照片管理菜單 If Button = 1 Then If = True Then Unload FrmPhotoMenu End If End If 39。 為了實(shí)現(xiàn)這些功能，需要如下控件： (1)5個(gè) CommandButton控件： 1個(gè)是用來添加員工考勤信息的【添加】按鈕，1個(gè)是用來修改員工考勤信息的【修改】按鈕， 1個(gè)是刪除員工考勤信息的【刪除】按鈕， 1個(gè)是用來導(dǎo)出某個(gè)指定部門的月度考勤信息統(tǒng)計(jì)的【月度考勤統(tǒng)計(jì)】按鈕， 1個(gè)是用來退出該界面的【返回】按鈕。設(shè)置查詢條件 If Trim() = Then SchCnd = 31 Else SchCnd = And = + Trim(Str(nDepId)) End If 39。設(shè)置數(shù)據(jù) 源 tmpsource = SELECT As 部門 , , As 姓名 , _ + As 全勤 , As 出差 , As 病假 , As 事假 , _ + As 曠工 , As 法定休假 , As 年休假 , As 倒休假 , _ + As 遲到分鐘 , As 早退分鐘 , As 法定節(jié)假日加班 , _ + As 周末加班 , As 日常加班 , As 備注 _ + FROM Departments d, Employees e, Checkin c _ + WHERE =39。如圖 66所示： 圖 66 員工考評(píng)信息管理界面 圖 66就是員工考評(píng)信息管理界面，它包括考評(píng)月份、員工編號(hào)、總體評(píng)價(jià)、獎(jiǎng)勵(lì)事由、獎(jiǎng)勵(lì)金額、處罰事由、處罰金額和備注等信息。 以下是員工考評(píng)管理的主要代碼： Private Sub Refresh_Eva() 39。Persist Security Info=False 39。設(shè)置列寬 With DataGrid1 .Columns(0).Width = 0 …… End With End Sub 在 “用戶管理 ”的界面的左邊會(huì)列出使用該系統(tǒng)的授權(quán)用戶，另外在右邊可以對(duì)這些用戶進(jìn)行信息處理。 以下是系統(tǒng)用戶管理的主要代碼： Private Sub Cmd_Modi_Click() If = Then MsgBox 請(qǐng)選擇要修改的用戶 Exit Sub End If If UCase() ADMIN And = 1 And Then MsgBox 沒有修改此用戶的權(quán)限 Exit Sub End If With FrmUserEdit .OriUser = .txtUserName = .txtPass = .txtPass2 = . 系統(tǒng)管理員 . 普通用戶 . = 1 .Modify = True .Show 1 End With 35 DataList1_Click End Sub 最后一個(gè)界面是 “編輯用戶信息 ”界面，系統(tǒng)用戶可以打開 該對(duì)話框來對(duì)自己的密碼進(jìn)行修改的操作。 (3)3個(gè) TextBox控件。填寫完成點(diǎn)擊【確定】按鈕，將會(huì)出現(xiàn)操作程序頁面，即該用戶已經(jīng) 登錄 成功了。 (3)測試編輯功能是否成功：在登錄成功之后，即可進(jìn)入相應(yīng)的管理頁面，點(diǎn)擊“員工管理 ”，即出現(xiàn)員工信息管理頁面，即可以修改和刪除員工的基本信息資料。也可點(diǎn)主頁面右上角的 “關(guān)閉 ”退出系統(tǒng)。 測試方法 一般來說，對(duì)程序測試有兩種測試方法：如果已經(jīng)知道了軟件系統(tǒng)應(yīng)具有的功能，可通過測試來對(duì)每個(gè)功能是否都能正常使用；如果知道程序的內(nèi)部工作過程，可以通過測試來 檢測程序內(nèi)部是否按照規(guī)格說明書的規(guī)定正常進(jìn)行。雖然沒有 完全按照 該 測試方法進(jìn)行系統(tǒng)的測試，但經(jīng)過一些簡單的步驟的測試，證明本系統(tǒng)具有相當(dāng) 的程序穩(wěn)定性。但由于能力和時(shí)間的關(guān)系，總是覺得有很多不盡人意的地方，如功能不全、外觀粗糙、底層代碼的不合理等等，數(shù)不勝數(shù)。從這里走出，對(duì)我的人生來說，將是踏上一個(gè)新的征程，要把所學(xué)的知識(shí)應(yīng)用到實(shí)際工作中去。 ”大學(xué)四年，但它給我的影響卻不能用時(shí)間來衡量，這四年以來，經(jīng)歷過的所有事，所有人，都將是我今后生活回味的一部分，是我為人處事的指南針。從課題的選擇到項(xiàng)目的最終完成，老師都始終給予我細(xì)心的指導(dǎo)和不懈的支持。哈格 ,梅芙 18