[畢業(yè)設(shè)計(jì)精品]公司人事管理系統(tǒng)論文

1、目目 錄錄 公司人事管理系統(tǒng).2 第 1 章 導(dǎo)論.3 第 2 章 系統(tǒng)需求分析.4 2.1 統(tǒng)設(shè)計(jì)背景介紹.4 2.2 系統(tǒng)功能分析.4 第 3 章 公司人事管理系統(tǒng)總體設(shè)計(jì).5 3.1 系統(tǒng)設(shè)計(jì).5 3.1.1 系統(tǒng)功能分析.5 3.1.2 用戶功能模塊設(shè)計(jì).6 3.1.3 數(shù)據(jù)流程圖.7 3.1.4 說明.7 3.2 據(jù)庫設(shè)計(jì).7 第 4 章 詳細(xì)設(shè)計(jì).10 4.1 數(shù)據(jù)模塊的創(chuàng)建.10 4.2 用戶登錄模塊設(shè)計(jì).10 4.3 公司人事管理系統(tǒng)主界面設(shè)計(jì).10 4.4 信息管理-添加、查詢、修改、刪除的實(shí)現(xiàn).11 4.5 工信息管理-添加、查詢、修改、刪除的實(shí)現(xiàn).13 4.6 勤信息管理

2、-添加、查詢、修改、刪除的實(shí)現(xiàn).13 4.7 工工資管理-添加、查詢、修改、刪除的實(shí)現(xiàn).14 4.8 系統(tǒng)維護(hù).15 第 5 章 系統(tǒng)功能測試.18 5.1 系統(tǒng)測試環(huán)境.18 5.2 測試內(nèi)容.18 5.3 測試結(jié)果.18 結(jié)束語.19 參考文獻(xiàn).20 附錄.21 公司人事管理系統(tǒng)公司人事管理系統(tǒng) 摘要：摘要：公司人事管理系統(tǒng)是典型的管理信息系統(tǒng)(mis),其開發(fā)主要包括后臺數(shù)據(jù)庫的建立 和維護(hù)以及前端應(yīng)用程序的開發(fā)兩個(gè)方面。對于前者要求建立起數(shù)據(jù)一致性和完整性強(qiáng)、 數(shù)據(jù)安全性好的庫。而對于后者則要求應(yīng)用程序功能完備,易使用等特點(diǎn)。 經(jīng)過分析,本人使用 microsoft公司的 visual

3、 basic開發(fā)工具,利用其提供的各種 面向?qū)ο蟮拈_發(fā)工具,尤其是數(shù)據(jù)窗口這一能方便而簡潔操縱數(shù)據(jù)庫的智能化對象,首先在 短時(shí)間內(nèi)建立系統(tǒng)應(yīng)用原型,然后,對初始原型系統(tǒng)進(jìn)行需求迭代,不斷修正和改進(jìn),直到形成 用戶滿意的可行系統(tǒng)。 整個(gè)系統(tǒng)從符合操作簡便、界面友好、靈活、實(shí)用、安全的要求出發(fā)。 論文主要介紹了本課題的開發(fā)背景，所要完成的功能和開發(fā)的過程。重點(diǎn)的說明了系 統(tǒng)設(shè)計(jì)的重點(diǎn)、設(shè)計(jì)思想、難點(diǎn)技術(shù)和解決方案。 關(guān)鍵字：關(guān)鍵字： visual basic 6.0 access2000 窗體 第第 1 章章 導(dǎo)論導(dǎo)論 隨著信息技術(shù)的飛速發(fā)展，特別是數(shù)據(jù)庫技術(shù)的發(fā)展，計(jì)算機(jī)已經(jīng)成為當(dāng)今信息時(shí)代 的

4、關(guān)鍵工具。數(shù)據(jù)庫技術(shù)是計(jì)算機(jī)應(yīng)用技術(shù)中的一個(gè)重要組成部分，對于大量的數(shù)據(jù)，使 用數(shù)據(jù)庫來存儲管理將比通過文件來存儲管理更高效。數(shù)據(jù)庫技術(shù)在經(jīng)過幾代變革以后， 出現(xiàn)了以關(guān)系數(shù)據(jù)庫產(chǎn)品為主流的數(shù)據(jù)庫時(shí)代。access 2000 是微軟公司推出的關(guān)系數(shù)據(jù)庫 產(chǎn)品。作為 microsoft 的 office 套件產(chǎn)品之一,access 已經(jīng)賣出了近 700 萬份,成為世界上最 流行的桌面數(shù)據(jù)庫系統(tǒng)。access 與許多優(yōu)秀的關(guān)系數(shù)據(jù)庫一樣，可以讓你很容易地連接相 關(guān)的信息而且還對其他的數(shù)據(jù)庫系統(tǒng)有所補(bǔ)充。visual basic 作為應(yīng)用程序的開發(fā)“利器”也 表現(xiàn)在數(shù)據(jù)庫應(yīng)用程序的開發(fā)上，它良好的界面

5、和強(qiáng)大的控件功能使數(shù)據(jù)庫編程變得簡單 多了。visual basic 提供了強(qiáng)有力的數(shù)據(jù)庫存取能力，將 windows 的各種先進(jìn)特性與強(qiáng)大 的數(shù)據(jù)庫管理功能有機(jī)地結(jié)合在一起。 本次畢業(yè)設(shè)計(jì)公司人事管理系統(tǒng)是運(yùn)用 ado 技術(shù)設(shè)計(jì)開發(fā)的，使用大量地 sql 語句進(jìn)行添加、查詢、刪除等操作。本系統(tǒng)使用 access 2000 作為后臺數(shù)據(jù)庫，利用 visual basic 6.0 提供的數(shù)據(jù)庫開發(fā)平臺開發(fā)前臺部分。 第第 2 章章 系統(tǒng)需求分析系統(tǒng)需求分析 2.12.1 統(tǒng)設(shè)計(jì)背景介紹統(tǒng)設(shè)計(jì)背景介紹 管理信息系統(tǒng)就是我們常說的 mis (management information system

6、)，在強(qiáng)調(diào)管理，強(qiáng) 調(diào)信息的現(xiàn)代社會中它變的越來越普及。而將信息管理系統(tǒng)與企業(yè)自動(dòng)化設(shè)備想結(jié)合，則 是當(dāng)今社會現(xiàn)代企業(yè)的發(fā)展趨勢。通過這樣的管理方式，企業(yè)的管理人員、技術(shù)人員、統(tǒng) 計(jì)人員等各部門員工就能從大量煩瑣的資料和數(shù)據(jù)中解脫出來，只需對自己需要的數(shù)據(jù)和 內(nèi)容進(jìn)行必須的處理，而不用對每個(gè)環(huán)節(jié)都了如指掌。這在一定程度上能夠節(jié)省人力物力， 同時(shí)也大大加強(qiáng)了對數(shù)據(jù)處理的及時(shí)性和準(zhǔn)確性。 本次的開發(fā)內(nèi)容公司人事管理系統(tǒng)就是信息管理與現(xiàn)代化辦公設(shè)備相結(jié)合的例子。 開發(fā)本系統(tǒng)希望使人事管理人員可以從年復(fù)一年的輸入、計(jì)算、統(tǒng)計(jì)等工作中解脫出來， 由于人事方面的數(shù)據(jù)眾多，輸入、統(tǒng)計(jì)極為不便，輸入量大，計(jì)算

7、量大。這些工作都以人 力來完成將費(fèi)時(shí)費(fèi)力，而且容易出現(xiàn)錯(cuò)誤和疏漏。本系統(tǒng)一次錄入信息后，就可以反復(fù)多 次在不同的信息庫中使用。所有輸入的信息都將按所屬部門、專業(yè)、考勤日期、工資日期 等詳細(xì)分類，使客戶可以根據(jù)需要進(jìn)行管理操作。 因此，該管理系統(tǒng)的目的就是利用計(jì)算機(jī)對復(fù)雜煩瑣的數(shù)據(jù)進(jìn)行存儲和處理，并利用 計(jì)算機(jī)與現(xiàn)代化辦公設(shè)備的連接實(shí)時(shí)刷新數(shù)據(jù)，從而提高企業(yè)的工作效率。 2.22.2 系統(tǒng)功能分析系統(tǒng)功能分析 熱網(wǎng)管理系統(tǒng)主要有以下幾項(xiàng)功能要求： *按不同權(quán)限登錄系統(tǒng)。 *對其提供的部門資料情況進(jìn)行添加、查詢、修改和刪除操作。 *對其提供的人員資料情況進(jìn)行添加、查詢、修改和刪除操作。 *對其提供

8、的人員考勤資料情況進(jìn)行添加、查詢、修改和刪除操作，并可按考勤月份 進(jìn)行分類。 *對其提供的人員工資資料情況進(jìn)行添加、計(jì)算、查詢、修改和刪除操作，并可按工 資月份進(jìn)行分類。 *可添加新的用戶，修改用戶原有的用戶名、密碼，刪除原有用戶。 第第 3 章章 公司人事管理系統(tǒng)總體設(shè)計(jì)公司人事管理系統(tǒng)總體設(shè)計(jì) 3.1 系統(tǒng)設(shè)計(jì)系統(tǒng)設(shè)計(jì) 3.1.13.1.1 系統(tǒng)功能分析系統(tǒng)功能分析 *按不同權(quán)限登錄系統(tǒng)。 *對其提供的部門資料情況進(jìn)行添加、查詢、修改和刪除操作。 *對其提供的人員資料情況進(jìn)行添加、查詢、修改和刪除操作。 *對其提供的人員考勤資料情況進(jìn)行添加、查詢、修改和刪除操作，并可按考勤月份進(jìn)行 分類。

9、 *對其提供的人員工資資料情況進(jìn)行添加、計(jì)算、查詢、修改和刪除操作，并可按工資月 份進(jìn)行分類。 *可添加新的用戶，修改用戶原有的用戶名、密碼，刪除原有用戶。 3.1.23.1.2 用戶功能模塊設(shè)計(jì)用戶功能模塊設(shè)計(jì) 部門信息管理 員工信息管理 考勤信息管理 用用 戶戶 登登 陸陸 查 詢 記 錄 修 改 記 錄 添 加 用 戶 修 改 密 碼 刪 除 用 戶 刪 除 記 錄 添 加 記 錄 查 詢 記 錄 修 改 記 錄 刪 除 記 錄 添 加 記 錄 查 詢 記 錄 修 改 記 錄 刪 除 記 錄 添 加 記 錄 查 詢 記 錄 修 改 記 錄 刪 除 記 錄 員工工資管理 數(shù) 據(jù) 備 份 數(shù)

10、 據(jù) 恢 復(fù) 系 統(tǒng) 維 護(hù) 退 出 系 統(tǒng) 添 加 記 錄 圖 3.1 3.1.33.1.3 數(shù)據(jù)流程圖數(shù)據(jù)流程圖 是 否 是 是 否 否 是 是 圖 3.2 3.1.43.1.4 說明說明 本次設(shè)計(jì)主要利 ado 技術(shù)，界面友好。能自動(dòng)生產(chǎn)編號，根據(jù)用戶輸入的數(shù)據(jù)檢查 其合法性，確保數(shù)據(jù)正確輸入。登陸系統(tǒng)時(shí)對用戶的請求進(jìn)行身份驗(yàn)證，經(jīng)驗(yàn)證合法后允 許用戶登陸系統(tǒng)，進(jìn)行相應(yīng)權(quán)限對數(shù)據(jù)的處理，本系統(tǒng)能對用戶進(jìn)行管理，能進(jìn)行數(shù)據(jù)庫 備份和恢復(fù)，確保數(shù)據(jù)的安全。本次設(shè)計(jì)選擇了 access 2000 作為后臺數(shù)據(jù)庫，利用 visual basic 6.0 提供的數(shù)據(jù)庫開發(fā)平臺開發(fā)前臺部分。 3.2

11、 據(jù)庫設(shè)計(jì)據(jù)庫設(shè)計(jì) 在 access 2000 數(shù)據(jù)庫中創(chuàng)建表： 根據(jù)設(shè)計(jì)要求，需要 5 個(gè)數(shù)據(jù)表：部門基本情況表、員工基本信息表、員工考勤信息 表、員工工資信息表、口令信息表。這 5 個(gè)數(shù)據(jù)表的結(jié)構(gòu)如下各表： 用戶登陸 是否管理員 是否錄入數(shù)據(jù)是否修改數(shù)據(jù) 錄入數(shù)據(jù)修改數(shù)據(jù) 是否進(jìn)行查詢 輸入查詢條件 是否刪除數(shù)據(jù) 刪除數(shù)據(jù) 退出系統(tǒng) (1) 部門基本情況表部門基本情況表 字段名稱數(shù)據(jù)類型長度主鍵允許空 部門編號文本 6true 否 部門名稱文本 30 是 備注文本 255 是 表 3.1 (2)(2)員工基本信息表員工基本信息表 字段名稱數(shù)據(jù)類型長度主鍵允許空 員工編號文本 6true 否

12、 員工姓名文本 10 否 性別文本 2 是 出生日期日期/時(shí)間短日期否 民族文本10是 政治面貌文本10是 最后學(xué)歷文本10是 所學(xué)專業(yè)文本20是 聯(lián)系電話文本20是 畢業(yè)學(xué)校文本30是 籍貫文本50是 家庭住址文本50是 進(jìn)入公司時(shí)間日期/時(shí)間短日期否 部門名稱文本30是 職務(wù)名稱文本30是 備注文本255是 表 3.2 (3)(3)員工考勤信息表員工考勤信息表 字段名稱數(shù)據(jù)類型長度主鍵允許空 員工編號文本 6 是 員工姓名文本 10 是 考勤日期文本 6 否 部門名稱文本50是 出勤天數(shù)數(shù)字整型是 假日加班數(shù)字整型是 其它加班數(shù)字整型是 出差天數(shù)數(shù)字整型是 補(bǔ)休天數(shù)數(shù)字整型是 請假次數(shù)數(shù)字

13、整型是 曠工天數(shù)數(shù)字整型是 遲到次數(shù)數(shù)字整型是 早退次數(shù)數(shù)字整型是 備注文本255是 表 3.3 (4)員工工資信息表員工工資信息表 字段名稱數(shù)據(jù)類型長度主鍵允許空 員工編號文本 6true 是 員工姓名文本 10 是 計(jì)發(fā)日期文本 6 否 部門名稱文本50是 底薪數(shù)字單精度型是 獎(jiǎng)金數(shù)字單精度型是 補(bǔ)貼數(shù)字單精度型是 加班費(fèi)數(shù)字單精度型是 房帖費(fèi)數(shù)字單精度型是 扣考核數(shù)字單精度型是 養(yǎng)老金數(shù)字單精度型是 醫(yī)療保險(xiǎn)數(shù)字單精度型是 住房公積金數(shù)字單精度型是 稅前小計(jì)數(shù)字單精度型是 所得稅數(shù)字單精度型是 實(shí)發(fā)工資數(shù)字單精度型是 表 3.4 (5)(5)口令信息表口令信息表 字段名稱數(shù)據(jù)類型長度主鍵

14、允許空 用戶名文本 20true 是 密碼文本 10 是 權(quán)限文本 6 是 表 3.4 第第 4 章章 詳細(xì)設(shè)計(jì)詳細(xì)設(shè)計(jì) 4.1 數(shù)據(jù)模塊的創(chuàng)建數(shù)據(jù)模塊的創(chuàng)建 將數(shù)據(jù)庫連接、數(shù)據(jù)表和數(shù)據(jù)源等運(yùn)行期不可見的組件都放在窗體設(shè)計(jì)界面上，雖然 在調(diào)用時(shí)比較直觀，但卻為界面布局設(shè)計(jì)帶來的麻煩，而且也不利于數(shù)據(jù)的統(tǒng)一管理。因 此，在設(shè)計(jì)時(shí)，我選擇使用 ado 來控制管理數(shù)據(jù)庫。 在程序模塊中定義記錄集，并在各個(gè)窗體中定義記錄集變量，使輸入數(shù)據(jù)能與數(shù)據(jù)庫 連接，并都用程序進(jìn)行控制，這樣不用數(shù)據(jù)控件都用代碼控制大大提高了程序運(yùn)行效率。 部分有關(guān)代碼如下： dim rc as new adodb.records

15、et 定義記錄集變量 cnndb.open provider=microsoft.jet.oledb.4.0;data source = & app.path & 公 司人事管理系統(tǒng).mdb 確定數(shù)據(jù)庫位置 dim rc as new adodb.recordset 定義記錄集變量 if rc.state = 1 then rc.close 判斷當(dāng)前表的狀態(tài)是否打開，是則關(guān)閉 rc.open sql, cnndb, 3, 2 打開當(dāng)前表 4.2 用戶登錄模塊設(shè)計(jì)用戶登錄模塊設(shè)計(jì) (1) 設(shè)計(jì)思路設(shè)計(jì)思路 每個(gè)用戶登錄系統(tǒng)都須經(jīng)過身份驗(yàn)證。只有用戶名和密碼相對應(yīng)才能進(jìn)入系統(tǒng)。因?yàn)?在系統(tǒng)設(shè)置中已

16、經(jīng)對系統(tǒng)使用權(quán)限進(jìn)行了規(guī)定，所以，在用戶登錄的同時(shí)也決定了用戶對 系統(tǒng)使用的權(quán)限。當(dāng)?shù)卿浾呤枪芾韱T身份時(shí)，他可以使用系統(tǒng)提供的所有功能，并能對所 有用戶進(jìn)行管理。登錄者是操作員可以使用所有對數(shù)據(jù)的編輯功能，而如果登錄者是一般 用戶時(shí)只能利用系統(tǒng)進(jìn)行資料查詢功能。 (2) 用戶登錄界面設(shè)計(jì)用戶登錄界面設(shè)計(jì) 圖 4.1 4.3 公司人事管理系統(tǒng)主界面設(shè)計(jì)公司人事管理系統(tǒng)主界面設(shè)計(jì) 根據(jù)系統(tǒng)模塊結(jié)構(gòu)，建立系統(tǒng)主界面。用戶登錄到系統(tǒng)后進(jìn)入的就是該界面，所有功 能一目了然。當(dāng)不同權(quán)限的用戶登錄到該界面時(shí)功能有所不同，其控制由“用戶登錄”界 面控制。 圖 4.2 在此界面中對用戶的權(quán)限進(jìn)行了設(shè)置，若是以一

17、般用戶登錄時(shí)只能修改自己的密碼且只能 瀏覽所有的人事管理信息，以管理員身份進(jìn)入時(shí)可以對所有一般用戶的密碼進(jìn)行設(shè)置，還 可刪除一般用戶！能對人事信息進(jìn)行編輯刪除，修改等操作 4.4 信息管理信息管理-添加、查詢、修改、刪除的實(shí)現(xiàn)添加、查詢、修改、刪除的實(shí)現(xiàn) 編輯部門信息編輯部門信息 作為編輯部門信息這一項(xiàng)，所實(shí)現(xiàn)的功能是對公司各部門資料信息的存儲與編輯，部 門信息包括：部門編號（兩位） 、部門名稱、備注。部門編號與部門名稱都具有唯一性， 不能重復(fù)。作為部門信息與員工信息有著密切的關(guān)系，每一名員工都從屬一個(gè)部門。 圖 4.3 (1)數(shù)據(jù)添加數(shù)據(jù)添加 當(dāng)操作員進(jìn)入系統(tǒng)，根據(jù)設(shè)計(jì)要求，需要添加新的部門

18、信息時(shí)，在編輯部門信息窗體 上按添加按鈕，便進(jìn)入添加狀態(tài)，文本框自動(dòng)清空，添加按鈕變?yōu)榇_定按鈕，光標(biāo)會停留 在部門編號文本框上，此時(shí)系統(tǒng)已自動(dòng)生成一個(gè)新的部門編號，只需輸入部門名稱和備注 信息即可完成部門信息編輯操作，在按窗體上的確定按鈕即可檢查該部門信息是否合法并 存入數(shù)據(jù)庫，否則按取消按鈕。再點(diǎn)擊添加按鈕，用戶可再次添部門信息記錄。 (2)數(shù)據(jù)查詢數(shù)據(jù)查詢 當(dāng)操作員需要對某個(gè)部門進(jìn)行查詢時(shí)，可以在編輯部門信息窗體下部中找到查詢按鈕。 先在對應(yīng)的文本框中輸入要進(jìn)行數(shù)據(jù)查詢的條件，輸入完查詢條件后，點(diǎn)擊查詢按鈕進(jìn)行 確定，系統(tǒng)便會查詢出滿足條件的部門記錄，并列到數(shù)據(jù)表格中，無滿足條件的部門記錄

19、 時(shí)，則彈出對話框提示“查無此記錄！” 。 (3)數(shù)據(jù)修改數(shù)據(jù)修改 當(dāng)操作員需要對某個(gè)部門進(jìn)行修改時(shí)，可以在編輯部門信息窗體下部中找到修改按鈕。 由于修改記錄不可能在大量的數(shù)據(jù)中盲目的尋找，因此數(shù)據(jù)修改應(yīng)該與數(shù)據(jù)添加按鈕結(jié)合 使用，先用查詢功能進(jìn)行對要修改記錄的搜索，再在數(shù)據(jù)表格中選中要修改的部門記錄， 便把此部門記錄讀入文本框中，只需在文本框中直接進(jìn)行數(shù)據(jù)修改便可，修改完后按修改 按鈕進(jìn)行確定，系統(tǒng)并對修改后的數(shù)據(jù)進(jìn)行合法性檢測，合法則修改成功。 (4)數(shù)據(jù)刪除數(shù)據(jù)刪除 當(dāng)操作員需要對某個(gè)或多個(gè)部門進(jìn)行刪除時(shí)，可以在編輯部門信息窗體下部中找到刪 除按鈕。由于刪除記錄不可能在大量的數(shù)據(jù)中盲目的

20、尋找，因此數(shù)據(jù)刪除也有數(shù)據(jù)查找功 能，先在對應(yīng)的文本框中輸入要進(jìn)行數(shù)據(jù)刪除的條件，再按刪除按鈕，系統(tǒng)便會列出滿足 刪除條件的部門記錄，并提示是否刪除滿足條件的全部部門記錄，也可以一條一條刪除部 門記錄，只要在數(shù)據(jù)表格中選中要?jiǎng)h除的部門記錄，在按一下刪除按鈕即可刪除數(shù)據(jù)。 (5)清空清空 清空按鈕的作用可使所有文本框清空，方便用戶進(jìn)行其它操作。 在下面各界面設(shè)置操作與上相同不再重復(fù)說明。 清空輸入信息代碼： private sub cmdclear_click() changecheck = false call txtkong dim n as integer for n = 0 to msf

21、lexgrid1.rows - 1 msflexgrid1.textmatrix(n, 0) = next n end sub 瀏覽部門信息瀏覽部門信息 此窗體主要針對一般用戶，只有瀏覽功能，因?yàn)橐话阌脩糁挥袨g覽的權(quán)限。并能從此 窗體中了解各部門現(xiàn)有人數(shù)，這是在編輯部門信息中無法獲得的信息。 圖 4.4 4.5 工信息管理工信息管理-添加、查詢、修改、刪除的實(shí)現(xiàn)添加、查詢、修改、刪除的實(shí)現(xiàn) 編輯員工信息編輯員工信息 作為編輯員工信息這一項(xiàng)，所實(shí)現(xiàn)的功能是對公司員工資料信息的存儲與編輯，方便 對員工的分類與管理。員工編號具有唯一性，不能重復(fù)。在此窗體中輸入的信息都進(jìn)過合 法性檢測，判斷員工編號是

22、否出現(xiàn)重復(fù)，位數(shù)是否為 6 位（前兩位為部門編號，后四位為 員工自身編號）等。 圖 4.5 瀏覽員工信息瀏覽員工信息 此窗體主要針對一般用戶，只有瀏覽功能，因?yàn)橐话阌脩糁挥袨g覽的權(quán)限。并能根據(jù) 部門名稱、出生日期、來到公司工作的時(shí)間進(jìn)行員工信息查詢。 圖 4.6 4.6 勤信息管理勤信息管理-添加、查詢、修改、刪除的實(shí)現(xiàn)添加、查詢、修改、刪除的實(shí)現(xiàn) 編輯考勤信息編輯考勤信息 作為編輯考勤信息這一項(xiàng)，所實(shí)現(xiàn)的功能是對公司員工考勤資料信息的存儲與編 輯，方便對員工工作的考察。對員工進(jìn)行按月考勤，考核員工出勤、加班、遲到和早 退等一些信息。 圖 4.7 瀏覽考勤信息瀏覽考勤信息 此窗體主要針對一般用

23、戶，只有瀏覽功能，因?yàn)橐话阌脩糁挥袨g覽的權(quán)限。并能根據(jù) 部門名稱、考勤日期進(jìn)行員工考勤信息查詢。 圖 4.8 4.7 工工資管理工工資管理-添加、查詢、修改、刪除的實(shí)現(xiàn)添加、查詢、修改、刪除的實(shí)現(xiàn) 編輯工資信息編輯工資信息 作為編輯工資信息這一項(xiàng)，所實(shí)現(xiàn)的功能是對公司員工工資信息的存儲、計(jì)算與編輯， 方便對員工工資的管理。對員工工資進(jìn)行按月分組，計(jì)算員工各種工資項(xiàng)目和個(gè)人所得稅 款等一些信息。 圖 4.9 瀏覽工資信息瀏覽工資信息 此窗體主要針對一般用戶，只有瀏覽功能，因?yàn)橐话阌脩糁挥袨g覽的權(quán)限。并能根據(jù) 部門名稱、工資計(jì)發(fā)日期進(jìn)行員工工資信息查詢。 圖 4.10 4.8 系統(tǒng)維護(hù)系統(tǒng)維護(hù) 系

24、統(tǒng)維護(hù)選項(xiàng)里包括密碼設(shè)置、用戶管理、數(shù)據(jù)備份和數(shù)據(jù)恢復(fù)四個(gè)選項(xiàng)。用戶管理 功能只對管理員開放，管理員能在用戶管理窗體中添加新的用戶，對已有的用戶進(jìn)行用戶 名和密碼修改，或者將原有用戶刪除。當(dāng)一般用戶和操作員進(jìn)入時(shí)，菜單欄中無該項(xiàng)。 密碼設(shè)置密碼設(shè)置 圖 4.11 該界面比較簡單，能讓登陸的用戶修改自己的密碼，但不能更改用戶名，此項(xiàng)對所有 權(quán)限的用戶都適用。一進(jìn)入此窗體便會顯示此用戶名，在舊密碼框中輸入原始密碼，在新 密碼框中輸入想更改的新密碼，再在密碼確定中進(jìn)行新密碼確認(rèn)，按更改按鈕便可修改用 戶密碼。 用戶管理用戶管理 圖 4.12 該功能只針對管理員有效，用于對所有權(quán)限用戶口令的管理。能對

25、所有用戶進(jìn)行用戶 名、密碼、權(quán)限修改，不但能更改而且還能進(jìn)行用戶添加和刪除。 數(shù)據(jù)備份數(shù)據(jù)備份 數(shù)據(jù)備份就是復(fù)制數(shù)據(jù)庫的數(shù)據(jù)文件到其他地方，一面在數(shù)據(jù)庫遇到意外破壞的時(shí)候 能夠恢復(fù)數(shù)據(jù)庫，從而減少破壞造成的損失。在此系統(tǒng)中只把數(shù)據(jù)庫備份到軟盤中。 圖 4.13 數(shù)據(jù)恢復(fù)數(shù)據(jù)恢復(fù) 數(shù)據(jù)恢復(fù)就是將數(shù)據(jù)庫備份文件復(fù)制到當(dāng)前數(shù)據(jù)庫上，一面在數(shù)據(jù)庫遇到意外破壞的 時(shí)候能夠恢復(fù)數(shù)據(jù)庫，從而減少破壞造成的損失。在此系統(tǒng)中只從軟盤中恢復(fù)數(shù)據(jù)庫文件。 圖 4.14 第第 5 章章 系統(tǒng)功能測試系統(tǒng)功能測試 5.1 系統(tǒng)測試環(huán)境系統(tǒng)測試環(huán)境 1. 硬件環(huán)境： piii 800 128mb 內(nèi)存 40g 硬盤 2.

26、 軟件環(huán)境： 操作系統(tǒng)：windows xp 數(shù)據(jù)庫：access 2000 程序開發(fā)工具： visual basic 6.0 5.2 測試內(nèi)容測試內(nèi)容 測試了部門信息管理-添加、查詢、修改、刪除 測試了員工信息管理-添加、查詢、修改、刪除 測試了考勤信息管理-添加、查詢、修改、刪除 測試了員工工資管理-添加、查詢、修改、刪除 測試了系統(tǒng)維護(hù)密碼設(shè)置、用戶管理、數(shù)據(jù)備份、數(shù)據(jù)恢復(fù) 5.3 測試結(jié)果測試結(jié)果 測試結(jié)果軟件運(yùn)行一切正常。 結(jié)束語結(jié)束語 本次的公司人事管理系統(tǒng)是基于 visual basic 的 ado 技術(shù)設(shè)計(jì)的。選擇了 access 2000 作為后端開發(fā)工具，開發(fā)數(shù)據(jù)庫功能，并

27、選擇了 visual basic 6.0 作為界面前臺開發(fā) 工具。在該系統(tǒng)開發(fā)中我通過建立數(shù)據(jù)庫，以及對各種信息庫的開發(fā)（如：添加、查詢、 修改、刪除資料）及設(shè)計(jì)系統(tǒng)維護(hù)安全部分，完成了此次對公司人事管理系統(tǒng)的設(shè)計(jì)。 在本次的開發(fā)過程中，我意識到最重要的環(huán)節(jié)在于對系統(tǒng)的流程、功能模塊、框架結(jié) 構(gòu)等方面的把握和設(shè)計(jì)。在需求分析結(jié)束以后，我們對一個(gè)系統(tǒng)需要具有哪些功能已經(jīng)有 了一定的認(rèn)識，而如何以一個(gè)簡潔、合理的系統(tǒng)結(jié)構(gòu)去實(shí)現(xiàn)用戶要求的功能就成為系統(tǒng)開 發(fā)的關(guān)鍵環(huán)節(jié)。在這方面我可以說是深有體會。由于有些急于求成，在對 ado 技術(shù)不是 很了解的情況下就開始著手程序開發(fā)，所以當(dāng)有時(shí)間靜下來仔細(xì)理一下

28、思路的時(shí)候發(fā)現(xiàn)走 了很大的彎路，可以說是整個(gè)思路和設(shè)計(jì)要求有著非常大的差異。值得慶幸的是，發(fā)現(xiàn)的 比較及時(shí)，還有足夠的時(shí)間讓我轉(zhuǎn)變思路，從頭開始。因此，通過這次公司人事管理系統(tǒng) 的開發(fā)，我深刻認(rèn)識到系統(tǒng)分析，以及對整個(gè)系統(tǒng)的總體設(shè)計(jì)的重要性。只有走好了這一 步，整個(gè)系統(tǒng)的開發(fā)才能事半功倍，否則就會是“棋差一著，滿盤皆輸” 。 同時(shí)，在這次的系統(tǒng)開發(fā)中我也看到了自己在新知識的學(xué)習(xí)，新工具的應(yīng)用方面的不 足。開始時(shí)，我對 visual basic 和 access 可以說只是停留在書面上的了解，還不夠深入透 徹。系統(tǒng)的開發(fā)過程也就成為我對這兩種開發(fā)工具的深入透徹學(xué)習(xí)的過程。正因?yàn)檫@樣， 所以在設(shè)計(jì)

29、過程中往往會被一些問題卡住。在原地徘徊了一段時(shí)間后，我通過查找參考資 料，和同學(xué)交流，利用互聯(lián)網(wǎng)向有經(jīng)驗(yàn)的編程人員請教等各種方式試著克服在設(shè)計(jì)過程中 遇到的困難。隨著開發(fā)設(shè)計(jì)的深入，我也逐漸掌握了一部分編程技巧，了解了一些關(guān)于編 程方面的規(guī)律，一些困難也就迎刃而解了。 總之，這次的公司人事管理系統(tǒng)開發(fā)過程對我來說不僅僅是一次畢業(yè)設(shè)計(jì)，這也是我 一次有意義的學(xué)習(xí)、提高的過程。通過這次系統(tǒng)開發(fā)，我不但初步掌握了兩種數(shù)據(jù)庫系統(tǒng) 開發(fā)工具，也讓我看到了自己知識結(jié)構(gòu)、知識儲備、學(xué)習(xí)和應(yīng)用能力上的不足。我想，在 今后的學(xué)習(xí)和工作中，我將針對這些發(fā)現(xiàn)的問題，不斷努力和提高自身各方面的素質(zhì)，為 社會作出自己應(yīng)

30、有的貢獻(xiàn) 本人事管理系統(tǒng)的順利完成，還要感謝老師的大力幫助與細(xì)心指導(dǎo)！ 參考文獻(xiàn)參考文獻(xiàn) 1 襲沛曾 陸慰民 楊志強(qiáng)編著. visual basic 程序設(shè)計(jì)教程（6.0 版）m.北京:高等 教育出版社.2000 年 2 肖建 薛鳳武 吳靜編著. visual basic 6.0 基礎(chǔ)教程m.北京:中國電力出版社. 2002 年 3 張大年 廖智勇 劉檢鋒編著. visual basic 數(shù)據(jù)庫應(yīng)用開發(fā)與實(shí)例m.北京：清華大 學(xué)出版社.2002 年 4 楊宗志編著. visual basic 數(shù)據(jù)庫程序設(shè)m. 北京：清華大學(xué)出版社.2001 年 5 陳豫龍 何旭洪編著. visual basi

31、c 6.0 數(shù)據(jù)庫開發(fā)實(shí)例導(dǎo)航m.上海：人民郵電出 版.2002 年 6 黃明 梁旭編著. visual basic 6.0 時(shí)尚編程百例m.重慶：機(jī)械工業(yè)出版社 2001 年 7 飛思科技產(chǎn)品研發(fā)中心 access 2000 數(shù)據(jù)處理技術(shù)m. 北京: 電子工業(yè)出版. 2001 年 附錄附錄 部分窗體程序代碼部分窗體程序代碼: 1 用戶登陸 dim rc as new adodb.recordset 定義記錄集變量 dim i as integer 檢測輸入口令的次數(shù) dim dlyonghuming as string dim dlquanxian as string private sub

32、 datasave() 數(shù)據(jù)存儲 dim sql as string sql = sql = insert into 登陸日志 & space$(1) sql = sql & ( sql = sql & 登陸日期 sql = sql & ,登陸時(shí)間 sql = sql & ,用戶名 sql = sql & ,權(quán)限 sql = sql & ) sql = sql & values ( sql = sql & & date & sql = sql & , & time & sql = sql & , & dlyonghuming & sql = sql & , & dlquanxian & sql

33、 = sql & ) cnndb.execute (sql) end sub private sub datafind() 數(shù)據(jù)查找 dim sql as string if txtyhm.text = then sql = select * from 口令信息 where 用戶名= or 用戶名 is null else sql = select * from 口令信息 where 用戶名= & txtyhm.text & end if if rc.state = 1 then rc.close rc.open sql, cnndb, 3, 2 if rc.eof then msgbox 用

34、戶名不存在!, vbinformation txtyhm.setfocus i = i + 1 if i = 5 then end end if exit sub else if txtyhm.text = and txtmm.text = then sql = select * from 口令信息 where (用戶名 = or 用戶名 is null) and (密碼 = or 密碼 is null) elseif txtyhm = and txtmm then sql = select * from 口令信息 where (用戶名 = or 用戶名 is null) and 密碼 = &

35、 txtmm.text & elseif txtyhm and txtmm = then sql = select * from 口令信息 where 用戶名 = & txtyhm.text & and (密 碼 = or 密碼 is null) else sql = select * from 口令信息 where 用戶名 = & txtyhm.text & and 密 碼 = & txtmm.text & end if if rc.state = 1 then rc.close rc.open sql, cnndb, 3, 2 if rc.eof then msgbox 密碼不正確!, v

36、binformation txtmm.setfocus i = i + 1 if i = 5 then end end if exit sub else dlyonghuming = rc.fields(用戶名).value dlquanxian = rc.fields(權(quán)限).value if rc.fields(權(quán)限).value = 管理員 then quanxian = (管理員) end if if rc.fields(權(quán)限).value = 操作員 then quanxian = (操作員) 主窗體.men_yhgl.visible = false 主窗體.men_dlrz.vis

37、ible = false end if if rc.fields(權(quán)限).value = 一般用戶 then quanxian = (一般用戶) 主窗體.men_bjbmxx.visible = false 主窗體.men_bjygxx.visible = false 主窗體.men_bjkqxx.visible = false 主窗體.men_bjgzxx.visible = false 主窗體.men_sjbf.visible = false 主窗體.men_sjhf.visible = false 主窗體.men_gng.visible = false 主窗體.men_yhgl.visi

38、ble = false 主窗體.men_dlrz.visible = false end if yonghuming = txtyhm.text mima = txtmm.text call datasave unload me 主窗體.show end if end if end sub private sub cmdadd_click() call datafind end sub private sub cmdexit_click() end end sub private sub form_keydown(keycode as integer, shift as integer) se

39、lect case keycode case vbkeyf1 cmdadd_click case vbkeyf2 cmdexit_click end select end sub private sub form_load() me.top = (screen.height - me.height) / 2 me.left = (screen.width - me.width) / 2 end sub private sub txtmm_keypress(keyascii as integer) if keyascii = vbkeyreturn then cmdadd.setfocus en

40、d sub private sub txtyhm_keypress(keyascii as integer) if keyascii = vbkeyreturn then txtmm.setfocus end sub 控制由“用戶登錄”界面控制。 dim cmdsize as integer 按鈕位置變化標(biāo)志參數(shù) private sub command1_click() cmdsize = 1 if quanxian = (一般用戶) then pbm1.visible = true pbm1.enabled = false pbm2.visible = true labbm1.visible

41、 = true labbm1.enabled = false labbm2.visible = true else pbm1.visible = true pbm2.visible = true labbm1.visible = true labbm2.visible = true end if pyg1.visible = false pyg2.visible = false labyg1.visible = false labyg2.visible = false pkq1.visible = false pkq2.visible = false labkq1.visible = fals

42、e labkq2.visible = false pgz1.visible = false pgz2.visible = false labgz1.visible = false labgz2.visible = false command1.top = 0 command4.top = picture1.scaleheight - 49.457 command3.top = command4.top - 49.457 command2.top = command4.top - 49.457 * 2 end sub private sub command2_click() cmdsize =

43、2 pbm1.visible = false pbm2.visible = false labbm1.visible = false labbm2.visible = false if quanxian = (一般用戶) then pyg1.visible = true pyg1.enabled = false pyg2.visible = true labyg1.visible = true labyg1.enabled = false labyg2.visible = true else pyg1.visible = true pyg2.visible = true labyg1.visi

44、ble = true labyg2.visible = true end if pkq1.visible = false pkq2.visible = false labkq1.visible = false labkq2.visible = false pgz1.visible = false pgz2.visible = false labgz1.visible = false labgz2.visible = false command1.top = 0 command2.top = 47.958 command4.top = picture1.scaleheight - 49.457 command3.top = command4.top - 49.457 end sub private sub command3_click() cmdsize = 3 pbm1.visible = false pbm2.visible = false labbm1.visible =