人事檔案管理論文終稿

1、重慶大學(xué)網(wǎng)絡(luò)教育學(xué)院 畢業(yè)設(shè)計(jì)（論文）題目 人事檔案管理 學(xué)生所在校外學(xué)習(xí)中心 浙江臺州 批次 層次 專業(yè) 062 高升專 計(jì)算機(jī)科學(xué)與技術(shù) 學(xué) 號 w06202174 學(xué) 生 陳 儉 指 導(dǎo) 教 師 王立峰 起 止 日 期 2008年3月5日至2008年4月5日17重慶大學(xué)網(wǎng)絡(luò)教育學(xué)院學(xué)生畢業(yè)設(shè)計(jì)（論文）任務(wù)書批次、層次、專業(yè) 062高起專 計(jì)算機(jī)科學(xué)與技術(shù) 校外學(xué)習(xí)中心 浙江臺州 學(xué)生姓名 陳儉 學(xué)號 w06202174 一、 設(shè)計(jì)（論文）題目 人事檔案管理 二、畢業(yè)設(shè)計(jì)（論文）工作自 08年 2月 25日起至 08年 4月 10 日止三、畢業(yè)設(shè)計(jì)（論文）內(nèi)容要求 對人事檔案管理系統(tǒng)的開發(fā)

2、分析，系統(tǒng)設(shè)計(jì)分析，系統(tǒng)實(shí)施分析 考慮數(shù)據(jù)庫的安全性穩(wěn)定性操作性。 四、達(dá)到的技術(shù)指標(biāo)及要求：1、系統(tǒng)設(shè)計(jì)分析2、系統(tǒng)實(shí)施分析3、數(shù)據(jù)庫的安全、穩(wěn)定、操作性分析五、主要參考文獻(xiàn)：指 導(dǎo) 教 師 王立峰 下 發(fā) 日 期 08.3.9 摘 要本文對所設(shè)計(jì)的人事檔案管理軟件的主要功能、設(shè)計(jì)過程、設(shè)計(jì)思路作了介紹，描述了數(shù)據(jù)庫的設(shè)計(jì)步驟，首先進(jìn)行需求分析，然后畫出數(shù)據(jù)流程圖，再進(jìn)行數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)、數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)到功能的實(shí)現(xiàn)。在整個系統(tǒng)的設(shè)計(jì)過程中，著重考慮了系統(tǒng)運(yùn)行的安全性、完整性和操作簡單性，在篇幅上對系統(tǒng)登錄、數(shù)據(jù)查詢以及數(shù)據(jù)庫的連接作了重點(diǎn)敘述。本系統(tǒng)以visual basic 6.0為

3、開發(fā)工具，采用access數(shù)據(jù)庫，在windows xp平臺調(diào)試通過。本系統(tǒng)有系統(tǒng)設(shè)置、檔案管理、考勤管理、評價(jià)管理、調(diào)動管理、工資管理六大功能模塊，總體上說具有編輯，查詢，用戶管理、數(shù)據(jù)統(tǒng)計(jì)和報(bào)表打印功能?！娟P(guān)鍵詞】人事檔案 數(shù)據(jù)流程圖 數(shù)據(jù)庫 開發(fā)工具目 錄摘 要i1.引言12.系統(tǒng)概述12.1 總體結(jié)構(gòu)和主要功能12.2 系統(tǒng)模型22.3 開發(fā)工具簡介23.數(shù)據(jù)庫設(shè)計(jì)33.1 數(shù)據(jù)庫需求分析33.2 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)43.3 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)54.主要模塊的功能設(shè)計(jì)及代碼84.1 系統(tǒng)登錄模塊84.2 系統(tǒng)設(shè)置模塊114.3 查詢模塊124.4 統(tǒng)計(jì)報(bào)表模塊154.5 vb 6.0與

4、access2000數(shù)據(jù)庫的連接155.系統(tǒng)測試166.結(jié)束語17參考文獻(xiàn)：171. 引言今天的社會已進(jìn)入知識化、信息化時(shí)代，信息的多樣化已經(jīng)使得我們過去獲取信息的渠道發(fā)生了革命性的變化，這對企事業(yè)單位的人事檔案管理提出了嚴(yán)峻的挑戰(zhàn)。盡管計(jì)算機(jī)已得到普及，各種各樣的人事信息檔案管理軟件應(yīng)運(yùn)而生，但是有些單位人事管理尚停留在word文字紀(jì)錄，excel數(shù)值計(jì)算等單一文件儲存管理階段，有些甚至還用純?nèi)斯ぷ鳂I(yè)，這對于高速的經(jīng)濟(jì)發(fā)展及不相應(yīng)。例如，企業(yè)人員變動信息、勞動工資的統(tǒng)計(jì)、員工每天出勤狀況等，都要花費(fèi)大量的時(shí)間和精力。為此，本人根據(jù)單位情況，利用兩年在校學(xué)到的計(jì)算機(jī)編程知識，開發(fā)了一套人事檔案

5、管理系統(tǒng)軟件。由于初次編程，所學(xué)知識有限，軟件很不完善，需要在以后的工作中不斷更新和改進(jìn)。2. 系統(tǒng)概述2.1 總體結(jié)構(gòu)和主要功能本系統(tǒng)采用客戶/服務(wù)器兩層結(jié)構(gòu)模型，前臺用戶界面采用visual basic語言編寫，后臺采用access數(shù)據(jù)庫，前臺應(yīng)用程序與后臺數(shù)據(jù)庫連接采用的是ado技術(shù)。整個系統(tǒng)可分為六大功能模塊和一個系統(tǒng)登陸模塊，每個模塊能夠完成相對獨(dú)立的功能。在每個功能模塊中都設(shè)置了數(shù)據(jù)查詢和統(tǒng)計(jì)報(bào)表打印子模塊，這樣安排的目的是便于今后軟件的維護(hù)和擴(kuò)充。本系統(tǒng)主要是為人事檔案進(jìn)行服務(wù)，具有對人事的變動、人事資料、以及人事資料的查詢，考勤管理，勞動工資管理、統(tǒng)計(jì)報(bào)表打印等功能。具體來說，

6、系統(tǒng)具有以下功能特點(diǎn)：(1) 具有數(shù)據(jù)記錄編輯功能，可以對記錄進(jìn)行增加，修改，更新，刪除，瀏覽等編輯操作，并將查詢方式有機(jī)溶入編輯界面，可以實(shí)現(xiàn)對某項(xiàng)記錄定位，再進(jìn)行編輯，修改，更新。(2) 多個數(shù)據(jù)庫表的任意組合條件的查詢。便于在實(shí)際檔案管理操作中對各種情況，多種條件下的人員情況進(jìn)行統(tǒng)計(jì)查看。(3) 具備分級用戶權(quán)限管理設(shè)置，以確保檔案的保密性和安全性。(4) 具有分類統(tǒng)計(jì)，使用圖表顯示的功能，該統(tǒng)計(jì)圖表可根據(jù)數(shù)據(jù)庫中記錄情況的變化而變化。能夠編輯排版各種式樣的統(tǒng)計(jì)報(bào)表和打印功能。(5) 具有可視化的人機(jī)界面，各種操作可以在直觀的界面上通過人機(jī)交互式進(jìn)行。2.2 系統(tǒng)模型本系統(tǒng)模型如下圖2-

7、1所示：啟動窗體口令檢驗(yàn)主窗體用戶管理模塊檔案管理模塊考勤管理模塊員工評價(jià)管理員工工資管理員工調(diào)動管理圖21系統(tǒng)模型2.3 開發(fā)工具簡介visual basic是一種可視化的、面向?qū)ο蠛筒捎檬录?qū)動方式的結(jié)構(gòu)化高級程序設(shè)計(jì)語言，可用于開發(fā)windows環(huán)境下的種類應(yīng)用程序。它簡單易學(xué)、效率高，且功能強(qiáng)大，它不需編寫大量代碼去描述接口元素的外觀和位置,而只要把預(yù)先建立的對象安放到設(shè)計(jì)窗口的某一位置即可。同時(shí)，visual basic支持多種數(shù)據(jù)庫系統(tǒng)的訪問、支持動態(tài)數(shù)據(jù)交換（dde）、動態(tài)鏈接庫（dll）和對象的鏈接與嵌入(ole)等技術(shù)。vb有三種工作模式：設(shè)計(jì)模式、運(yùn)行模式和中斷模式。（1）

8、 設(shè)計(jì)模式：可進(jìn)行用戶界面的設(shè)計(jì)和代碼的編制，以完成應(yīng)用程序的開發(fā)。（2） 運(yùn)行模式：運(yùn)行應(yīng)用程序，這時(shí)不可編輯代碼，也不可編輯界面。（3） 中斷模式：應(yīng)用程序運(yùn)行暫時(shí)中斷，這時(shí)可以編輯代碼，但不可編輯界面。按f5鍵或單擊“繼續(xù)”按鈕程序繼續(xù)運(yùn)行；單擊“結(jié)束”按鈕程序停止運(yùn)行。在此模式會彈出“立即”窗口，在窗口內(nèi)可以輸入簡短的命令，并可以立即執(zhí)行。visual basic是解釋型語言，在輸入代碼的同時(shí)，解釋系統(tǒng)將高級語言分解翻譯成計(jì)算機(jī)可以識別的機(jī)器指令，并判斷每個語句的語法錯誤。在設(shè)計(jì)visual basic程序的過程中，隨時(shí)可以運(yùn)行程序，而在整個程序設(shè)計(jì)好之后，可以編譯生成可執(zhí)行文件(.e

9、xe)，脫離visual basic環(huán)境，直接在windows環(huán)境下運(yùn)行。visual basic具有強(qiáng)大的數(shù)據(jù)庫管理功能，利用數(shù)據(jù)控件和數(shù)據(jù)庫管理窗口，可以直接建立或處理microsoft access格式的數(shù)據(jù)庫，并提供了強(qiáng)大的數(shù)據(jù)存儲和檢索功能。同時(shí)，visual basic還能直接編輯和訪問其他外部數(shù)據(jù)庫，如dbase，foxpro，paradox等，這些數(shù)據(jù)庫格式都可以用visual basic編輯和處理。microsoft access是一個關(guān)系型桌面數(shù)據(jù)庫管理系統(tǒng),它可以用來建立中、小型的數(shù)據(jù)庫應(yīng)用系統(tǒng)。microsoft access最重要的特征是不需要編寫程序。它把數(shù)據(jù)庫應(yīng)用

10、程序的建立移到了用戶環(huán)境中, 數(shù)據(jù)庫的管理者不再需要具有程序設(shè)計(jì)能力,除非在執(zhí)行復(fù)雜的操作。利用系統(tǒng)提供的向?qū)Щ蛘呱善?再利用幾個簡單的宏或者vba語句,就可以迅速建立簡單的應(yīng)用程序。access中的數(shù)據(jù)庫文件不是簡單的存儲數(shù)據(jù)的表,這是access與其它桌面數(shù)據(jù)庫的一個重要區(qū)別。access數(shù)據(jù)庫文件不僅包含傳統(tǒng)意義上的表,還包括操作或者控制數(shù)據(jù)庫的其它對象。access的單一文件包含了所有相關(guān)的表、查詢、窗體、報(bào)表等的定義,即使是用vba所寫的程序代碼也包含在數(shù)據(jù)庫文件中。使用 microsoft access 可以在一個數(shù)據(jù)庫文件中管理所有的用戶信息。在該文件中，可以用表存儲數(shù)據(jù)，用查

11、詢查找和檢索所需的數(shù)據(jù)，用窗體查看、添加和更新表中的數(shù)據(jù)，用報(bào)表以特定的版式分析或打印數(shù)據(jù)，用數(shù)據(jù)訪問頁查看、更新或分析來自 internet 或 intranet 的數(shù)據(jù)庫數(shù)據(jù)。由于它功能豐富，語言簡捷倍受用戶及計(jì)算機(jī)工業(yè)界歡迎，被眾多計(jì)算機(jī)公司和軟件公司所采用。因此，本系統(tǒng)選用visual basic語言編寫前臺用戶界面，選用access數(shù)據(jù)庫作為后臺支持。ado（active data objects），實(shí)際是一種提供訪問各種數(shù)據(jù)類型的連接機(jī)制。ado設(shè)計(jì)為一種極簡單的格式，通過odbc的方法同數(shù)據(jù)庫接口相連，用戶不僅可以使用sql server、oracle、access等數(shù)據(jù)庫應(yīng)用程

12、序，也可以使用excel表格、文本文件、圖形文件和無格式的數(shù)據(jù)文件。microsoft在visual basic6。0以后的版本都集成了ado，它與以前visual basic的dao、rdo相比有了很大的提高，并且可以通過簡單的編程實(shí)現(xiàn)和各種數(shù)據(jù)結(jié)構(gòu)進(jìn)行連接。3. 數(shù)據(jù)庫設(shè)計(jì)3.1 數(shù)據(jù)庫需求分析用戶的需求具體體現(xiàn)在各種信息的添加、修改、刪除和查詢等方面，這就要求數(shù)據(jù)庫結(jié)構(gòu)能充分滿足各種信息的輸出和輸入。在企業(yè)人事管理中主要是管理員工檔案、員工調(diào)動、員工評價(jià)、員工考勤、員工工資等信息的操作。收集基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程，組成一份詳盡的數(shù)據(jù)字典，為后面的具體設(shè)計(jì)打下基礎(chǔ)。本系統(tǒng)的數(shù)

13、據(jù)流程圖如下圖3-1所示：員工檔案管理評價(jià)信息管理員工調(diào)動調(diào)動信息管理員工檔案員工考勤考勤信息管理工資信息管理調(diào)動信息錄入員工基本信息錄入考勤信息輸入工資信息輸入評價(jià)信息錄入員工評價(jià)工資標(biāo)準(zhǔn)圖3-1系統(tǒng)數(shù)據(jù)流程圖3.2 數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)根據(jù)分析規(guī)劃出的實(shí)體有：員工檔案信息實(shí)體、員工調(diào)動信息實(shí)體、員工工資信息實(shí)體、考勤信息實(shí)體、員工評價(jià)信息實(shí)體。各個實(shí)體具體的描述如下：員工檔案信息實(shí)體-圖如下圖3-2所示員工檔案信息實(shí)體員工編號員工姓名參加工作時(shí)間工作經(jīng)驗(yàn)圖3-2員工檔案信息實(shí)體-圖員工調(diào)動信息實(shí)體-圖如下圖3-3所示員工調(diào)動信息實(shí)體員工編號員工姓名調(diào)出時(shí)間調(diào)入時(shí)間圖 3-3員工調(diào)動信息實(shí)體-

14、圖員工工資信息實(shí)體-圖如下圖3-4所示員工工資信息實(shí)體員工編號員工姓名實(shí)發(fā)工資計(jì)發(fā)時(shí)間圖3-4員工工資信息實(shí)體-圖考勤信息實(shí)體圖、員工評價(jià)信息實(shí)體圖略3.3 數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)現(xiàn)在需要將上面的數(shù)據(jù)庫概念結(jié)構(gòu)轉(zhuǎn)化為access數(shù)據(jù)庫系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫的邏輯結(jié)構(gòu)。（1） 職工信息數(shù)據(jù)表：字段名數(shù)據(jù)類型關(guān)鍵字段說明員工編號文本是員工姓名文本否性別文本否男、女籍貫文本否出生年月日期/時(shí)間否學(xué)歷文本否本科、大專等專業(yè)文本否（2） 員工考勤表：字段名數(shù)據(jù)類型關(guān)鍵字段說明員工編號文本是員工姓名文本否性別文本否男、女職務(wù)文本否程序員等所在部門文本否后勤部等全勤天數(shù)數(shù)字否31、30應(yīng)出勤天數(shù)

15、數(shù)字否（3） 用戶管理表：字段名數(shù)據(jù)類型關(guān)鍵字段說明用戶名稱文本是用戶口令文本是用戶權(quán)限文本是(4) 調(diào)動信息表：字段名數(shù)據(jù)類型關(guān)鍵字段說明員工編號文本是員工姓名文本否原部門名稱文本否新部門名稱文本否原職務(wù)文本否新職務(wù)文本否調(diào)出時(shí)間日期/時(shí)間否調(diào)入時(shí)間日期/時(shí)間否(5) 員工評價(jià)表：字段名數(shù)據(jù)類型關(guān)鍵字段說明員工編號文本是員工姓名文本否所在部門文本否評價(jià)日期文本否工作業(yè)績文本否工作態(tài)度數(shù)字否態(tài)度說明數(shù)字否(6) 員工工資表：字段名數(shù)據(jù)類型關(guān)鍵字段說明員工編號文本是員工姓名文本否所在部門文本否基本工資數(shù)字否加班費(fèi)數(shù)字否補(bǔ)貼數(shù)字否房貼數(shù)字否4. 主要模塊的功能設(shè)計(jì)及代碼4.1 系統(tǒng)登錄模塊系統(tǒng)登錄

16、模塊是在系統(tǒng)被訪問之前，要對進(jìn)入系統(tǒng)的用戶進(jìn)行安全性檢查，防止非法用戶進(jìn)行系統(tǒng)破壞數(shù)據(jù)及威脅系統(tǒng)安全，避免不必要的損失。只有合法的用戶在輸入正確的密碼后方可進(jìn)入系統(tǒng)。通過判斷用戶表中權(quán)限字段的值，登錄主界面有兩種身份，當(dāng)權(quán)限值為administrators時(shí)，以管理員身份登錄；權(quán)限值不為administrators時(shí)，以游客身份登錄。當(dāng)以管理員身份登錄時(shí)，除了普通用戶擁有的權(quán)限以外，還可以管理用戶、管理員工檔案、管理員工考勤信息、管理評價(jià)信息、管理員工調(diào)動信息、以及管理員工工資等操作。為了減少進(jìn)入系統(tǒng)時(shí)輸入用戶名和密碼的時(shí)間我設(shè)定默認(rèn)狀態(tài)下管理員名稱為administrator，口令為admi

17、n。系統(tǒng)啟動后，將首先出現(xiàn)如下圖4-1所示的用戶登錄窗體。圖4-1用戶登錄界面設(shè)計(jì)思想：根據(jù)輸入管理員名稱的值在管理用戶表中獲取權(quán)限，并把該值賦于變量group，判斷group的值是否等于administrators。當(dāng)group變量值為administrators時(shí)，表明以管理員身份登錄，系統(tǒng)所有功能均可操作；當(dāng)group變量值不為administrators時(shí)，表明以游客身份登錄，此時(shí)設(shè)置添加用戶按鈕、修改密碼按鈕、部門管理按鈕、添加/更新/刪除員工檔案按鈕、添加/修改/刪除考勤信息按鈕、添加/修改/刪除員工評價(jià)按鈕、添加/修改/刪除調(diào)動信息按鈕、計(jì)發(fā)員工工資按鈕以及整理員工工資按鈕的en

18、abled屬性為false狀態(tài)。 用戶如果沒有輸入用戶名和用戶密碼，將出現(xiàn)消息提示。如果輸入的用戶名在管理用戶表格中沒有找到，將提示重新輸入用戶名。定義counts,用來記載輸入密碼的次數(shù)，一旦三次輸入密碼均不正確，將出現(xiàn)警告提示并退出程序。登錄界面的程序流程圖如下圖4-2所示：打開管理用戶表輸入管理員名稱及口令判斷輸入是否正確判斷登錄身份group登錄到主窗體界面提示請重新輸入屏蔽部分功能判斷輸錯次數(shù)是否大于3退出系統(tǒng)yyynnn 圖4-2登錄界面的程序流程圖程序?qū)崿F(xiàn)的原代碼如下：private sub form_load()winxplogin.initsubclassing/加載主窗時(shí)給

19、文本框賦值txtusername.text = administratortxtpassword.text = adminend subprivate sub cmdlogin_click()dim strsql as stringusername = cstr(trim(txtusername.text) /將文本框內(nèi)的值賦給定義好的全局變量password = cstr(trim(txtpassword.text)if username empty and password empty then /用戶名與密碼是否為空 strsql = select 用戶名稱,用戶口令,用戶權(quán)限 from

20、 管理用戶 where 用戶名稱= & username & and 用戶口令 = & password & if rslogincheck.state = adstateclosed then rslogincheck.open strsql, dbcon, adopenkeyset, adlockpessimistic, adcmdtext /打開記錄集 end if group = rslogincheck.fields(2).value if rslogincheck.fields(2).value administrators then call checklogin end if

21、if rslogincheck.recordcount 0 then /判斷記錄集記錄條數(shù)是否為0 rslogincheck.close unload me frmmdimain.show /顯示主窗 frmday.show vbmodal elseif counts 2 then msgbox 用戶名域密碼錯誤, vbexclamation + vbokonly, 登錄失敗 rslogincheck.close /關(guān)閉記錄集 counts = counts + 1 else msgbox 密碼錯誤不得超過三次，否則視您為非法用戶！, vbcritical, 警告 end end ifelse

22、 msgbox 用戶名密碼不能為空, vbexclamation + vbokonly, 登錄失敗 call form_loadend ifend sub登錄成功后，進(jìn)入系統(tǒng)主窗體。主窗體界面如下圖4-3所示：圖4-3主窗體界面4.2 系統(tǒng)設(shè)置模塊 系統(tǒng)設(shè)置模塊具有用戶管理、部門管理、重新登陸、系統(tǒng)鎖定、關(guān)閉窗口、退出系統(tǒng)功能。整個人事管理系統(tǒng)由多個功能模塊組成，不同的模塊完成不同的功能，所以可以為不同的職工分配不同的功能，使其具有不同的權(quán)限，完成其權(quán)限所對應(yīng)的功能，從而很好地管理好整個系統(tǒng)。其用戶管理子模塊可以實(shí)現(xiàn)以下功能：1、添加用戶：設(shè)置使用人事管理系統(tǒng)的用戶及其使用權(quán)限。添加用戶界面如

23、下圖4-4所示：圖4-4添加用戶界面選擇該功能后，可輸入新用戶的內(nèi)容，如：用戶名稱，密碼和權(quán)限。所輸入的登錄名一定不能重復(fù)。2: 修改用戶： 修改用戶設(shè)置。按該按鈕后，就可修改選中用戶的用戶名，密碼和權(quán)限，每一權(quán)限對應(yīng)系統(tǒng)菜單上的一項(xiàng)功能，可為該用戶選擇任意的權(quán)限。用戶在使用本系統(tǒng)時(shí)，要求輸入用戶的口令，為了安全，用戶需建立一個只有自己才知道的特殊口令，通常，系統(tǒng)的權(quán)限分為三大部分，即：管理權(quán)限：設(shè)置用戶和系統(tǒng)參數(shù)。輸入權(quán)限：員工檔案輸入，考勤輸入，工資管理等。查詢權(quán)限：檔案查詢、檔案統(tǒng)計(jì)。根據(jù)需要，可以把這些功能分配給不同的員工。3: 刪除用戶： 按該按鈕后，選擇需要被刪除的用戶，經(jīng)確認(rèn)，則

24、選中的用戶被刪除。4.3 查詢模塊 查詢模塊安排在相應(yīng)的主模塊下，可以實(shí)現(xiàn)員工檔案、考勤信息、員工評價(jià)、調(diào)動信息、員工工資的相應(yīng)模塊的信息查詢。查詢可以按員工編號、員工姓名、年份、時(shí)間等多種查詢方法，查詢結(jié)果顯示符合查詢條件的記錄條數(shù)，以及記錄的詳細(xì)信息。如查詢員工檔案，查詢界面如下圖4-5所示圖4-5查詢界面程序?qū)崿F(xiàn)的原代碼如下：private sub cmdquery_click()dim strsql as string strsql = select * from 員工檔案 where /給定義好的字符變量賦予sql語句 /判斷復(fù)選框有一個選中時(shí),則 if chkcode.value

25、= 1 or chkname.value = 1 or chkdate.value = 1 then /判斷三個復(fù)選框同時(shí)選中時(shí),則 if chkcode.value = 1 and chkname.value = 1 and chkdate.value = 1 then strsql = strsql & 員工編號= & trim(txtcode.text) & & and & 員工姓名 = & trim(txtname.text) & & and & 進(jìn)入公司時(shí)間 between # & dtpfromdate.value & # and # & dtptodate.value & # &

26、 /判斷編號與姓名復(fù)選框選中時(shí),則 elseif chkcode.value = 1 and chkname.value = 1 then strsql = strsql & 員工編號= & trim(txtcode.text) & & and & 員工姓名 = & trim(txtname.text) & /判斷編號與進(jìn)入公司時(shí)間復(fù)選框選中時(shí),則 elseif chkcode.value = 1 and chkdate.value = 1 then strsql = strsql & 員工編號= & trim(txtcode.text) & & and & 進(jìn)入公司時(shí)間 between #

27、& dtpfromdate.value & # and # & dtptodate.value & # & /判斷姓名與進(jìn)入公司時(shí)間復(fù)選框選中時(shí),則 elseif chkname.value = 1 and chkdate.value = 1 then strsql = strsql & 員工姓名 = & trim(txtname.text) & & and & 進(jìn)入公司時(shí)間 between # & dtpfromdate.value & # and # & dtptodate.value & # & else if chkcode.value = 1 then /只有編號復(fù)選框選中時(shí),則 s

28、trsql = strsql & 員工編號= & trim(txtcode.text) & end if if chkname.value = 1 then /只有姓名復(fù)選框選中時(shí),則 strsql = strsql & 員工姓名 = & trim(txtname.text) & end if if chkdate.value = 1 then /只有進(jìn)入公司時(shí)間復(fù)選框選中時(shí),則 strsql = strsql & 進(jìn)入公司時(shí)間 between # & dtpfromdate.value & # and # & dtptodate.value & # & end if end if if rs

29、qrecord.state = adstateclosed then rsqrecord.open strsql, dbcon, adopenkeyset, adlockoptimistic, adcmdtext end if set vsdatarecord.datasource = rsqrecord.datasource lblcount.caption = rsqrecord.recordcount /將記錄條數(shù)顯示在標(biāo)簽上 vsdatarecord.refresh /刷新網(wǎng)格 rsqrecord.close /關(guān)閉記錄集 txtcode.text = empty /請空文本框 txt

30、name.text = empty else if rstqrecord.state = adstateclosed then rstqrecord.open 員工檔案, dbcon, adopenkeyset, adlockoptimistic, adcmdtable end if set vsdatarecord.datasource = rstqrecord.datasource /設(shè)置網(wǎng)格的數(shù)據(jù)源 lblcount.caption = rstqrecord.recordcount end ifend sub4.4 統(tǒng)計(jì)報(bào)表模塊統(tǒng)計(jì)報(bào)表模塊同查詢模塊一樣安排在相應(yīng)的主模塊下，可以實(shí)現(xiàn)員工

31、統(tǒng)計(jì)報(bào)表、考勤信息報(bào)表、員工調(diào)動報(bào)表、員工工資報(bào)表的顯示打印功能，顯示畫面可以自由縮放，并具有將統(tǒng)計(jì)報(bào)表數(shù)據(jù)導(dǎo)出功能，可保存為html、txt等格式，保存范圍可以設(shè)定。4.5 vb 6.0與access2000數(shù)據(jù)庫的連接本系統(tǒng)采前臺采用visual basic 6.0語言編寫，后臺采用access2000數(shù)據(jù)庫，使用ado對象模型以編程方式實(shí)現(xiàn)對數(shù)據(jù)庫的處理。ado編程模型中其核心是connection對象、commeend對象和recordset對象。connection對象用于建立與數(shù)據(jù)源的連接，commeend可以在數(shù)據(jù)源中添加、刪除或更新數(shù)據(jù)或表中查詢數(shù)據(jù)，recordset是基于某

32、一連接的表或是commeend對象的執(zhí)行結(jié)果，所有 recordset 對象均使用記錄（行）和字段（列）進(jìn)行構(gòu)造。本系統(tǒng)在設(shè)計(jì)中考慮到系統(tǒng)中各個功能模塊都將頻繁使用數(shù)據(jù)庫中的各種數(shù)據(jù)，因此在公共模塊中，定義了大量的變量，并在程序啟動時(shí)首先運(yùn)行sub main()過程，以建立與數(shù)據(jù)庫連接。程序如下：/sub main啟動sub main() dbcon.connectionstring = provider=microsoft.jet.oledb.4.0;data source= & app.path & datebasedatebase.mdb;persist security info=fa

33、lse dbcon.open frmsystemload.showend sub這樣connection對象連接到了datebase.mdb數(shù)據(jù)庫。建立數(shù)據(jù)庫連接后，可以使用commeend對象和recordset對象對數(shù)據(jù)庫的訪問。例如，添加用戶操作：rsadduser.open 管理用戶, dbcon, adopenkeyset, adlockpessimistic, adcmdtable 打開記錄集rsadduser.addnew /在記錄集中添加一行新記錄rsadduser.fields(0).value=trim(txtusername.text) rsadduser.fields(1).v