企業(yè)工資管理系統(tǒng)文檔

1、工資管理系統(tǒng)摘 要 本系統(tǒng)基本上能夠滿足現(xiàn)代化企業(yè)工資管理的需求。 現(xiàn)代化工資管理系統(tǒng)中 使用了各種表格，保存相關(guān)的工資信息，方便查詢，瀏覽，修改等操作。本系統(tǒng)的前 提條件是必須有員工的考勤信息作為基礎(chǔ)， 因為本系統(tǒng)是使用員工考勤信息來計算員 工的工資 ，在使用的時候必須要保證員工的人事信息數(shù)據(jù)庫和工資數(shù)據(jù)庫在同一個 文件夾中。本系統(tǒng)結(jié)合實際的人事、財務制度，經(jīng)過實際的需求分析，采用功能強大的 VB 作為開發(fā)工具、 Access 作為數(shù)據(jù)庫開發(fā)出來的企業(yè)工資管理系統(tǒng)。本文首先分析了 企業(yè)工資管理系統(tǒng)的應用現(xiàn)狀， 闡述了本工資管理系統(tǒng)的開發(fā)目的。 通過對數(shù)據(jù)庫技 術(shù)的現(xiàn)狀與發(fā)展、數(shù)據(jù)庫系統(tǒng)的選擇

2、原則、系統(tǒng)開發(fā)工具的選擇一系列問題的分析 , 確定了系統(tǒng)的開發(fā)平臺。 接著詳細給出了從工資管理系統(tǒng)分析到總體設(shè)計詳細設(shè)計與 實現(xiàn)及測試的各個環(huán)節(jié)， 最后對本系統(tǒng)作出了客觀評價， 指明了系統(tǒng)的現(xiàn)實意義、 缺 點以及系統(tǒng)的升級方向。1、 引 言隨著計算機技術(shù)的飛速發(fā)展， 計算機在企業(yè)管理中的應用越來越普及， 利用計算 機實現(xiàn)企業(yè)工資的管理顯得越來越重要。 對于大中型企業(yè)來說， 利用計算機支持企業(yè) 高效率完成勞動人事管理的日常事務， 是適應現(xiàn)代企業(yè)制度要求、 推動企業(yè)勞動人事 管理走向科學化、 規(guī)范化的必要條件； 而工資管理是一項瑣碎、 復雜而又十分細致的 工作，工資計算、發(fā)放、核算的工作量很大，一

3、般不允許出錯，如果實行手工操作， 每月發(fā)放工資須手工填制大量的表格， 這就會耗費工作人員大量的時間和精力， 計算 機進行工資發(fā)放工作， 不僅能夠保證工資核算準確無誤、 快速輸出，而且還可以利用 計算機對有關(guān)工資的各種信息進行統(tǒng)計，服務于財務部門其他方面的核算和財務處 理，同時計算機具有手工管理所無法比擬的優(yōu)點 . 例如: 檢索迅速、查找方便、可靠性 高、存儲量大、保密性好、壽命長、成本低等。這些優(yōu)點能夠極大地提高人事工資管 理的效率 , 也是企業(yè)的科學化、正規(guī)化管理，與世界接軌的重要條件。企業(yè)的工資管理是公司管理的一個重要內(nèi)容。 隨著當今企業(yè)人員數(shù)量增加， 企業(yè) 的工資計算也變得越來越復雜。

4、如果能夠?qū)崿F(xiàn)工資管理的自動化， 無疑是給企業(yè)管理部門帶來很大的方便。資金是企業(yè)生存的主要元素。 資金的流動影響到企業(yè)的整體運作， 企業(yè)員工的工 資是企業(yè)資金管理的一個重要的組成部分， 因為企業(yè)每個月都要涉及發(fā)放企業(yè)員工工 資的問題。企業(yè)員工的人數(shù)越多，工資的統(tǒng)計工作就越多，工資的發(fā)放困難就越大。 最初的工資統(tǒng)計和發(fā)放都是使用人工方式處理， 工作的時候， 出現(xiàn)錯誤的機率也隨之 升高。工資管理系統(tǒng)就是使用電腦代替大量的人工統(tǒng)計和計算， 完成眾多工資信息的 處理，同時使用電腦還可以安全地保存大量的工資記錄。企業(yè)工資管理系統(tǒng)， 為個人提供工資查詢服務， 為企業(yè)提供工資計算， 工資統(tǒng)計 等服務。傳統(tǒng)的紙

5、張材料的數(shù)據(jù)信息管理已經(jīng)不適合現(xiàn)代企業(yè)公司的發(fā)展了， 實現(xiàn)工 資管理的系統(tǒng)化、規(guī)范化、自動化，將成為現(xiàn)在公司管理工資的首選。本系統(tǒng)實現(xiàn)的 工資管理系統(tǒng)基本上能夠滿足現(xiàn)代化企業(yè)工資管理的需求。2、企業(yè)工資管理系統(tǒng)概述2.1 系統(tǒng)的主要功能企業(yè)工資管理系統(tǒng)的主要任務是用計算機對各種工資信息進行日常的管理， 如查 詢、修改、增加、刪除以及存儲等，迅速準確地完成各種工資信息的統(tǒng)計計算和匯總 工作，快速打印出工資報表， 針對系統(tǒng)服務對象的具體要求， 設(shè)計了企業(yè)工資管理系 統(tǒng)。企業(yè)工資管理系統(tǒng)主要有以下幾大功能：(1) 對單位人員的變動進行處理。 一個單位的職工不會是一成不變的， 總是在不 斷的變化：有調(diào)

6、出、有調(diào)入、也有職工在本單位內(nèi)部調(diào)動。因此，設(shè)計系統(tǒng)是應考慮 到這些情況。(2) 對職工的工資進行計算、 修改。能對各職工的工資進行計算， 即計算應發(fā)金 額、應扣金額及實發(fā)金額等。(3) 查詢統(tǒng)計功能。 要求即可以單項查詢， 比如查看某個職工的工資情況等； 也 可以查詢?nèi)俊?4) 報表打印功能。每月發(fā)放工資時，要求能夠打印本月的工資表、隨工資發(fā)給 每個職工的工資條以及工資統(tǒng)計表。2.2 企業(yè)工資管理系統(tǒng)的應用現(xiàn)狀2.2.1 開發(fā)背景隨著我國國民經(jīng)濟建設(shè)的蓬勃發(fā)展和具有中國特色的社會主義市場經(jīng)濟體制的 迅速完善，各個行業(yè)都在積極使用現(xiàn)代化的手段， 不斷改善服務質(zhì)量， 提高工作效率， 這些都在很

7、大程度上給企業(yè)提出越來越嚴峻的挑戰(zhàn)，對企業(yè)體系無論是在行政職能、 企業(yè)管理水平以及優(yōu)質(zhì)服務上都提出更高的要求。 建設(shè)一個科學高效的信息管理系統(tǒng) 是解決這一問題的必由之路。 企業(yè)內(nèi)部財務管理是該企業(yè)運用現(xiàn)代化技術(shù)創(chuàng)造更多更 高的經(jīng)濟效益的主要因素之一。 工資管理作為企業(yè)內(nèi)部的一種財務管理也是如此， 由 于企業(yè)職工人數(shù)較多， 每一位職工的具體實際情況也不盡相同， 各項工資條款的發(fā)放， 如果沒有一個完整的管理系統(tǒng)， 僅憑手工操作來實現(xiàn)不僅容易出錯， 而且也造成資源 的不必要浪費，因此開發(fā)這個工資管理系統(tǒng)是很有必要的。2.2.2 開發(fā)環(huán)境（1）系統(tǒng)運行環(huán)境1）騰 II 或以上2）64MB內(nèi)存或以上3）

8、Windows 95 或以上4）裝了 Visual Basic 6.0（2）開發(fā)工具1、VB的選用和簡介現(xiàn)在，市場上可以選購的應用開發(fā)產(chǎn)品很多，流行的也有數(shù)十種。目前在我國市場 上最為流行、使用最多、最為先進的可用作企業(yè)級開發(fā)工具的產(chǎn)品有：Microsoft 公司的 Visual BasicMicrosoft 公司的 Visual CBorland 公司的 DelphiSun 公司的 Java 等等 在目前市場上這些眾多的程序開發(fā)工具中，有些強調(diào)程序語言的彈性與執(zhí)行效率； 有些則偏重于可視化程序開發(fā)工具所帶來的便利性與效率的提高， 各有各的優(yōu)點和特色， 也滿足了不同用戶的需求。然而，語言的彈性

9、和工具的便利性是密不可分的，只有便利 的工具，卻沒有彈性的語言作支持，許多特殊化的處理動作必需要耗費數(shù)倍的工夫來處 理，使得原來所標榜的效率提高的優(yōu)點失去了作用； 相反，如果只強調(diào)程序語言的彈性， 卻沒有便利的工具作配合，會使一些即使非常簡單的界面處理動作，也會嚴重地浪費程 序設(shè)計師的寶貴時間。作為數(shù)據(jù)庫系統(tǒng)的開發(fā)，VB是一個非常理想選擇。VB因簡單易學、功能強大、編 譯速度快而從眾多的軟件開發(fā)工具中脫穎而出。它提供了靈活的可視化設(shè)計工具，將可 視化界面與面向?qū)ο蠹夹g(shù)完善、緊密地結(jié)合起來，并封裝了Win dows編程的復雜性。程序的規(guī)模小到簡單的個人數(shù)據(jù)庫應用，大到復雜的企業(yè)的多層次分布式系統(tǒng)

10、，都可以使 用VB進行開發(fā)，其友好的集成開發(fā)界面，可視化的雙向開發(fā)模式，良好的數(shù)據(jù)庫應用支 持高效的程序開發(fā)和程序運行，備受廣大程序開發(fā)人員的好評。尤其是VB對數(shù)據(jù)庫應用 的強大支持，大大提高了數(shù)據(jù)庫應用軟件開發(fā)的效率，縮短了開發(fā)周期，深受廣大數(shù)據(jù) 庫應用程序設(shè)計人員的喜愛。VB為數(shù)據(jù)庫應用開發(fā)人員提供了豐富的數(shù)據(jù)庫開發(fā)組件， 使數(shù)據(jù)庫應用開發(fā)功能更強大，控制更靈活，編譯后的程序運行速度更快，VB是微軟公司出品的一個快速可視化程序開發(fā)工具軟件，借助微軟在操作系統(tǒng)和辦公軟件的壟斷地 位，VB在短短的幾年內(nèi)風靡全球。VB是極有和功能強大的軟件，主要表現(xiàn)在：所見即所 得的界面設(shè)計，基于對象的設(shè)計方法

11、，極短的軟件開發(fā)周期，較易維護的生成代碼。美國微軟公司在1991年推出VB1.0至今已經(jīng)經(jīng)歷了 6個版本，VB6.0運行在win9x 或winme, win2000，winxp，windowsNT等操作系統(tǒng)下，是一個 32位的應用程序開發(fā)工 具。VB程序語言具有許多優(yōu)秀的特性，用其設(shè)計應用程序時有兩個基本特點：可視化設(shè) 計和事件驅(qū)動編程。Visual Basic 系統(tǒng)除了一般高級語言所具有的一些名詞術(shù)語外， 還有幾個系統(tǒng)常用的名 詞。其基本含義如下：(1) 視窗( Form)視窗是進行人機交互的界面或接口，也叫窗體。VB系統(tǒng)的人機交互界面或接口，無論是在設(shè)計時或是在運行時，都是 Windows

12、 系統(tǒng)的標準視窗。(2) 對象 (Object)對象是 VB 系統(tǒng)內(nèi)部提供給設(shè)計者可以直接使用的處理輸出的控制工具。本程序所 應用到的對象類型有標簽框 (Label Box) ，文本框 (Text Box) ，命令按扭 (Command Butt on)，網(wǎng)格(Data Grid) ，ADO控件(Adodcl)等。當把這些工具放置到用戶界面對 應的窗體上時，被稱為對象或控件。用戶可以通過設(shè)置對象的“屬性”和“方法” ，便于 對象適應自己所設(shè)計應用程序的輸入輸出內(nèi)容，對象的生成過程及結(jié)構(gòu)都被封裝起來。 正確使用對象可以減少程序和開發(fā)時間，提高程序設(shè)計者的工作效率。(3) 屬性 (Properti

13、es)屬性是VB系統(tǒng)提供的有關(guān)對象的參數(shù)或數(shù)據(jù)接口。用戶通過適當?shù)卦O(shè)置或改變對 象的屬性來確定對象的外觀及性能特征，從而有效地使用系統(tǒng)提供的對象。比如，對象 的名稱、在屏幕上顯示的位置、大小、顏色、接收或容納的數(shù)據(jù)內(nèi)容及數(shù)據(jù)的表現(xiàn)格式 等。(4) 事件 (Events) 事件是指用戶或操作者對計算機進行的某一操作(如擊鍵、單擊或移動鼠標等)的行為或系統(tǒng)狀態(tài)發(fā)生的變化。VB系統(tǒng)常用事件來引導計算機執(zhí)行一段程序。程序所用的 鍵盤事件有 KeyPress (按鍵)事件，KeyDowr事件和KeyUp事件；鼠標事件有 Click (單 擊鼠標)事件， DbDlicd (雙擊鼠標)。(5) 方法 (Me

14、thod)方法主要是指對一個對象使用某種作用的過程。 它是在程序執(zhí)行的過程中要計算機 執(zhí)行的某種操作。其程序的方法有 Show(顯示)方法，Hide (隱藏)方法，Refresh (刷 新)方法。(6) 過程 (Procedure) 過程是指經(jīng)過定義或說明的，或基于某一對象對應的事件所引發(fā)的程序段。(7) 模塊 (Module) 模塊是指一些運算量或過程進行聲明或定義的一個集合。 系統(tǒng)程序大體可分成四個模塊：數(shù)據(jù)輸入、根據(jù)查詢、數(shù)據(jù)打印和通訊。2、可視化設(shè)計同其他的一些可視化程序開發(fā)工具一樣 ,VB 具有可視化設(shè)計的特點 , 微軟的 Word 在 剛剛進入市場時,同WPS競爭的一個重要的功能砝

15、碼就是所見即所得的字處理功能,VB 在設(shè)計應用程序界面時也可以說是 所見即所得.在設(shè)計時,頭腦中所想象的應用程序界 面, 完全可以通過鍵盤鼠標以及徒手畫出來 , 而不是編制大量的代碼然后再編譯生成 , 如 果需要修改，也是利用鍵盤鼠標和手畫，而底層的一些程序代碼由 VB自動生成或修改。VB為用戶提供大量的界面元素（在VB中稱為控件對象）,這些控件對象對于熟悉 Windows應用程序的用戶而言是一點也不陌生,女窗體、菜單、命令按鈕、工具 按鈕、 檢查框等等,用戶只需要利用鼠標、鍵盤把這些控件對象拖動到適當?shù)奈恢?, 設(shè)置它們的大小、形狀、屬性等 , 就可以設(shè)計出所需的應用程序界面。3、事件驅(qū)動編

16、程Windows操作系統(tǒng)出現(xiàn)以來，圖形化的用戶界面和多任務多進程的應用程序要求程 序設(shè)計不能是單一性的 , 在使用 VB 設(shè)計應用程序時 , 必須首先確定應用程序如何同用戶 進行交互.例如發(fā)生鼠標單擊、鍵盤輸入等事件時 , 由用戶編寫的代碼控制這些事件的響 應, 這就是所謂的事件驅(qū)動編程。4、實現(xiàn)菜單選項菜單是程序最重要的特性之一， 大多數(shù)程序都依賴一個定義良好的菜單使程序易于 使用和維護， Visual Basic 也提供了強大的創(chuàng)建菜單功能是程序更加標準。本系統(tǒng)使用 Visual Basic 的菜單編輯器建立菜單或者修改已經(jīng)存在的菜單，您也 可以使用 Visual Basic 的 Appl

17、ication Wizard 來操作。5、實現(xiàn)工具欄CoolBar 控件與 Office2000 中看到的 CoolBar 是類似的。 CoolBar 就是一個可以在 窗體上浮動的工具，同時也是其他 ActiveX 的容器。通過在 CoolBar 中遷入其他空間你 也可以向用戶提供更好的靈活性和義用性。選擇“工程”下拉菜單中的“部件”選項，顯示“部件”對話框。在“控件”選項 卡列表中選擇“ Microsoft Windows Common Controls 6.0 ”后工具相中增加改控件。本系統(tǒng)就用了 Cool 工具中的 Statubar 控件，在系統(tǒng)這一界面中，添加了狀態(tài)欄， 在第一個欄中，

18、在樣式這一欄中選擇了文本，在第二個欄中，選擇了系統(tǒng)日期，第三個 欄中選擇了系統(tǒng)時間，這樣，任何時候操作本系統(tǒng)，都可以看到當前的時間和日期。使用 Access2000 實現(xiàn)關(guān)系型數(shù)據(jù)庫數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具。數(shù)據(jù)庫的作用在于組織和表達信 息，簡而言之，數(shù)據(jù)庫就是信息的集合。計算機的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫 (flat-file )和關(guān)系數(shù)據(jù)庫( relational )。關(guān)系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息， 數(shù)據(jù)庫含有各個不同部分的術(shù)語，對象記錄、域等。新建一個數(shù)據(jù)庫創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫， 設(shè)計必須是靈活的、 有邏輯的。 創(chuàng)建一個

19、數(shù)據(jù)庫結(jié)構(gòu)的過程被認為是數(shù)據(jù)模型設(shè)計。1標識需要的數(shù)據(jù)；2收集被標識的字段到表中；3標識主關(guān)鍵字字段；4繪制一個簡單的數(shù)據(jù)圖表；5規(guī)范數(shù)據(jù)；6標識指定字段的信息；7創(chuàng)建物理表。修改已建的數(shù)據(jù)庫數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細描述實現(xiàn)的具體方法。6、實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。 一個連接是指一種虛 擬的表，這種表是在當用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的，關(guān)鍵 字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。 這種連接是指一個

20、表被連接到它自己的一個字段，或在不同的記錄中由重復數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字：主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中 使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。2.2.3 數(shù)據(jù)庫數(shù)據(jù)庫是通過數(shù)據(jù)庫管理系統(tǒng)（DBMS-DATBASEMANAGEMESYSTEM）件來實現(xiàn) 數(shù)據(jù)的存儲、管理與使用的DBASEL就是一種數(shù)據(jù)庫管理系統(tǒng)軟件。（1）數(shù)據(jù)庫的概念數(shù)據(jù)庫是存儲在一起的相關(guān)數(shù)據(jù)的集合， 這些數(shù)據(jù)是結(jié)構(gòu)化的， 無有害的或不必 要的冗余， 并為多種應用服務； 數(shù)據(jù)的存儲獨立于使用它的程序； 對數(shù)據(jù)庫插入新數(shù) 據(jù)，修改和檢索原有數(shù)據(jù)均能按一種公用的，

21、 和可控制的方式進行。 當某個系統(tǒng)中存 在結(jié)構(gòu)上完全分開的若干個數(shù)據(jù)庫時，則該系統(tǒng)包含一個 數(shù)據(jù)庫集合 。（2）數(shù)據(jù)庫的優(yōu)點使用數(shù)據(jù)庫可以帶來許多好處： 如減少了數(shù)據(jù)的冗余度， 從而大大地節(jié)省了數(shù)據(jù) 的存儲空間； 實現(xiàn)數(shù)據(jù)資源的充分共享等等。 此外，數(shù)據(jù)庫技術(shù)還為用戶提供了非常 簡便的使用手段使用戶易于編寫有關(guān)數(shù)據(jù)庫應用程序。（3）數(shù)據(jù)庫文件的特征無論使用哪一種數(shù)據(jù)庫管理系統(tǒng)， 由它們所建立的數(shù)據(jù)庫文件都可以看成是具有 相同性質(zhì)的記錄的集合，因而這些數(shù)據(jù)庫文件都有相同的特性：1）文件的記錄格式相同，長度相等。2）不同的行是不同的記錄，因而具有不同的內(nèi)容。3）不同的列表示不同的字段名，同一列中的

22、數(shù)據(jù)的性質(zhì) （屬性）相同。4）每一行各列的內(nèi)容是不能分割的，但行的順序和列的順序不影響文件內(nèi)容的表達。3 系統(tǒng)分析3.1 系統(tǒng)需求分析本系統(tǒng)的開發(fā)宗旨以及總體任務就是幫助企業(yè)的財務主管部門提高工作效率， 實 現(xiàn)企業(yè)工資信息管理的自動化、 規(guī)范化和系統(tǒng)化。 所以為了能夠?qū)崿F(xiàn)編制這個系統(tǒng)所 設(shè)定的目標，在程序的開發(fā)之前，需求分析是必不可少的。需求分析的第一步描述工資管理系統(tǒng)的功能， 即定義用例， 以此確定系統(tǒng)的功能 需求。工資管理系統(tǒng)的用例分析主要是找出系統(tǒng)中所有的用例， 因此要和工資管理系 統(tǒng)的潛在用戶進行討論。系統(tǒng)最終實現(xiàn)的主要功能如下。工資管理系統(tǒng)的用例包括：(1) 系統(tǒng)管理 (2) 工資設(shè)

23、置 (3) 工資統(tǒng)計(4) 工資查詢 (5) 工資表導出 (6) 打印報表 系統(tǒng)管理用例包括添加用戶和修改密碼。都通過其相應的窗口來實現(xiàn)。 工資設(shè)置用例包括基本工資設(shè)置和其它項目設(shè)置。其它項目設(shè)置有獎金、津貼、 福利、扣發(fā)等項目。工資統(tǒng)計用例可以根據(jù)不同的月份對其進行相應地統(tǒng)計。 工資查詢用例包括單人查詢和查詢所有， 可以顯示員工基本工資、 員工其它項目 情況，以及員工工資具體統(tǒng)計情況。工資表導出用例可根據(jù)所需的月份把工資表導出并可直接顯示在 Excel 表格中， 而且可以加以保存。打印報表用例是一個很重要的一個用例，它提供給用戶生成報表和報印的功能， 能夠很方便地將員工的工資情況表打印出來。

24、3.1.1 系統(tǒng)目標采用公司現(xiàn)有的軟硬件及科學的管理系統(tǒng)開發(fā)方案， 建立工資管理系統(tǒng)， 實現(xiàn)企 業(yè)工資管理的計算機自動化。 系統(tǒng)應符合公司人事、 工資管理制度， 并達到操作直觀、 方便、實用、安全等要求。3.1.2 數(shù)據(jù)流程圖3.2系統(tǒng)功能調(diào)查系統(tǒng)從總體上可以分為系統(tǒng)管理、工資信息設(shè)置、工資信息管理、打印報表等功 能。系統(tǒng)管理功能（1）添加用戶：使用這個用戶登錄后，可以添加其他用戶（2）修改密碼：每一個用戶都可以更改自己的密碼工資信息設(shè)置功能（1）基本工資設(shè)置：按照員工編號或職務設(shè)置員工的基本工資信息。（2）其他項目設(shè)置：設(shè)置單個員工的獎金，福利、津貼、出差費、加班費等 信息。（3）工資計算公

25、式設(shè)置：設(shè)置員工實發(fā)工資的計算公式信息。工資信息管理功能（1）出勤統(tǒng)計：按照月份統(tǒng)計員工的當月出勤信息。（2）計算實發(fā)工資：計算當月員工實發(fā)工資的金額。（3）查詢工資：可以按月查詢所有員工工資信息或查詢個人工資信息（4） 導出工資表：把數(shù)據(jù)庫中員工的工資信息導出到Excel 2000中。打印報表功能(1) 基本工資列表打?。捍蛴〕龌竟べY列表(2) 其他項目打?。捍蛴∑渌椖苛斜?3) 工資統(tǒng)計列表打?。捍蛴」べY統(tǒng)計列表3.3系統(tǒng)功能模塊圖企業(yè)工資管理系統(tǒng)系統(tǒng)管理工 資 信 息 設(shè) 置工 資 信 息 管 理工 資 信 息 管 理打 印 報 表員基苴丿、計工本他算資工項公料資目式設(shè)設(shè)設(shè)設(shè)置置置置

26、圖3-2系統(tǒng)功能模塊圖出 勤 統(tǒng) 計計 算 實 發(fā) 工 資查 詢 工 資基苴丿、工本他資工項表資目導打打出印印工 資 統(tǒng) 計 打 印4系統(tǒng)概要設(shè)計4.1系統(tǒng)總體結(jié)構(gòu)設(shè)計設(shè)計基礎(chǔ)是完成需求分析后提供的需求說明書，用概念數(shù)據(jù)模型表示數(shù)據(jù)及其相 互間的關(guān)系，這種數(shù)據(jù)模型是與 DBMSc關(guān)的、面向現(xiàn)實世界的、易如理解的數(shù)據(jù)模 型，其獨立于計算機的數(shù)據(jù)模型，獨立于計算機的軟硬件系統(tǒng)，與用戶進行交流十分 方便。概念性數(shù)據(jù)模型關(guān)心的是如何完整、正確地反映客觀實際情況，不關(guān)心在數(shù)據(jù)庫 中如何實現(xiàn)。這種數(shù)據(jù)模式能真實地反應用戶要求的實際情況，是一種容易被人們理 解的直觀的數(shù)據(jù)庫結(jié)構(gòu)模式。同時也是一種相對穩(wěn)定統(tǒng)一

27、的數(shù)據(jù)模式， 一般情況下很 少變動。概念性數(shù)據(jù)在用戶和設(shè)計者之間建立了橋梁。是設(shè)計數(shù)據(jù)庫結(jié)構(gòu)的基礎(chǔ)。概念設(shè)計中自頂向下的實體分析方法， 即常用的實體聯(lián)系模型（簡稱E-R模型）， 對具體數(shù)據(jù)進行抽象加工，將實體集合抽象成實體類型。用實體間聯(lián)系反映現(xiàn)實世界 事物間的內(nèi)在聯(lián)系。E-R模型是建立概念性數(shù)據(jù)模型的有力工具。通過對企業(yè)員工管理內(nèi)容、工資管理內(nèi)容和過程的分析，本系統(tǒng)設(shè)計的實體和屬 性如下及圖4-1和圖4-2 :員工（包括員工編號、員工姓名、性別、籍貫、年齡、生日、學歷、專業(yè)、住址、 郵編、電話、Email、參加工作時間、進入公司時間、起薪時間、備注）部門（員工編號、部門名稱）職務（員工編號、

28、職務名稱）職稱（員工編號、職稱名稱）工資結(jié)構(gòu)（員工編號、正常加班工資、特殊加班工資、出差工資、曠工工資、遲到早退）工資帳目（工資帳目代號、工資帳目名稱）圖4-1員工信息圖部門工資賬目代工資賬目 工資賬目名圖4-2工資管理內(nèi)容分析圖4.2實體和實體之間的關(guān)系E-R圖圖4-3實體之間的關(guān)系 E-R圖4.3數(shù)據(jù)庫設(shè)計Access在VB中的應用非常廣泛， 為此我選用Access 2000數(shù)據(jù)庫來進行數(shù)據(jù)庫的邏輯設(shè)計。 根據(jù)前面定義的實體及實休之間的關(guān)系，形成數(shù)據(jù)庫的表格以及各個表之間的關(guān)系。431 Person數(shù)據(jù)庫（員工數(shù)據(jù)庫）（1） Stufflnfo（員工資料表）:員工基本信息表用于存儲員工基本

29、信息，為保證數(shù)據(jù)的一致和歷史資料的完整，表的記錄在一般的情況不能被刪除。表4-1 Stuffl nfo（員工資料表）序號字段名字段中文名類型1SID員工編號文本2SName員工姓名文本3SGe nder性別文本4SPlace籍貫文本5SAge年齡長整型6SBirthday生日日期/時間7SDegree學歷文本8SSpecial專業(yè)文本9SAddress住址文本10SCode郵編文本11STel電話文本12SEmailEmail文本13SWorkTime參加工作時間日期/時間14SI nTime進入公司時間日期/時間15SDept部門文本16SPayTime起薪時間日期/時間17SPositio

30、 n職務文本18SRemark備注文本Userlnfo （用戶口令表）:為了便于多個用戶管理該系統(tǒng)，建立此表，記錄用戶的 登錄用戶名和口令。表4-2 Userlnfo（用戶口令表）序號字段名字段中文名類型1UserID用戶名稱文本2UserPWD用戶密碼文本（3）OverTimelnfo（加班情況表）：用于存儲員工加班的情況，在計算工資時便于統(tǒng)計。表4-5 OverTimelnfo （加班情況表）序號字段名字段中文名類型1OID記錄編號自動編號2OStuffID員工編號文本3OSpeciality特殊加班天數(shù)數(shù)字4OCom mon正常加班天數(shù)數(shù)字5OFromday加班日期日期/時間4.3.2

31、Salary 數(shù)據(jù)庫（工資數(shù)據(jù)庫）（1） AttendanceStatistics（員工出勤表）：用于統(tǒng)計員工的出勤情況，為統(tǒng)計工資時提供方便。表 4-7 AttendanceStatistics（員工出勤表）序號字段名字段中文名類型1StuffID員工編號文本2StuffName員工姓名文本3RecordMo nth統(tǒng)計時間日期時間4Atte ndance出勤天數(shù)日期/時間5LateEarly遲到早退次數(shù)數(shù)字6Abse nt曠工次數(shù)數(shù)字7OverTimeCom正常加班次數(shù)數(shù)字8OverTimeSpe特殊加班次數(shù)數(shù)字9Errand出差次數(shù)數(shù)字表 4-8 FormulaSetting（工資設(shè)置表

32、）序號字段名字段中文名類型1OvertimeCom正常加班工資百分比數(shù)字2OvertimeSpe特殊加班工資百分比數(shù)字3Errand出差工資數(shù)字4Abse nt曠工工資數(shù)字5Le遲到早退數(shù)字（3） Salaryother （其他工資項目表）：用于存儲不同名稱的其他工資，比如獎金、 津貼、福利等。表4-9 Salaryother （其他工資項目表）序號字段名字段中文名類型1StuffID員工編號文本2YearMo nth年月日期/時間3Type類型數(shù)字4Name名稱文本5Money金額貨幣6Remark備注備注（4）SalarySetting（基本工資設(shè)置）：用于存儲不同職稱的員工的基本工資表4

33、-10 SalarySetting（基本工資設(shè)置）序號字段名字段中文名類型1StuffID員工編號文本2Spositi on員工職務文本3Salary基本工資貨幣（5）Userlnfo （用戶表）：用于存儲新添加的用戶，當添加完用戶時，就被存 儲在此表中。表 4-11 Userlnfo （用戶表）序號字段名字段中文名類型1UserID用戶名稱文本2UserPWD用戶密碼文本（6）Salarystatistics（工資情況表）：用于存儲員工的工資情況表，便于明確查看。表 4-12 Salarystatistics（工資情況表）序號字段名字段中文名類型1StuffName員工編號文本2Stuffn

34、ame員工姓名文本3YearMo nth時間日期/時間4Basicsalary基本工資貨幣5Bonus獎金貨幣6Welfare福利貨幣7Allowa nee津貼貨幣8Abateme nt扣發(fā)貨幣9LeSub遲到早退扣發(fā)貨幣10Abse ntSub曠工扣發(fā)貨幣11Overtime加班費貨幣12Others其他金額貨幣13Total總額貨幣5詳細設(shè)計根據(jù)系統(tǒng)分析、系統(tǒng)概要設(shè)計的結(jié)果，采用VB作為開發(fā)工具，實現(xiàn)公司工資管理各模塊的功能。系統(tǒng)運行時，首先出現(xiàn)在用戶面前的就是一個登錄窗口。5.1登錄窗體設(shè)計功能說明它主要是控制員工登錄，防止非法用戶闖入本系統(tǒng)，保證系統(tǒng)的安全，輸入口令 時屏幕顯示為“*”

35、以利保密。在開發(fā)過程當中，我還給系統(tǒng)限制了登錄出錯的次數(shù)， 如果用戶名或密碼出錯超過三次，那就自動退出系統(tǒng)。系統(tǒng)登陸時，要求正確輸入用戶名和密碼。成功登陸后顯示如圖4-2所示工資管理 系統(tǒng)主界面。用戶名分為管理員用戶和普通用戶。如圖4-1所示：圖4-1登錄窗口實現(xiàn)功能的部分主要代碼：Private Sub Comok_Click()On Error GoTo DealerrorDim strSql As StringDim strMsg As Stri ngOn Error GoTo DealerrorDim objC n As New Connectionstrc n = CS()objC

36、n.Conn ectio nStri ng = strc nobjC n.Ope nSet objRs = New RecordsetSet objRs.ActiveC onnection = objCn objRs.CursorLocati on = adUseClie nt strSql = SELECT * FROM 系統(tǒng)用戶 objRs.Open strSql objRs.ActiveConnection = Nothing objCn.CloseSet objCn = NothingIf Logontimes = 3 ThenMsgBox 你已經(jīng)超過最大登陸次數(shù)！退出系統(tǒng) , vbO

37、KOnly + vbCritical, 系統(tǒng)登錄EndElseobjRs.MoveFirstobjRs.Find 用戶名 = & txtUserName & If objRs.EOF ThenMsgBox 用戶名錯誤！ , vbOKOnly + vbCritical, 系統(tǒng)登錄 txtUserName.SetFocus txtUserName.Text = ElseIf objRs!口令 txtPassword ThenMsgBox 密碼錯誤 ! 請重新輸入 !, vbOKOnly + vbCritical, 系統(tǒng)登錄 txtPassword.SetFocustxtPassword.Text

38、= ElseMsgBox 歡迎使用工資管理系統(tǒng) , vbOKCancel + vbOKOnly, 系統(tǒng)登錄 strusername = txtUserName userpassword = txtPasswordIf CmbStatus = ThenMsgBox 請選擇登陸身份 !, vbOKOnly + vbCritical, 系統(tǒng)登錄 CmbStatus.SetFocusElseIf CmbStatus.ListIndex = 0 And objRs!admin = True ThenUserAdmin = 1End IfIf CmbStatus.ListIndex = 0 And obj

39、Rs!admin = False ThenX = MsgBox( 你不是管理員，將以普通用戶登陸 , vbOKCancel + vbOKOnly, 系統(tǒng)登錄 )End IfIf X = 2 ThentxtUserName.SetFocus txtUserName.Text = txtPassword.Text = Else 添加操作員登陸時間strSql = insert into t_login (用戶 , 登錄時間 ) values( &txtUserName & , & Now & )Set objRs = ExecuteSQL(strSql, strMsg)Unload MeMDIFo

40、rm1.ShowEnd IfEnd IfEnd IfEnd IfEnd IfLogontimes = Logontimes + 1 登陸次數(shù)Exit SubDealerror:msg = 程序執(zhí)行出錯 , 錯誤信息如下 : & vbCrLf & Err.DescriptionShowError msgEnd SubDim objRs As RecordsetDim i As In tegerDim Log on times As In tegerPrivate Sub Comca ncle_Click()n = MsgBox(你選擇了退出系統(tǒng)登陸,退出將不能啟動管理系統(tǒng)! & vbCrLf &

41、 是否真 的退出?, vbYesNo,系統(tǒng)驗證)If n = vbYes The nUn load MeEnd IfEnd Sub5.2主窗口設(shè)計功能說明界面采用MDI方式，可同時打開幾個子窗體，在界面上放置了菜單欄，它集中了系統(tǒng)操作的入口，各功能模塊的執(zhí)行從此進入。其總體模塊圖如下所示：主菜單系 統(tǒng) 管 理工資信息設(shè)置工 資 信 息 管 理打 印 報 表圖5-2總體模塊圖5.3 系統(tǒng)管理模塊5.3.1 功能說明 系統(tǒng)管理模塊主要實現(xiàn)的是添加用戶和修改密碼的功能， 當想要添加用戶時， 就 可直接在添加用戶這個窗體上進行錄入； 而用戶想要修改密碼時則可以在修改密碼這 個窗口上進行操作， 此時用戶

42、必須記得原先的密碼才能進行修改， 而且修改密碼時設(shè) 置了再次確認密碼，以免由于誤輸而導致操作無法完成。添加用戶窗體代碼如下：Private Sub cmdCancel_Click()Unload MeExit SubEnd SubPrivate Sub cmdOK_Click()Dim sql As StringDim rs As ADODB.RecordsetIf Trim(username.Text) = ThenMsgBox 請輸入用戶名稱 , vbOKOnly + vbExclamation, 警告 Exit Sub username.SetFocusElsesql = select

43、* from 系統(tǒng)用戶 where 用戶名 = & username & Set re = getrs(sql, gzgl)If re.EOF = False ThenMsgBox 這個用戶已經(jīng)存在， 請重新輸入用戶名 , vbOKOnly+ vbExclamation,II 小 II 警告 username.SetFocus username.Text = password.Text = confirmpwd.Text = Exit SubElseIf Trim(password.Text) Trim(confirmpwd.Text) ThenMsgBox 兩次輸入密碼不一致，請重新輸入密碼

44、 , vbOKOnly+ vbExclamation,II 小 II 警告 password.Text = confirmpwd.Text = password.SetFocusExit SubElseIf Trim(password.Text) = ThenMsgBox 密碼不能為空 , vbOKOnly + vbExclamation, 警告 password.Text = confirmpwd = password.SetFocusElseIf AdminCheck = False Thensql = insert into 系統(tǒng)用戶 ( 用戶名 , 口令 ) values( & use

45、rname sql = sql & , & password & )Call transactsql(sql, gzgl)Elsesql = insert into 系統(tǒng)用戶 ( 用戶名 , 口令 ,admin) values( & username sql = sql & , & passwordsql = sql & , & UserAdmin & )End IfCall transactsql(sql, gzgl)MsgBox 添加成功 , vbOKOnly + vbExclamation, 添加結(jié)果 username.Text = password.Text = confirmpwd.

46、Text = username.SetFocus If Check1 = False ThenUnload MeEnd IfEnd IfEnd IfEnd IfEnd SubPrivate Sub Form_Load()Me.Left = ReadIni( 添加用戶 , left) Me.Top = ReadIni( 添加用戶 , top) End SubPrivate Sub Form_Unload(Cancel As Integer) Call WriteIni( 添加用戶 , left, Me.Left) Call WriteIni(添加用戶 , top, Me.Top)End Sub修

47、改密碼窗體代碼如下：Private Sub cmdCancel_Click()Unload MeExit SubEnd SubPrivate Sub cmdOK_Click()Dim sql As StringDim rs As ADODB.RecordsetIf Trim(oldpwd.Text) = ThenMsgBox 請輸入舊密碼 , vbOKOnly + vbExclamation, 提示 oldpwd.SetFocusExit SubElseIf Trim(oldpwd.Text) Trim(userpassword) ThenMsgBox 舊密碼與登錄的密碼不同， 請重新輸入！

48、, vbOKOnly+ vbExclamation, 提示oldpwd.Text = oldpwd.SetFocusElseIf Trim(newpwd.Text) = ThenMsgBox 請輸入新密碼 , vbOKOnly + vbExclamation, 提示 newpwd.SetFocusExit SubElseIf Trim(newpwd.Text) Trim(confirmpwd.Text) ThenMsgBox 兩次密碼不同 , vbOKOnly + vbExclamation, 警告 newpwd.Text = confirmpwd.Text = newpwd.SetFocus

49、Elseuserpassword = newpwdsql = update 系統(tǒng)用戶 set 口令 = & newpwd & where 用戶名 = & strusername & Call transactsql(sql, gzgl)MsgBox 密碼已經(jīng)修改 , vbOKOnly + vbExclamation, 修改結(jié)果 Unload MeEnd IfEnd IfEnd SubPrivate Sub Form_Load（）Me丄eft = Readlni（修改密碼, left）Me.Top = ReadIni（ 修改密碼, top）End SubPrivate Sub Form_Unl

50、oad（Ca ncel As In teger） Call WriteIni（修改密碼, left, Me丄eft）Call WriteIni（修改密碼, top, Me.Top）End Sub5.4工資信息設(shè)置模塊541功能說明此模塊的功能主要是系統(tǒng)管理員根據(jù)本企業(yè)的規(guī)章制度及條例對工資的各項內(nèi)容進行設(shè)置。包括基本工資設(shè)置、其他項目設(shè)置（包括獎金、福利、津貼、扣發(fā)等項目），以及工資計算公式設(shè)置。其分解模塊圖如下：圖5-5分解模塊圖員工基本檔案信息的實現(xiàn)：員工基本檔案信息管理，在窗體中完成員工基本信息的錄入工作。根據(jù)提示在該窗體中輸入相應的信息，最后單擊“保存”按鈕，進行信息的保存。如圖4-3

51、所示圖4-3員工基本檔案信息錄入窗口相應部分代碼如下:添加員工基本信息Private Sub cmdOK_Click()Dim rs As ADODB.RecordsetDim strSql As Stri ngDim strMsg As Stri ngDim tmpPath As Stri ngDim iStm As ADODB.Stream如果是修改(保存照片-刪除原記錄-保存記錄)If bln Cha nge = True The n如果不要刪除If bln DelPhoto = False The n工號=& txtGH.Text & ”strSql = select * from t

52、_br whereSet rs = ExecuteSQL(strSql, strMsg)保存到文件tmpPath = App.path & temp.jpgSet iStm = New ADODB.StreamWith iStm.Mode = adModeReadWrite.Type = adTypeBinary.Open.Write rs.Fields(照片).Value.SaveToFile tmpPathblnDel = TrueEnd WithstrFileName = tmpPathpic.Picture = LoadPicture(tmpPath)iStm.CloseElsebln

53、Del = FalseEnd Ifrs.CloseEnd If 刪除記錄strSql = delete * from t_br where工號= & txtGH.Text & Set rs = ExecuteSQL(strSql, strMsg)ElsestrSql = select * from t_br where工號= & txtGH.Text & Set rs = ExecuteSQL(strSql, strMsg)If rs.EOF = False ThenMsgBox 已 有 相 同 的 工 號 ， 無 法 添 加 到 數(shù) 據(jù) 庫 ！ , vbOKOnly vbExclamation, 警告TextFocus txtGHExit SubEnd If rs.CloseEnd Ifs