計算機專業(yè)畢業(yè)論文--人力資源信息管理系統(tǒng)的設計與實現(xiàn)

1、<p>　　畢 業(yè) 論 文</p><p>　　人力資源信息管理系統(tǒng)的設計與實現(xiàn)</p><p>　　姓 名： </p><p>　　所在學院： 信息科技學院 </p><p>　　所學專業(yè)： 信息管理與信息系統(tǒng) </p&g

2、t;<p>　　班 級： </p><p>　　學 號： </p><p>　　指導教師： </p><p>　　完成時間： 2009-04-01 </p><p>　　畢業(yè)論文

3、（設計）任務書</p><p><b>　　摘 要</b></p><p>　　隨著現(xiàn)代企業(yè)制度的建立以及社會經濟的高速發(fā)展，企業(yè)人力資源已成為左右企業(yè)生存發(fā)展的重要因素，加強人力資源的有效管理和運作已成為企業(yè)提高競爭力的重要手段。</p><p>　　本文主要研究如何開發(fā)企業(yè)人力資源管理系統(tǒng)，解釋了開發(fā)人力資源管理系統(tǒng)的必要性和重要性,采

4、用Visual Basic.NET 和SQL Server 2000軟件作為開發(fā)工具,通過對計算機硬件和軟件解決方案的論證,對應用領域進行調查分析,參考許多資料，在指導老師的幫助下,詳細分析了人力資源管理系統(tǒng)的幾個主要設計階段:需求分析、概要設計和詳細設計,同時給出了系統(tǒng)實現(xiàn)的具體思想方案,并列舉了實際工程中的實例創(chuàng)建過程、方法和效果。</p><p>　　本系統(tǒng)實現(xiàn)了企業(yè)機構編制管理、職員信息管理、薪資福利管理

5、和系統(tǒng)管理等功能。</p><p>　　關鍵詞: 人力資源管理系統(tǒng)；系統(tǒng)；數(shù)據(jù)；信息</p><p><b>　　Abstract</b></p><p>　　With the establishment of modern enterprise information system and high-speed development of

6、society economy, the enterprise human resources has more and more become the significant factor which has dominated the subsistence and development of the enterprise, thus the enhancement of the effective management and

7、operation of enterprise human resources has become an essential means to improve the competition of the enterprise.</p><p>　　The text major study how to develop Human Resource Manage System ,explains the nec

8、essity and essentiality of developing Human Resource Management System .Adopt Visual Basic.NET and SQL Server 2000 software for develop tool ,with the demonstrate to solution of hardware and software, the investigation t

9、o application field ,refer to manage material, under the teacher’s help ,It analyses several primary design steps of the Human Resource Management System ,such as the requirement analysis ,general a</p><p>　

10、　The design implements Enterprise Organization Management , Office Worker Information Management , Salary Welfare Management and System Management etc.</p><p>　　Key Words:　Human Resource； Management System ；

11、 system, data； information</p><p><b>　　目　錄</b></p><p><b>　　第1章 緒論1</b></p><p>　　1.1 課題背景1</p><p>　　1.2 課題開發(fā)的意義1</p><p>　　1.3

12、 本文研究目標的內容2</p><p>　　1.4 系統(tǒng)平臺2</p><p>　　1.4.1 SQL Sever2000簡介........2</p><p>　　1.4.2 Visual Basic.NET簡介2</p><p>　　第2章 需求分析3</p><p>　　2.1 系統(tǒng)需求3&

13、lt;/p><p>　　2.2 功能需求3</p><p>　　2.3 數(shù)據(jù)需求3</p><p>　　2.4 性能需求3</p><p>　　2.4.1 硬件環(huán)境3</p><p>　　2.4.2 軟件環(huán)境3</p><p>　　第3章 總體設計4</p>&

14、lt;p>　　3.1 基本設計思想及系統(tǒng)處理流程4</p><p>　　3.1.1 模塊功能的設計4</p><p>　　3.1.2 系統(tǒng)處理流程4</p><p>　　3.2 數(shù)據(jù)庫設計5</p><p>　　3.2.1 數(shù)據(jù)表的設計6</p><p>　　3.2.2 數(shù)據(jù)表的外部關鍵字

15、8</p><p>　　3.2.3 存儲過程的設計8</p><p>　　第4章 系統(tǒng)詳細設計9</p><p>　　4.1 主控制模塊9</p><p>　　4.2 創(chuàng)建數(shù)據(jù)訪問模塊11</p><p>　　4.3 登錄模塊13</p><p>　　4.4 機構編制管理

16、15</p><p>　　4.4.1 機構設置及編碼15</p><p>　　4.4.2 機構詳細信息17</p><p>　　4.5 職員信息管理19</p><p>　　4.5.1 職員信息維護20</p><p>　　4.5.2 職員信息查詢24</p><p>　　4

17、.6 幫助24</p><p>　　第5章 系統(tǒng)維護和改進25</p><p>　　5.1 運行維護25</p><p>　　5.2 系統(tǒng)的改進與提高25</p><p><b>　　總 結26</b></p><p><b>　　參考文獻27</b>&

18、lt;/p><p><b>　　致 謝28</b></p><p><b>　　第1章 緒論</b></p><p><b>　　1.1 課題背景</b></p><p>　　21世紀,高新技術的超速發(fā)展和全球化的市場經濟導致企業(yè)之間的競爭空前激烈,但歸根結底是人才的競爭,

19、誰能有效地管理和開發(fā)人力資源,誰就能掌握知識經濟時代的生產力，幾乎所有的企業(yè)管理者都意識到人力資源是企業(yè)最重要最寶貴的資源。然而,如何開發(fā)和管理人力資源,使其轉化為一種現(xiàn)實的勞動生產力,則是眾多管理者的盲點。通過對人力資源的規(guī)劃、招聘、考核、培訓、激勵等一系列的手段,充分挖掘員工的潛力,提高他們對企業(yè)的認同感和責任感。只有這樣,才能使企業(yè)擁有不斷創(chuàng)新的活力,保證其在研發(fā)、生產、營銷等各方面的領先地位,最終贏得市場的認可。隨著人力資源部門

20、工作范圍的日益擴展,人力資源經理專業(yè)要求的日益提升,使得計算機等先進技術手段的作用日益顯現(xiàn)。因此,開發(fā)人力資源管理系統(tǒng)(HRMS-HumanResourceManagementSystem)是非常有必要的,它不僅能夠完成日常繁瑣的業(yè)務,而且可以準確及時地搜集各種人力資源信息以供管理者進行決策。</p><p>　　1.2 課題開發(fā)的意義</p><p>　　人力資源管理系統(tǒng)是以先進的軟件

21、和高速、大容量的硬件為基礎的，新的人力資源管理模式，通過集中式的信息庫、自動處理信息、員工自助服務、外協(xié)以及服務共享，達到降低成本、提高效率、改進員工服務模式的目的。它通過與企業(yè)現(xiàn)有的網絡技術相聯(lián)系，保證人力資源與日新月異的技術環(huán)境同步發(fā)展。一般來說，可以分四個部分來理解人力資源管理系統(tǒng)：</p><p>　?。?）管理人員角色和目標的改變</p><p>　　傳統(tǒng)的人力資源管理中，管理人

22、員的絕大部分精力將耗費在繁瑣的日常行政事務處理上，而作為企業(yè)管理層的參謀角色應該做的咨詢和策略制定的工作相對缺乏。通過人力資源管理人員將可以將絕大部分精力放在為管理層提供咨詢、建議上，而在行政事務上的工作可以由電子化系統(tǒng)完成，只需占用管理人員極少的精力和時間</p><p>　?。?）提供更好的服務</p><p>　　人力資源管理系統(tǒng)可以迅速、有效地收集各種信息，加強內部的信息溝通。各種

23、用戶可以直接從系統(tǒng)中獲得自己的需的各種信息，并根據(jù)相關信息做出決策和相應的行動方案。</p><p><b>　　（3）降低成本</b></p><p>　　人力資源管理系統(tǒng)通過減少人力資源管理工作的操作成本、降低員工流動率、減少通訊費用等途徑達到降低企業(yè)運作成本的目的。</p><p><b>　?。?）革新管理理念</b&g

24、t;</p><p>　　人力資源管理系統(tǒng)的最終目的是達到革新企業(yè)的管理理念而不僅僅是改進管理方式、優(yōu)化人力資源管理。先進技術應用于人力資源管理時，并不僅僅是為了將現(xiàn)有的人力資源工作做得更好，更重要的是，做些對于企業(yè)來講更有效率的事情，成為管理層的決策支持者，為決策提供信息和解決方案。</p><p>　　1.3 本文研究目標的內容</p><p>　　基于以上分析

25、，本文開發(fā)的人力資源管理系統(tǒng)目標：</p><p>　　(1)實現(xiàn)信息處理的準確、快捷和順暢。</p><p>　　(2)可隨時掌握企業(yè)機構部門信息、員工的基本信息、獎懲記錄、工資發(fā)放狀況，輕松計算當月工資。</p><p>　　(3)系統(tǒng)操作簡單易行，可多條件查詢，靈活方便。</p><p>　　(4)通過該系統(tǒng)的實施，可逐步提高管理水平。

26、</p><p>　　(5)系統(tǒng)維護方便可靠，有較高的安全性，滿足實用性的需求。</p><p>　　本文使用SQL Server2000和Visual Basic.NET語言平臺具體作了如下工作：</p><p>　　(1)建立為系統(tǒng)提供數(shù)據(jù)的數(shù)據(jù)庫，創(chuàng)建數(shù)據(jù)表及存儲過程。(2)創(chuàng)建窗體、為窗體添加代碼。(3)系統(tǒng)測試，打包發(fā)布。</p><p

27、><b>　　1.4 系統(tǒng)平臺</b></p><p>　　1.4.1 SQL Sever2000簡介</p><p>　　Microsoft SQL Server 2000中文版是基于客戶端/服務器模式(Client/Server模式，簡稱C/S模式)的新一代大型關系型數(shù)據(jù)庫管理系統(tǒng)（DataBase Management System，簡稱DBMS），它在

28、電子商務、數(shù)據(jù)倉庫和數(shù)據(jù)庫解決方案等應用中起著重要的核心作用，可為企業(yè)的數(shù)據(jù)管理提供強大的支持，對數(shù)據(jù)庫中的數(shù)據(jù)提供有效的管理，并采用有效的措施實現(xiàn)數(shù)據(jù)的完整性及數(shù)據(jù)的安全性。</p><p>　　1.4.2 Visual Basic.NET簡介</p><p>　　Visual Studio.NET 中的Visual Basic.NET是Microsoft公司推出的全新32位Windo

29、ws開發(fā)工具。Visual Basic.NET 不僅繼承了Visual Basic 6.0的使用簡便、功能強大、效率高等特點，還提供了一流的面向對象的程序設計語言特性，諸如實現(xiàn)繼承、重載和參數(shù)化的構造器。此外，開發(fā)人員可以通過顯示式的自由線程編寫具有高度可伸縮性的代碼，同時通過其他現(xiàn)代化的語言概念，如結構化的異常處理等，編寫具有較高可維護性的代碼。Visual Basic.NET將為開發(fā)人員提供創(chuàng)建強壯、可伸縮的分布式Web應用所需要的

30、所有語言特性，因此是目前最為優(yōu)秀的應用系統(tǒng)開發(fā)工具之一。</p><p><b>　　第2章 需求分析</b></p><p><b>　　2.1 系統(tǒng)需求</b></p><p>　?。?）建立機構編制管理，利用計算機實現(xiàn)機構的管理，部門的添加、更改與刪除。</p><p>　?。?）建立職員

31、信息管理，實現(xiàn)計算機化的人事管理體制。</p><p>　?。?）建立薪資福利管理，完成計算機自動化薪資福利管理體制。</p><p><b>　　2.2 功能需求</b></p><p>　　人力資源管理系統(tǒng)完成的任務雖然隨著企業(yè)的不同而有所差異,但對其任務進行歸納和劃分后可將系統(tǒng)分為幾個共同的功能需求模塊,人力資源管理系統(tǒng)主要功能需求為下

32、列六大部分,每個部分具體的功能需求如下：</p><p>　　(1) 機構編制管理部分：可以進行設置、修改、刪除、查看企業(yè)的組織機構信息。</p><p>　　(2) 職員信息管理部分：可以進行增加、修改、刪除、查詢企業(yè)的職員各種信息。</p><p>　　(3) 薪資福利管理部分：可以進行職員工資的計算、發(fā)放、查詢；獎懲信息的增加、刪除、修改。</p>

33、<p><b>　　2.3 數(shù)據(jù)需求</b></p><p>　　在分析了人力資源系統(tǒng)的基本功能需求以后,根據(jù)每類具體的功能,分析實現(xiàn)該功能所需要的數(shù)據(jù)。按照數(shù)據(jù)庫的設計思想,數(shù)據(jù)是以記錄的形式存儲在數(shù)據(jù)庫中,因此系統(tǒng)的數(shù)據(jù)需求分析實際上就是分析系統(tǒng)所需要的數(shù)據(jù)庫表。包括用戶清單、權限清單、組織機構編碼表、職員基本信息表、月工資統(tǒng)計表、個人的所得稅表、工資發(fā)放歷史表、職員獎勵

34、表、職員懲罰表共9張表單。</p><p><b>　　2.4 性能需求</b></p><p>　　2.4.1 硬件環(huán)境</p><p>　?。?）處理器：Intel Pentium 166M或更高。（2）內存：256MB（建議）。（3）硬盤：1GB或更大。</p><p>　　2.4.2 軟件環(huán)境</p&

35、gt;<p>　?。?）操作系統(tǒng)：Windows2000/XP。（2）軟件：.NET framework;Visual Basic.NET。</p><p>　?。?）數(shù)據(jù)庫：SQL Server2000。</p><p><b>　　第3章 總體設計</b></p><p>　　3.1 基本設計思想及系統(tǒng)處理流程</p

36、><p>　　3.1.1 模塊功能的設計</p><p>　　基于以上分析，本文開發(fā)的企業(yè)人力資源管理系統(tǒng)，分為六大功能模塊：用戶登錄模塊、機構編制管理模塊、人員信息管理模塊、薪資福利管理模塊、系統(tǒng)管理模塊、幫助系統(tǒng)，其功能分別為：</p><p>　?。?）用戶登錄模塊：提供用戶登錄界面。輸入用戶名稱，填寫正確的密碼，進入系統(tǒng)主窗體。</p><

37、p>　?。?）構編制管理模塊：用于設置企業(yè)的組織機構及其詳細信息，新增部門，同時還可以編輯、刪除、修改已有部門信息，以及根據(jù)部門層次設置建立一個部門樹結構，使上下級關系在這里一覽無余，其中包括機構設置及編碼、機構詳細信息兩個子模塊分別進行處理。</p><p>　?。?）人員信息管理模塊：用于管理和添加、瀏覽、修改以及刪除企業(yè)員工的相關信息，其中包括職員信息維護、職員信息查詢兩個子功能模塊：</p&g

38、t;<p>　　職員信息維護子模塊用于輸入和修改職員的資料，職員信息查詢子功能模塊用于查詢職員的資料。</p><p>　?。?）薪資福利管理模塊：用于管理企業(yè)薪資和福利計算的全過程,其中包括企業(yè)的薪資和福利設定、自動計算社會保險等代扣代繳項目,而且還可以根據(jù)公司的政策設置并計算由年假、事假、病假等帶薪假以及遲到、早退、曠工等形成的對薪資和福利的扣減,還能存儲完備的歷史信息以供查詢,其中包括當月工資

39、管理、個人所得稅率、發(fā)放工資歷史、職員獎勵管理、職員懲罰管理五個子功能模塊。</p><p>　?。?）系統(tǒng)管理模塊：包含權限管理和退出系統(tǒng)兩個子模塊，其中權限管理用于設置各操作員使用系統(tǒng)的權限，提高系統(tǒng)保密性和安全性，退出系統(tǒng)即結束人力資源管理系統(tǒng)的運行和使用。</p><p>　　（6）幫助系統(tǒng)：主要是向用戶介紹系統(tǒng)運行環(huán)境、使用方法。這樣,不僅減少了人力資源管理人員使用困難,也較好的

40、保證了使用質量工作速度。包含關于和幫助主題兩個子模塊。</p><p>　　3.1.2 系統(tǒng)處理流程</p><p>　　本系統(tǒng)基本的處理流程是：用戶登錄->主界面->選擇各項子系統(tǒng)。</p><p>　　整個系統(tǒng)流程圖如圖3-1所示：</p><p>　　雙擊上一行的“1”“2”試試，(本行不會被打印，請自行刪除)</p

41、><p><b>　　No</b></p><p><b>　　Yes</b></p><p>　　圖3-1 人力資源管理系統(tǒng)流程圖</p><p>　　3.2 數(shù)據(jù)庫設計</p><p>　　創(chuàng)建數(shù)據(jù)庫名為hrmbook，開發(fā)本系統(tǒng)共需要9張表，其中組織機構編碼表和職員基本信

42、息表是該系統(tǒng)的關鍵表，用于存放基礎的數(shù)據(jù)信息，其他涉及組織機構信息和職員信息的數(shù)據(jù)表，都只記錄機構或職員的編號，根據(jù)作為外鍵的編號字段和組織機構編碼表或職員基本信息表相對應，因此，這兩張表和其他數(shù)據(jù)表間的關系是1：N的關系，其他各表均與這兩張表通過“單位編號”或“職員編號”字段進行多對一的關聯(lián)。</p><p>　　3.2.1 數(shù)據(jù)表的設計</p><p>　　系統(tǒng)數(shù)據(jù)表及其用途說明見表

43、3.2，數(shù)據(jù)表結構見表3.3-3.4，數(shù)據(jù)表創(chuàng)建代碼見附錄：</p><p>　　表3-2 系統(tǒng)數(shù)據(jù)表及其用途</p><p>　　數(shù)據(jù)表名稱 數(shù)據(jù)表用途 數(shù)據(jù)來源</p><p>　　用戶清單 保存系統(tǒng)使用者的信息 在數(shù)據(jù)庫中增加記錄</p>

44、;<p>　　組織機構編碼表 用于保存企業(yè)組織機構的詳細信息 機構編制管理模塊</p><p>　　職員基本信息表 用于保存企業(yè)員工的基本信息 職員信息管理模塊</p><p>　　月工資統(tǒng)計表 用于保存、計算當月的員工工資 當月工資計算模塊</p><p>　　個人所得稅表 用于保存?zhèn)€人所

45、得稅的稅率數(shù)據(jù) 個人所得稅率模塊</p><p>　　工資發(fā)放歷史表 用于保存所有月份工資發(fā)放的歷史 工資發(fā)放歷史模塊</p><p>　　職員獎勵表 用于保存員工的獎勵情況 職員獎勵管理模塊</p><p>　　職員懲罰表 用于保存員工的懲罰情況 職員懲罰管理模塊</p&g

46、t;<p>　　權限清單 保存系統(tǒng)使用都的權限信息，可指定菜單級權限權限管理模塊</p><p>　?。?）名稱：組織機構編碼表（見表3-3）</p><p>　　表3-3組織機構編碼表</p><p>　　名 稱 類 型 寬度 主 鍵 非 空</

47、p><p>　　內部編號 Int 4 No Yes</p><p>　　類 別 Varchar 100 No No</p><p>　　AbsIndex Int 4

48、 No No</p><p>　　ItemIndex Int 4 No No</p><p>　　ItemLever Int 4 No No</p><p>　　ParentIndex Int 4 No

49、 No</p><p>　　類 別 號 Char 10 No No</p><p>　　單位編號 Varchar 20 Yes Yes</p><p>　　單位名稱 Varchar100 No

50、 No</p><p>　　拼音編碼 Varchar50 No No</p><p>　　單位地址 Varchar100 No No</p><p>　　單位電話 Varchar50

51、 No No</p><p>　　開戶銀行 Varchar100 No No</p><p>　　帳 號 Varchar 50 No No</p><p>　　開戶全稱 Varchar 100

52、 No No</p><p>　　(4) 職員基本信息表（見表3-4）</p><p>　　表3-4職員基本信息表</p><p>　　名 稱 類 型 寬度 主 鍵 非 空</p><p>　　內部編號

53、 Int 4 No Yes</p><p>　　職員編號 Varchar30 Yes Yes</p><p>　　姓 名 Varchar 20 No Yes</p><p>　　姓名簡碼

54、 Varchar 10 No No</p><p>　　性 別 Varchar2 No No</p><p>　　出生日期 Int 4 No No</p><p>　　年 齡 Int 4

55、 No No</p><p>　　籍 貫 Varchar50 No No</p><p>　　民 族 Varchar20 No No</p><p>　　文化程度 Varchar50

56、 No No</p><p>　　畢業(yè)學校 Varchar20 No No</p><p>　　健康狀況 Varchar100 No No</p><p>　　婚姻狀況 Varchar50

57、 No No</p><p>　　身份證號 Varchar10 No No</p><p>　　家庭電話 Varchar 18 No No</p><p>　　辦公電話 Varchar 50

58、 No No</p><p>　　手 機 Varchar 50 No No</p><p>　　電子郵箱 Varchaar 50 No No</p><p>　　職工帳號 Varchar 20 No No</p>

59、<p>　　備 注 Varchar 100 No No</p><p>　　3.2.2 數(shù)據(jù)表的外部關鍵字</p><p>　　為系統(tǒng)創(chuàng)建4個外部關鍵字FK_月工資統(tǒng)計表_職員基本信息表、FK_工資發(fā)放歷史表_職員基本信息表、FK_職員獎勵表_職員基本信息表、FK_職員懲罰表_職員基本信息表，用于將月工資統(tǒng)計表、工資發(fā)放歷史表、職員獎

60、勵表、職員懲罰表與職員基本信息表通過“ 職員編號”字段進行多對一的關聯(lián)。</p><p>　　其中主要代碼如下，因為其他于此雷同，這里就不在贅述。</p><p>　　ALTER TABLE [dbo].[月工資統(tǒng)計表] ADD </p><p>　　CONSTRAINT [FK_月工資統(tǒng)計表_職員基本信息表] FOREIGN KEY </p><

61、;p><b>　　(</b></p><p><b>　　[職員編號]</b></p><p>　　) REFERENCES [dbo].[職員基本信息表] (</p><p><b>　　[職員編號]</b></p><p><b>　　)</b>

62、</p><p><b>　　GO</b></p><p>　　3.2.3 存儲過程的設計</p><p>　　為系統(tǒng)設計了四個存儲過程，分別實現(xiàn)從歷史導入工資明細，計算當月工資和工資發(fā)放的功能。這些存儲過程都在“當月工資管理”模塊中使用。</p><p>　　第4章 系統(tǒng)詳細設計</p><p&

63、gt;<b>　　4.1 主控制模塊</b></p><p><b>　?。?）功能簡介：</b></p><p>　　主控制平臺使用簡單直觀的布局，它主要實現(xiàn)對模塊的調用和顯示，提供了菜單和按鈕兩種操作方式，利用系統(tǒng)默認生成的窗體作為主窗體，文件名frmMain.vb，為其添加一個主菜單（MainMenu）控件。</p><

64、p>　?。?）主控制模塊功能樹如圖4-1所示。</p><p>　　圖4-1 人力資源管理系統(tǒng)功能樹</p><p>　?。?）窗體部分屬性設置如表4-2所示。</p><p>　　表4-2 主窗體屬性設置</p><p>　　控件名 屬性 取值</p><p>　　frmMa

65、in Name frmMain</p><p>　　frmMain Text 人力資源管理系統(tǒng)</p><p>　　frmMain IsMdiContainer True</p><p>　　frmMain WindowState Maximized</p><p

66、>　　frmMain StartPosition CenterScreen</p><p>　　StatusBar Text 歡迎使用本系統(tǒng)！</p><p>　?。?） 在主菜單控件上單擊鼠標左鍵進入菜單編輯模式，設置如表4-3所示。</p><p>　　表4-3主窗體屬性設置</p><p>　　

67、菜單欄 菜單項 屬性 取值</p><p>　　MenuItemDep Text 機構編制管理（&X） MenuItemDepManage Text 機構設置及編碼（&A）</p><p>　　MenuItemDepInf

68、o Text 機構詳細信息（&B）</p><p>　　MenuItemPeople Text 職員信息管理(&Y)</p><p>　　MenuItemPeopleManage Text 職員信息維護(&A</p><p>　　Men

69、uItemPeopleQuery Text 職員信息查詢(&B)</p><p>　　MenuItemSalary Text 薪資福利管理（&Z）</p><p>　　MenuItemSalaryManage Text 當月工資計算(&A)</p>&l

70、t;p>　　MenuItemTaxInfo Text 個人所得稅率(&B)</p><p>　　MenuItemSalaryHis Text 工資發(fā)放歷史(&C)</p><p>　　MenuItemPrize Text 職員獎勵管理(&D)</p><p&g

71、t;　　MenuItemPunish Text 職員懲罰管理（&E）</p><p>　　MenuItemSystem Text 系統(tǒng)管理(&P</p><p>　　MenuItemManageRight Text 權限管理(&A)</p><p

72、>　　MenuItemQuit Text 退出系統(tǒng)（&Q）</p><p>　　MenuItemHelp Text 幫助（&H）</p><p>　　MenuItemHelp1 Text 關于（&A）</p><p>　　MenuItem

73、Help2 Text 幫助主題（&H）</p><p>　　（5）編寫代碼。通過觸發(fā)并調用GetInstanceState函數(shù)顯示各個子窗體。</p><p>　　GetInstanceState函數(shù)主要代碼如下：</p><p>　　Private Function GetInstanceState(ByVal name As

74、 String) As Boolean</p><p>　　'獲得frmMain窗體的子窗體的數(shù)量</p><p>　　Dim i As Integer = Me.MdiChildren.Length</p><p>　　'循環(huán)判斷是否有名為name的子窗體實例</p><p>　　For i = 0 To Me.MdiChi

75、ldren.Length - 1</p><p>　　If Me.MdiChildren(i).Name = name Then</p><p>　　'存在名為name的子窗體，是子窗體獲得焦點并返回True</p><p>　　Me.MdiChildren(i).Focus()</p><p>　　Return True</p

76、><p><b>　　End If</b></p><p><b>　　Next</b></p><p>　　'不存在名為Name的子窗體False</p><p>　　Return False</p><p>　　End Function</p><

77、p>　?。?）主窗體模塊的窗體設計效果如圖4-4所示：</p><p>　　圖4-4 主控制模塊效果圖</p><p>　　4.2創(chuàng)建數(shù)據(jù)訪問模塊</p><p>　　因為各個窗體均需要對數(shù)據(jù)庫進行訪問，因此可以把對數(shù)據(jù)庫的一些操作通過一個類來實現(xiàn)，這樣可以使對數(shù)據(jù)庫的訪問更加簡單。</p><p>　　因此創(chuàng)建類Database,編寫

78、代碼使每個窗體可以通過調用此類來打開數(shù)據(jù)庫，并對通過其對數(shù)據(jù)庫中數(shù)據(jù)實現(xiàn)進行查詢、刪除等功能。</p><p><b>　　具體代碼如下：</b></p><p>　　Public Class DataBase</p><p>　　'實現(xiàn)接口IDisposable</p><p>　　Implements IDi

79、sposable</p><p><b>　　'數(shù)據(jù)庫連接對象</b></p><p>　　Private SqlConn As SqlConnection</p><p>　　Public Shared sConn As String = "Persist Security Info=False;Integrated Sec

80、urity=SSPI;database=hrmbook;server=(local);Connect Timeout=30"</p><p>　　Public Sub Dispose() Implements System.IDisposable.Dispose</p><p>　　Dispose(True)</p><p>　　GC.SuppressFi

81、nalize(True)</p><p><b>　　End Sub</b></p><p>　　Protected Sub Dispose(ByVal disposing As Boolean)</p><p>　　If disposing <> True Then</p><p><b>　　R

82、eturn</b></p><p><b>　　End If</b></p><p>　　If SqlConn Is Nothing = False Then</p><p>　　SqlConn.Dispose()</p><p>　　SqlConn = Nothing</p><p>

83、;<b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Public Sub Open()</p><p>　　If SqlConn Is Nothing = True Then</p><p>　　'建立數(shù)據(jù)庫連接對象</p>

84、<p>　　SqlConn = New SqlConnection(Me.sConn)</p><p><b>　　'打開數(shù)據(jù)庫連接</b></p><p>　　SqlConn.Open()</p><p><b>　　End If</b></p><p><b>　

85、　End Sub</b></p><p>　　Public Sub Close()</p><p>　　'如果數(shù)據(jù)庫連接對象不為空則關閉數(shù)據(jù)庫連接</p><p>　　If SqlConn Is Nothing = False Then</p><p>　　SqlConn.Close()</p><p&

86、gt;<b>　　End If</b></p><p><b>　　End Sub</b></p><p>　　Public Function RunSelectSQL(ByVal sSQLString As System.String) As DataView</p><p><b>　　Me.Open()&l

87、t;/b></p><p>　　Dim SqlDS As DataSet = New DataSet</p><p>　　Dim SqlDA As SqlDataAdapter = New SqlDataAdapter(sSQLString, Me.SqlConn)</p><p>　　SqlDA.Fill(SqlDS)</p><p>

88、;　　Return SqlDS.Tables(0).DefaultView</p><p>　　End Function</p><p>　　Public Function RunDelOrInsSQL(ByVal sSQLString As System.String)</p><p><b>　　Me.Open()</b></p>

89、;<p>　　Dim SqlComm As SqlCommand = New SqlCommand(sSQLString, Me.SqlConn)</p><p>　　SqlComm.ExecuteNonQuery()</p><p>　　End Function</p><p><b>　　End Class</b></p

90、><p><b>　　4.3登錄模塊</b></p><p>　　系統(tǒng)的管理應考慮安全性，于是本系統(tǒng)設計了登錄模塊用以控制合法用戶進入主控平臺。</p><p>　　用戶登錄窗體啟動后，等待用戶輸入用戶號和密碼，根據(jù)登錄的用戶號在系統(tǒng)用戶清單表中查找相應記錄并自動添加用戶名，然后系統(tǒng)檢查密碼的正確性，是系統(tǒng)合法授權用戶，允許進入系統(tǒng)，否則無法進入退

91、出系統(tǒng)。</p><p><b>　　主要代碼如下：</b></p><p>　　Private Sub txbUserId_LostFocus(ByVal sender As Object, _</p><p>　　ByVal e As System.EventArgs) Handles txbUserId.LostFocus</p&g

92、t;<p>　　'定義一個數(shù)據(jù)訪問類的對象</p><p>　　Dim db As DataBase = New DataBase</p><p>　　'根據(jù)輸入的用戶ID進行查詢</p><p>　　Dim dv As DataView = _</p><p>　　db.RunSelectSQL _</p

93、><p>　　("select 密碼,姓名 from 用戶清單 where 用戶編號 = '" _</p><p>　　+ Me.txbUserId.Text.Trim() + "'")</p><p>　　'判斷用戶ID是否存在</p><p>　　If dv.Count = 0

94、Then</p><p><b>　　'用戶ID不存在</b></p><p>　　Me.txbUserId.Text = ""</p><p>　　Me.txbPwd.Text = ""</p><p>　　Me.txbName.Text = ""&l

95、t;/p><p><b>　　Else</b></p><p><b>　　'用戶ID存在</b></p><p>　　UserId = Me.txbUserId.Text.Trim()</p><p>　　'獲得用戶的密碼級用戶名</p><p>　　Me.Us

96、erPwd = dv.Item(0)("密碼")</p><p>　　Me.txbName.Text = dv.Item(0)("姓名")</p><p><b>　　End If</b></p><p>　　'釋放數(shù)據(jù)訪問類的占用資源</p><p>　　db.Dispo

97、se()</p><p>　?。?） 登錄窗體效果如圖4-5所示。</p><p>　　圖4-5 登錄模塊效果圖</p><p>　　4.4 機構編制管理</p><p>　　對于大型企業(yè)、集團公司等用戶，組織機構往往非常復雜，總公司下屬可能有多級子公司，子公司下又設置有各種部門，因此需要機構編制管理可以靈活的定義這些層次和屬性，同時對應機

98、構的編碼可以根據(jù)所從屬的上級機構自動生成。</p><p>　　機構編制管理模塊用于設置企業(yè)的組織機構，其中包括機構設置及編碼，機構詳細信息兩個子功能模塊，如圖4-6所示。</p><p>　　圖4-6 機構編制管理功能模塊圖</p><p>　　4.4.1 機構設置及編碼</p><p>　　機構設置及編碼子模塊用于生成企業(yè)組織機構的層次

99、關系和編碼，在這個模塊中建立起組織的管理結構，上下級關系在這里一覽無余，而個人信息會與這個組織架構連接起來。</p><p>　　機構設置及編碼模塊實現(xiàn)的四個主要功能包括：顯示、增加、修改、刪除機構，機構合成編碼會根據(jù)所從屬的部門機構自動生成，并且保存修改后其設置將返回到組織機構編碼表中。</p><p>　　當觸發(fā)frmDepManage窗體事件后會調用方法InitTree，用樹形顯示數(shù)

100、據(jù)庫中存在的各個機構及其從屬機構關系。具體代碼如下：</p><p>　　'InitTree是用遞歸方法初始化TreeView控件的節(jié)點</p><p>　　Private Sub InitTree(ByRef nodes As TreeNodeCollection, _</p><p>　　ByVal sParentIndex As String)<

101、/p><p><b>　　Try</b></p><p>　　Dim tmpNode As TreeNode</p><p>　　Dim absIndex As String</p><p>　　Dim dvTemp As DataView = dvList.Table.DefaultView</p><

102、;p>　　'選出數(shù)據(jù)源中ParentIndex為sParentIndex數(shù)據(jù)行</p><p>　　Dim dataRows() As DataRow = _</p><p>　　dvList.Table.Select("ParentIndex = '" + sParentIndex + "'")</p>

103、<p>　　'循環(huán)添加TreeNode</p><p>　　For Each dr As DataRow In dataRows</p><p><b>　　'獲得節(jié)點所需數(shù)據(jù)</b></p><p>　　tmpNode = New TreeNode</p><p>　　tmpNode.Text

104、 = dr("類別")</p><p>　　'用TreeNode的Tag屬性保存與此節(jié)點相關的數(shù)據(jù)</p><p>　　tmpNode.Tag = CType(New TreeNodeData(dr("AbsIndex"), _</p><p>　　dr("ItemIndex"), dr("

105、;ItemLevel"), _</p><p>　　dr("ParentIndex"), dr("類別號"), dr("單位編號")), Object)</p><p>　　absIndex = dr("AbsIndex")</p><p><b>　　'添加

106、節(jié)點</b></p><p>　　nodes.Add(tmpNode)</p><p><b>　　'遞歸調用</b></p><p>　　InitTree(nodes(nodes.Count - 1).Nodes, absIndex)</p><p><b>　　Next</b>

107、;</p><p>　　Catch ex As Exception</p><p>　　MessageBox.Show("初始化TreeView失敗")</p><p><b>　　End Try</b></p><p><b>　　End Sub</b></p>

108、<p>　　管理原可通過按鍵方式調用相應的觸發(fā)函數(shù)來實現(xiàn)對機構的增加、刪除、修改等功能。</p><p>　　機構設置及編碼模塊的窗體效果如圖4-7所示。</p><p>　　圖4-7 機構設置及編碼窗體設計效果圖</p><p>　　4.4.2 機構詳細信息</p><p>　　機構詳細信息子模塊用于管理對應組織機構的詳細信息，

109、顯示企業(yè)所有機構部門地址、電話、賬號等信息。</p><p>　　機構詳細信息模塊實現(xiàn)的二個主要功能包括：顯示、修改機構的信息，不能刪除，其所列單位信息都是在組織機構編碼表中的記錄，只能在機構設置及編碼中增加部門，在這里不能新增部門信息，操作完成后按保存按鈕其值將返回到組織機構編碼表。主要代碼如下：</p><p>　　Private Sub frmDepInfo_Load(ByVal s

110、ender As Object, _</p><p>　　ByVal e As System.EventArgs) Handles MyBase.Load</p><p>　　Dim dt As DataTable</p><p>　　dt = DataSet11.Tables("組織機構編碼表")</p><p>　　&

111、#39;定義一個DataGrid表樣式</p><p>　　Dim ts As New DataGridTableStyle</p><p>　　Dim aColumnTextColumn As DataGridTextBoxColumn</p><p>　　Dim numCols As Integer = dt.Columns.Count</p>&

112、lt;p>　　Dim i As Integer</p><p><b>　　’不顯示單位編號</b></p><p>　　For i = 0 To numCols - 2</p><p>　　aColumnTextColumn = New DataGridTextBoxColumn</p><p>　　aColum

113、nTextColumn.MappingName = _</p><p>　　dt.Columns(i).ColumnName</p><p>　　If i = 0 Then</p><p>　　aColumnTextColumn.HeaderText = "單位名稱"</p><p><b>　　Else<

114、/b></p><p>　　aColumnTextColumn.HeaderText = _</p><p>　　dt.Columns(i).ColumnName</p><p><b>　　End If</b></p><p>　　aColumnTextColumn.NullText = ""

115、</p><p>　　ts.GridColumnStyles.Add(aColumnTextColumn)</p><p><b>　　Next</b></p><p><b>　　’隔行灰白顯示</b></p><p>　　ts.AlternatingBackColor = Color.Light

116、Gray</p><p>　　ts.AllowSorting = False</p><p>　　dgdDepInfo.TableStyles.Add(ts)</p><p>　　SqlConnection1.ConnectionString = DataBase.sConn</p><p>　　SqlDataAdapter1.Fill(Da

117、taSet11, "組織機構編碼表")</p><p>　　'設置dgdDepInfo的數(shù)據(jù)源</p><p>　　ts.MappingName = dt.TableName</p><p>　　dt.DefaultView.AllowDelete = False</p><p>　　dt.DefaultView.

118、AllowNew = False</p><p>　　dgdDepInfo.DataSource = dt.DefaultView</p><p><b>　　End Sub</b></p><p>　　機構詳細信息模塊的窗體效果如圖4-8所示。</p><p>　　圖4-8機構詳細信息窗體設計效果圖</p>

119、<p>　　4.5 職員信息管理</p><p>　　人員信息管理模塊用于管理和查詢企業(yè)員工的相關信息，其中包括子功能模塊如圖</p><p><b>　　4-9所示。</b></p><p>　　圖4-9職員信息管理功能模塊圖</p><p>　　4.5.1 職員信息維護</p><

120、;p>　　職員信息維護子模塊用于輸入和修改職員的姓名、性別、年齡、籍貫、文化程度、畢業(yè)院校、婚姻狀況、家庭電話、辦公電話、單位編號等資料。</p><p>　　職員信息維護模塊實現(xiàn)的四個主要功能包括：顯示、增加、修改、刪除職員信息。</p><p>　　其數(shù)據(jù)來源是職員基本信息表，操作后值返回職員基本信息表。</p><p>　?。?）綁定數(shù)據(jù)至相應控件<

121、;/p><p>　?、購墓ぞ呦渲型蟿右粋€SqlDataAdapter對象到窗體上，連接hrmbook數(shù)據(jù)，添加職員基本信息表并選擇職員基本信息表的所有字段，如圖5-10所示。</p><p>　?、谠赟qlDataAdapter1對象上右擊，在彈出的快捷菜單中選擇“生成數(shù)據(jù)”命令，在“生成數(shù)據(jù)集”對話框中單擊“確定”按鈕，如圖5-11所示。</p><p>　?、蹫門e