數(shù)據(jù)庫工資管理系統(tǒng).doc

《數(shù)據(jù)庫工資管理系統(tǒng).doc》由會員分享，可在線閱讀，更多相關(guān)《數(shù)據(jù)庫工資管理系統(tǒng).doc（35頁珍藏版）》請在裝配圖網(wǎng)上搜索。

數(shù)據(jù)庫 課程設(shè)計報告 題目：工資管理系統(tǒng)設(shè)計與實現(xiàn) 班級： 教師： 學(xué)號： 姓名： 安徽新華學(xué)院 年 月 課程設(shè)計任務(wù)書 姓 名 學(xué) 號 班 級 課程名稱 軟件工程導(dǎo)論 課程性質(zhì) 專業(yè)基礎(chǔ)課 設(shè)計時間 2017年 5月 20 日—— 2017年 06 月 12 日 設(shè)計名稱 工資管理系統(tǒng)設(shè)計與實現(xiàn) 項 目 組 成 員 姓名 學(xué)號 在本項目中的分工 代碼實現(xiàn) 文檔編寫 設(shè)計要求 使用傳統(tǒng)軟件工程方法對工資管理系統(tǒng)進行分析和設(shè)計，本程序是建立在Windows操作系統(tǒng)上，以VB為開發(fā)軟件的應(yīng)用程序，主要功能包括：人事信息的錄入，修改，刪除和查詢操作：工資的核算查詢；用戶信息的管理等。 計劃與進度 9日20日至9月30日——學(xué)習項目開發(fā)的背景目標 10日1日至10月7日——可行性研究 10日8日至10月13日——系統(tǒng)分析（包括需求分析，數(shù) 據(jù)流圖，數(shù)據(jù)字典等） 10日14日至10月24日——系統(tǒng)設(shè)計（包括功能設(shè)計， 數(shù)據(jù)庫設(shè)計及數(shù)據(jù)庫的實現(xiàn)） 10月25日至11月2日——系統(tǒng)實現(xiàn) 11月3日至11月12日——軟件測試及資料整理 指導(dǎo)教師意見 目錄 內(nèi)容概要 第一章 引 言 1.1 項目開發(fā)背景 1.2 項目開發(fā)的目標及意義 1.3 系統(tǒng)的開發(fā)方法 第二章 可行性研究 2.1 系統(tǒng)流程圖 2.2 完成新系統(tǒng)的可行性 第三章 系統(tǒng)分析 3.1 系統(tǒng)的設(shè)計思想 3.2 需求分析 3.3 系統(tǒng)的運行環(huán)境和開發(fā)平臺 3.4 數(shù)據(jù)流圖 3.5 數(shù)據(jù)字典 第四章 系統(tǒng)設(shè)計 4.1 功能模塊設(shè)計 4.2 系統(tǒng)總體功能模塊 4.3 數(shù)據(jù)庫設(shè)計 4.4 數(shù)據(jù)庫結(jié)構(gòu)的實現(xiàn) 第五章 工資管理系統(tǒng)功能實現(xiàn) 5.1 開發(fā)環(huán)境簡介 5.2 系統(tǒng)界面的設(shè)計 5.3 員工基本信息管理功能設(shè)計 5.4 工資管理功能設(shè)計 第六章 軟件測試 第七章 用戶操作手冊 第八章 總結(jié) 8.1 參考文獻 8.2 設(shè)計體會與建議 內(nèi)容摘要 工資管理系統(tǒng)是使用Visual Basic 6.0開發(fā)的一個數(shù)據(jù)庫管理系統(tǒng)。在此主要講述了使用SQL Server 2000和Visual Basic 6.0完成工資管理系統(tǒng)基本功能的過程。開發(fā)這個系統(tǒng)的步驟主要有系統(tǒng)分析、系統(tǒng)設(shè)計、系統(tǒng)實現(xiàn)和系統(tǒng)維護。在系統(tǒng)的設(shè)計中，詳細的展現(xiàn)了系統(tǒng)的各個模塊、所需的數(shù)據(jù)庫表及表字段菜單的設(shè)計等。在系統(tǒng)的實現(xiàn)中，給出了實現(xiàn)表單中相應(yīng)的功能控件的事件、代碼及菜單實現(xiàn)的方法。本系統(tǒng)具有數(shù)據(jù)輸入，數(shù)據(jù)存儲，信息計算修改刪除等功能，本系統(tǒng)也提供了友好的人際對話界面。 第一章 引 言 1.1 項目開發(fā)背景 眾所周知當今時代的世界經(jīng)濟正從工業(yè)經(jīng)濟向知識經(jīng)濟轉(zhuǎn)變，而知識經(jīng)濟的兩個重要特征就是信息化合全球化。要實現(xiàn)信息化和全球化就必須依靠完善的網(wǎng)絡(luò)和數(shù)據(jù)庫機制。處于現(xiàn)在這樣一個飛速發(fā)展的信息時代，在各行各業(yè)中都離不開信息處理，這正是計算機被廣泛應(yīng)用于管理信息系統(tǒng)的環(huán)境，使用計算機進行信息控制不僅提高了工作效率，而且大大的提高了其安全性。尤其是對于復(fù)雜的信息管理，計算機能夠充分發(fā)揮其優(yōu)越性。計算機進行信息管理與信息管理系統(tǒng)的開發(fā)密切相關(guān)，系統(tǒng)的開發(fā)時系統(tǒng)管理的前提。 因此，對于企業(yè)或是事業(yè)單位來說開發(fā)一套工資管理系統(tǒng)是很必要的。雖然企業(yè)事業(yè)單位的管理已經(jīng)進入信息化管理，但對于不同的單位所需要的功能是不一樣的，這樣通用的軟件使用效率不高，還會造成人力，財力的浪費，這樣就不能滿足所有單位和部門的需求。所以必須做好客戶的需求分析工作，設(shè)計符合用戶要求的系統(tǒng)。 1.2 系統(tǒng)開發(fā)的目標及意義 企業(yè)和事業(yè)單位工資管理系統(tǒng)唯有采用自動化，高效率，人性化的管理，才能滿足服務(wù)員工的需求。工資管理系統(tǒng)的主要目標在于加強服務(wù)而不在于精簡人力。所以系統(tǒng)要能提供更自動化的服務(wù)，期望以最快的速度將人事工資信息做最適當?shù)倪\用。主要目標有：以自動化、系統(tǒng)化、高效管理代替分散重復(fù)操作；提高單位效益和現(xiàn)代化信息管理水平；提高員工的自律性，促進員工人才的成長和流動；減輕人事工資管理員的負擔，節(jié)省人力物力的開支等。 引進以計算機信息管理技術(shù)和網(wǎng)絡(luò)通訊技術(shù)，是加快人事工資管理信息服務(wù)進程的重要手段。新的管理系統(tǒng)的使用會給人事管理體系發(fā)生變化。這促進了工資數(shù)據(jù)管理方式和理念的轉(zhuǎn)變，提高了企業(yè)單位的現(xiàn)代化和信息化水平，為企業(yè)帶來更多的效益。 1.3 系統(tǒng)的開發(fā)方法 本系統(tǒng)采用Visual Basic 6.0可視化開發(fā)工具開發(fā)，采用ADO對象數(shù)據(jù)技術(shù)來提高系統(tǒng)的安全性和穩(wěn)定性。工資管理系統(tǒng)可為企業(yè)和事業(yè)單位使用，屬于C/S結(jié)構(gòu)的數(shù)據(jù)庫系統(tǒng)，固定后臺數(shù)據(jù)庫采用SQL Server 2000。 第二章 可行性研究 2.1 系統(tǒng)流程圖 員工錄入 人事信息管理 部門錄入 員工出勤 工資核算 工資管理 基本工資 出勤 信息 基本 信息 工資報表 圖2.1 系統(tǒng)流程圖 2.2 完成新系統(tǒng)的可行性 工資管理系統(tǒng)吸取通用系統(tǒng)的優(yōu)點的基礎(chǔ)上，根據(jù)具體企業(yè)單位所要求的功能進行設(shè)計。添加業(yè)務(wù)管理模塊，在業(yè)務(wù)管理模塊中添加管理員工的業(yè)務(wù)檔案，當用戶的業(yè)務(wù)工種等發(fā)生變化時只需修改業(yè)務(wù)檔案表記錄即可。通用型工資管理的技術(shù)比較成熟，所以可以學(xué)習技術(shù)并添加一些企業(yè)需要的功能，這樣就能完成此系統(tǒng)以滿足客戶的需求。 第三章 系統(tǒng)分析 3.1 系統(tǒng)的設(shè)計思想 工資管理系統(tǒng)是企業(yè)和事業(yè)單位常見的計算機信息管理系統(tǒng)。它的主要任務(wù)是對各種工資信息進行日常的管理，如工資信息的輸入、查詢、修改、增加、刪除，迅速準確地完成各種工資信息的統(tǒng)計計算和匯總，快速打印出報表。在建立與實現(xiàn)工資管理系統(tǒng)時，應(yīng)進行功能劃分，能夠由數(shù)據(jù)庫管理系統(tǒng)完成的功能應(yīng)盡可能由數(shù)據(jù)庫管理系統(tǒng)完成，這樣才能夠充分發(fā)揮數(shù)據(jù)庫管理系統(tǒng)高效、完全、可靠、便捷的性能，減少編程人員的工作量。 3.2 需求分析 工資管理系統(tǒng)是針對企事業(yè)單位的大量業(yè)務(wù)處理工作用計算機進行全面現(xiàn)代化管理主要包括信息輸入功能，信息修改刪除功能，信息的查詢以及工資的計算管理等。 1.信息輸入功能 1）輸入職工的基本信息。包括：Eno(員工編號)、Ename（員工姓名）、Epart(所屬部門)、Eduty(職務(wù))、Esex（性別）、Eedu(學(xué)歷)、Eaddr(住址)、Ebir(出生年月)、Etel(電話號碼)等。 2）輸入工資的信息。包括：（基本工資）、（崗位工資）、（住房補貼）、（津貼）、(工會會費)、(水電費)、（住房公積金）、（養(yǎng)老保險）、（獎懲）。 3）輸入員工的部門信息。包括：Bno（部門編號）、Bname（部門名稱）、Bzg（部門總管）、Bmount(部門人數(shù))等。 2.數(shù)據(jù)修改和刪除功能 1）修改和刪除員工的基本信息。當單位人員的信息發(fā)生變化，如職稱的改變，工作部門變動，或調(diào)離本單位等，系統(tǒng)應(yīng)能修改員工的信息或?qū)⑵鋸膯T工信息表中刪除。 2）修改和刪除員工的工資信息。員工升職加薪、工資普調(diào)是企業(yè)中常見的事情，這就需要系統(tǒng)能方便對員工工資進行個別及批量的修改；如員工調(diào)離本單位，就應(yīng)當從員工信息表中刪除這個員工信息，將其工資信息表中相應(yīng)的數(shù)據(jù)刪除。 3）修改和刪除部門信息。當撤消一個部門時，文學(xué)藝術(shù)在能從部門信息表中將其刪除。而當一個部門的名稱發(fā)生改變時，系統(tǒng)中所有該項部門的名稱應(yīng)一致的改變。 3.查詢和統(tǒng)計功能 1）能夠查詢指定員工的基本信息。 2）能夠查詢指定某個部門或全部部門的基本信息。 3）查詢某個員工的工資信息。 4）統(tǒng)計、匯總指定年份企業(yè)各部門或某個部門每個月或全年工資總額，匯總各部門的人數(shù)或本單位的總?cè)藬?shù)。 5）工資表月工資記錄的生成功能。生成當月所有員工或某個部門的工資記錄，同時能進行員工工資的計算，即計算應(yīng)發(fā)金額、應(yīng)扣金額及實發(fā)金額。 3.3 系統(tǒng)的運行環(huán)境和開發(fā)平臺 本系統(tǒng)使用Visual Basic進行軟件開發(fā)，SQL Server 2000進行數(shù)據(jù)庫開發(fā)。VB是微軟公司開發(fā)的最為流行的軟件之一，也是社會上使用較多的開發(fā)工具之一。VB是一個完全可視化，面向?qū)ο蟮拈_發(fā)工具，因此此系統(tǒng)具有兼容性較好，安全性強，通用性好等優(yōu)點。 3.4 數(shù)據(jù)流圖 在對企業(yè)和事業(yè)單位工資管理過程進行分析后，根據(jù)系統(tǒng)功能的描述，得到工資管理系統(tǒng)的數(shù)據(jù)流圖如下： 1. 頂層數(shù)據(jù)流圖與0層數(shù)據(jù)流圖 圖3.1 頂層數(shù)據(jù)流圖 圖3.2 0層數(shù)據(jù)流圖 2.人事管理模塊、工資管理模塊查詢模塊分層數(shù)據(jù)流圖 部門表 1.1查詢部門及員工信息 1.2工資錄入 員工編號 員工與考勤數(shù)據(jù) 工資數(shù)據(jù) 考勤表 工資表 圖3.3 員工信息查詢與錄入 考勤表 2.2計算工資 2.1查詢考勤內(nèi)容 員工名稱 考勤數(shù)據(jù) 工資信息 工資表 圖3.4 工資核算 備份員工名 3.2數(shù) 據(jù)備份 3.1查詢工資數(shù)據(jù) 備份工資表 備份數(shù)據(jù) 工資表 工資備份表 圖3.5 工資備份 工資表 考勤表 4.2查 詢處理 4.1要求加工 員工信息查詢要求 查詢規(guī)則 查詢結(jié)果 員工表 圖3.6 員工信息查詢 3．5 數(shù)據(jù)字典 數(shù)據(jù)字典是系統(tǒng)中各類數(shù)據(jù)描述的集合 簡要說明工資管理系統(tǒng)的數(shù)據(jù)字典。 1).名字：職工編號，部門編號 別名：職工號，部門號 描述：職工號唯一地標識數(shù)據(jù)庫中職工信息相關(guān)表中的一個特定員工的關(guān)鍵域；部門號唯一地標識部門信息表中的一個特定部門的關(guān)鍵域 位置：員工信息表 考勤表 工資表 2).名字：職工信息報表 別名：職工信息 描述：用戶指定條件下的員工基本信息情況查詢結(jié)果的信息表 定義：職工信息表=職工號+職工姓名+性別+出生年月+職務(wù)+學(xué)歷+電話號碼+住址+所屬部門+身份證號 位置：輸出到打印機 3).名字：考勤信息報表 別名：考勤信息 描述：用戶指定條件下的員工考勤信息查詢結(jié)果的信息表 定義：員工考勤信息查詢報表=考勤編號+員工號+員工姓名+加班天數(shù)+出差天數(shù)+曠工天數(shù)+遲到次數(shù)+考勤日期 位置：輸出到打印機 4).名字：工資報表 別名：工資信息 描述：記錄工資的組成部分以及員工的工資情況的信息 定義：工資信息報表=職務(wù)+基本工資+每日工資+加班系數(shù)+出差天數(shù)+曠工標準+遲到標準+獎金 位置：輸出到打印機 第四章 系統(tǒng)設(shè)計 4.1 系統(tǒng)功能設(shè)計 軟件所實現(xiàn)的功能強弱是衡量一個軟件最根本的標準。經(jīng)過系統(tǒng)的可行性研究，需求分析后，得出中小型企業(yè)的工資信息管理系統(tǒng)的功能分層圖如下： 工資管理系統(tǒng) 2.1添加人事信息 2.2修改人事信息 2.4查詢?nèi)耸滦畔? 3.1設(shè)置工資 3.3查詢職務(wù)基本工資 3.2計算工資 2.0人事管理功能 3.0工資管理功能 1.0系統(tǒng)登錄 4.0系統(tǒng)管理功能 4.1管理用戶 2.3刪除人事信息 4.1.1添加用戶 4.1.2修改用戶密碼 圖4.1 工資管理系統(tǒng)層次圖 4.2 系統(tǒng)總體功能模塊 此工資管理系統(tǒng)分為五個模塊，具體如下： 1.人事基本信息管理模塊：員工信息錄入修改刪除及查詢。 2.部門管理模塊。 3.考勤管理模塊。 4.工資計算及管理模塊。 4.3 數(shù)據(jù)庫設(shè)計 4.3.1概念結(jié)構(gòu)設(shè)計 1. 根據(jù)如上的信息可得到實體之間的關(guān)系E-R圖如下： 圖4.2 E-R圖 2.概念結(jié)構(gòu)模型 圖4.3 概念模型CDM 4.3.2 邏輯結(jié)構(gòu)設(shè)計 將E-R圖轉(zhuǎn)換成如下關(guān)系模式： 員工表（員工號，員工名，職務(wù)，部門號，性別，出生年月，學(xué)歷，電話，住址，身份證號） 部門表（部門號，部門名，部門總管，部門人數(shù)，） 考勤表（考勤編號，員工號，遲到次數(shù)，曠工次數(shù)，出差天數(shù)，加班次數(shù)，考勤日期） 工資表（職務(wù)，員工號，基本工資，獎金，出差標準，加班標準，遲到系數(shù)，曠工次數(shù)） 依據(jù)上面的關(guān)系模式，設(shè)計數(shù)據(jù)表如下： 1. 用戶表 ：用于進入系統(tǒng)的權(quán)限設(shè)置等。 表1 用戶信息表Users 列名 數(shù)據(jù)類型 長度 屬性 描述 userID char 5 主鍵 用戶編號 username varchar 10 不允許空 用戶名 password varchar 15 不允許空 密碼 mark varchar 20 備注 2.職工表：職工的基本信息。 表2 職工信息表Employee 列名 數(shù)據(jù)類型 長度 屬性 描述 Eno char 6 主鍵 職工編號 Ename varchar 15 不允許為空 職工姓名 Esex varchar 10 性別 Ebirth Datetime 出生年月 Eduty varchar 20 外鍵 職務(wù) Eedu varchar 20 學(xué)歷 Etel varchar 15 電話號碼 Eaddr varchar 20 住址 Bno varchar 20 外鍵 部門編號 IDidentify varchar 20 身份證號 3.部門表：部門基本信息。 表3 部門信息表Department 列名 數(shù)據(jù)類型 長度 屬性 描述 Bno char 5 主鍵 部門號 Bname varchar 10 不允許空 部門名 Bzg varchar 10 部門總管 Bmount int 4 部門人數(shù) 4.工資表：工資的基本組成信息。 表4 工資設(shè)置表WageConfig 列名 數(shù)據(jù)類型 長度 屬性 描述 Duty Varchar 20 主鍵 職務(wù) BaseWage Money 8 基本工資 DayWage Money 8 每日工資 QvertinmeJob Float 8 加班系數(shù) EvectionStandard Money 出差標準 AbsenStandard Money 8 曠工標準 LateStandard Money 8 遲到標準 Bonus money 8 獎金 5.考勤表：記錄員工的到職情況。 表5 考勤統(tǒng)計表CheckStat 列名 數(shù)據(jù)類型 長度 屬性 描述 CheckID Int 主鍵 考勤編號 Eno Char 6 外鍵 員工號 Ename char 15 不允許空 員工姓名 OvertimeDay Varchar 加班天數(shù) EvectionDay Smallint 出差天數(shù) AbsentDay Smallint 曠工天數(shù) LateDay Smallint 遲到次數(shù) CheckDate smalldatetime 考勤日期 6.工資表：記錄保存計算出來的工資。 表6 工資表Wage 列名 數(shù)據(jù)類型 長度 屬性 描述 WageID int 主鍵 編號 EmployeeID char 6 不允許空 員工編號 EmployeeName varchar 15 不允許空 員工姓名 WageName datetime 不允許空 工作日期 BaseWage money 不允許空 基本工資 OvertimeWage money 不允許空 加班工資 EvectionWage money 不允許空 出差補助 AbsentWage money 不允許空 曠工減薪 LateWage money 不允許空 遲到減薪 EtcWage money 不允許空 其他補助 BonusWage money 不允許空 獎金 TotalWage money 不允許空 總工資 4.3.3 物理結(jié)構(gòu)模型 圖4.4 物理結(jié)構(gòu)模型PDM 4.4 數(shù)據(jù)庫結(jié)構(gòu)的實現(xiàn) 1、數(shù)據(jù)庫的創(chuàng)建 T-SQL語句： Create database 工資管理 on ( name=Wages_data, filename=E:\MSSQL\Data\Wages_data.mdf, size=10mb, maxsize=100mb, filegrowth=5% ) log on ( name=Wages_log, filename=E:\MSSQL\Data\Wages_log.ldf, size=5mb, maxsize=30mb, filegrowth=2mb ) 2、數(shù)據(jù)表的創(chuàng)建（可同時在創(chuàng)建時定義相關(guān)的約束） T-SQL語句： 1) Users表： Create table Users( UID int not null defaultPrimary Key, Uname char(8) not null default, UPassword char( 16) default, URight char(20) default, ) 2)Employee表： create table Employee( EmployeeID char(8) not null defaultPrimary Key, EmployeeName char(8) not null default, Sex char(2) default, Birthday smalldatetime default, Education char(8) default, Duty char(20) not null References WageConfig(Duty) ON UPDATE CASCADE ON DELETE CASCADE, DepartmentID char(20) not null, IdentityID char(20) not null, Telephone char(15) not null, Address char(40) not null, Remark varchar(100) default ) 3)WageConfig表： Create table WageConfig( Duty char(20) not null defaultPrimary Key, BaseWage money not null, DayWage money not null, OvertimeJob float(8) not null, EvectionStandard money not null, AbsentStandard money not null, LateStandard money not null, EtcStandard money not null, Bonus money not null ) 4）CheckStat表： create table CheckStat( CheckID int IDENTITY(1,1) Primary Key, EmployeeID char(8) not null References Employee(EmployeeID) ON UPDATE CASCADE ON DELETE CASCADE, EmployeeName varchar(15) default, Overtimeday smallint default, Evectionday smallint default, Absentday smallint default, Lateday smallint default, CheckDate smalldatetime default ) 5）Wage表： create table Wage( WageID int IDENTITY(1,1) Primary Key, EmployeeID char(8) not null References Employee(EmployeeID) ON UPDATE CASCADE ON DELETE CASCADE, EmployeeName varchar(15) default, WageDate smalldatetime default, BaseWage money default 0, OvertimeWage money default 0, EvectionWage money default 0, AbsentWage money default 0, LateWage money default 0, EtcWage money default 0, BonusWage money default 0, TotalWage money default 0, ) 6)DepartmentID表： Create table DepartmentID( DepartmentID int not null defaultPrimary Key, Departmentname char(16) not null default, Departmentmanage char( 8) default, Departmentnumber int default, ) 3. 向表中插入基本信息 1）插入用戶基本信息 insert into Users select01,1,1,系統(tǒng)管理員 union select 02,yy,1234,人事管理 union select 03,ll,1234,工資管理 union select 04,lxj,1234,人事管理 union select 05,ws,1234,工資管理 union select 06,mq,1234,系統(tǒng)管理員 2）插入職工基本信息 insert into Employee(EmployeeID,EmployeeName,Sex,Birthday,Education,Duty,DepartmentID,IdentityID,Telephone,Address,Remark) select0101,時妍妍,女,1988-08-15,,總管,策劃部,,15862110365,淮安, union select 0401,梁麗,女,1989-01-08,,總管,財務(wù)部,,15862110353,淮安, union select 0301,潘娟,女,1988-01-25,,工人,生產(chǎn)部,,15862110371,徐州, union select 0402,許潔,女,1990-01-27,,工人,財務(wù)部,,15862110365,河南, union select 0501,王濤,,1987-10-13,,工人,銷售部,,15862110001,福建, union select 0201,徐杰,,1984-07-09,研究生,技術(shù)人員,研發(fā)部,,15862110002,無錫, union select 0701,張凱,,1985-04-12,,總管,后勤部,,15862110003,浙江, union select 0601,李璐,女,1986-05-16,大專,總管,宣傳部,,15862110004,蘇州, union select 0302,石磊,,1985-02-07,,工人,生產(chǎn)部,,15862110005,揚州, union select 0303,吳華,,1986-06-24,,工人,生產(chǎn)部,,15862110006,山東, union select 0304,唐建青,,1989-11-10,,總管,生產(chǎn)部,,15862110007,揚州, union select 0502,李云,女,1988-03-17,,工人,銷售部,,158621100008,鎮(zhèn)江, union select 0202,王兆坤,,1986-04-30,,總管,研發(fā)部,,15862110009,無錫, union select 0305,梁玉沖,,1990-09-04,,工人,生產(chǎn)部,,15862110010,無錫, union select 0503,金壇,,1989-12-15,,總管,銷售部,,15862110011,上海, union select 0403,夏平,,1986-01-13,大專,工人,財務(wù)部,,15862110012,四川, union select 0602,邵建波,,1984-03-17,,工人,宣傳部,,15862110013,徐州, union select 0603,李書生,,1987-11-22,,工人,宣傳部,,15862110014,南通, union select 0102,陸林,,1980-08-21,博士,工人,策劃部,,15862110015,河北, union select 0702,黃婷,女,1981-05-16,,工人,后勤部,,15862110016,安徽, union select 0203,周宇,,1982-07-19,研究生,技術(shù)人員,研發(fā)部,,15862110017,浙江, union select 0703,李曉梅,女,1982-04-03,,工人,后勤部,,15862110018,宿遷, 第五章 工資管理系統(tǒng)功能實現(xiàn) 5.1 開發(fā)環(huán)境簡介 Visual Basic是一個可視化、面向?qū)ο蟮?、采用事件?qū)動的結(jié)構(gòu)化高級程序設(shè)計語言，它具有強大的數(shù)據(jù)庫操作功能，提供了數(shù)據(jù)管理器（Data Manager）、數(shù)據(jù)控件（data Control）以及ADO(Activex數(shù)據(jù)對象)等工具，利用它能夠建立多種類型的數(shù)據(jù)庫并可以管理維護和使用這些數(shù)據(jù)。 5.2 系統(tǒng)界面的設(shè)計 圖5.1 系統(tǒng)界面 系統(tǒng)主界面主要有系統(tǒng)菜單和運行界面。給界面提供了系統(tǒng)設(shè)置，人事管理，工資管理和幫助等功能，下面又分多個子功能。 5.3 員工基本信息管理功能設(shè)計（代碼） 添加操作： Dim EmployeeID, Employeename, Sex, birthday, Education, Duty, DepartmentName, IdentityID, Telephone, Address As String EmployeeID = Text1.Text Employeename = Text2.Text Education = Text3.Text Duty = Text8.Text DepartmentName = Text4.Text Sex = Combo1.Text IdentityID = Text5.Text Telephone = Text6.Text Address = Text7.Text If Trim(EmployeeID) = "" Or Trim(Employeename) = "" Or Trim(DepartmentName) = "" Then MsgBox "員工基本信息不能為空,請?zhí)顚懀? Exit Sub End If myCon.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;" myRs.Open "select * from Employee where EmployeeID=" & Trim(Text1.Text) & " and Employeename=" & Trim(Text2.Text) & "", myCon If myRs.EOF = False Then MsgBox "該員工已經(jīng)存在，請重新輸入！" myRs.Close myCon.Close Text1.SetFocus Exit Sub End If myRs.Close myRs.Open "employee", myCon, 3, 2 myRs.AddNew myRs.Fields("EmployeeID") = Text1.Text myRs.Fields("Employeename") = Text2.Text myRs.Fields("Education") = Text3.Text myRs.Fields("Duty") = Text8.Text myRs.Fields("DepartmentName") = Text4.Text myRs.Fields("Sex") = Combo1.Text myRs.Fields("IdentityID") = Text5.Text myRs.Fields("birthday") = DTPicker1.Value myRs.Fields("Telephone") = Text6.Text myRs.Fields("Address") = Text7.Text myRs.Update myRs.Close myCon.Close MsgBox "添加成功!" Adodc1.RecordSource = "select * from employee " jbxx.Adodc1.Refresh jbxx.DataGrid1.Refresh Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Combo1.Text = "" Text5.Text = "" Text6.Text = "" Text7.Text = "" Text8.Text = "" 修改操作： Dim EmployeeID, Employeename, Sex, birthday, Education, Duty, Department, IdentityID, Telephone, Address As String Dim n As Integer EmployeeID = Text1.Text Employeename = Text2.Text Education = Text3.Text Duty = Text8.Text DepartmentName = Text4.Text Sex = Combo1.Text IdentityID = Text5.Text Telephone = Text6.Text Address = Text7.Text If Trim(EmployeeID) = "" Or Trim(Employeename) = "" Then MsgBox "請?zhí)顚懸獎h除員工的基本信息！" Exit Sub End If If myCon.State = 1 Then myCon.Close End If myCon.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;" myRs.Open "select * from employee where EmployeeID=" & Text1.Text & "", myCon, 3, 2 n = MsgBox("您確定要刪除嗎？", vbYesNo, "提示") If n = 6 Then myRs.Delete myRs.Close myCon.Close End If Adodc1.RecordSource = "select * from employee " jbxx.Adodc1.Refresh jbxx.DataGrid1.Refresh Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Combo1.Text = "" Text5.Text = "" Text6.Text = "" Text7.Text = "" Text8.Text = "" 刪除操作： Dim EmployeeID, Employeename, Sex, birthday, Education, DepartmentName, IdentityID, Telephone, Address As String EmployeeID = Text1.Text Employeename = Text2.Text Education = Text3.Text Duty = Text8.Text DepartmentName = Text4.Text Sex = Combo1.Text IdentityID = Text5.Text Telephone = Text6.Text Address = Text7.Text If Trim(EmployeeID) = "" Or Trim(Employeename) = "" Then MsgBox "請?zhí)顚懸薷牡膬?nèi)容！", vbYesNo, "提示" Text2.Text = "" Exit Sub End If myCon.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=工資管理;Data Source=HP-PC;" myRs.Open "select * from employee where EmployeeID=" & Text1.Text & "", myCon, 3, 2 myRs!Employeename = Text2.Text myRs.Update myRs.Close myCon.Close MsgBox "您確定要修改嗎？", vbYesNo, "提示" jbxx.Adodc1.Refresh jbxx.DataGrid1.Refresh Text1.Text = "" Text2.Text = "" Text3.Text = "" Text4.Text = "" Combo1.Text = "" Text5.Text = "" Text6.Text = "" Text7.Text = "" Text8.Text = "" 5.4 工資管理功能設(shè)計 員工信息查詢： Option Explicit Private Sub cmdExit_Click() Unload Me End Sub Private Sub cmdQuery_Click() Dim sql As String 按編號查詢 If chkNumber.Value = True Then If cboNumber.Text = "" Then MsgBox "請選擇員工編號！", vbExclamation cboNumber.SetFocus Exit Sub ElseIf IsNumeric(cboNumber.Text) = False Then MsgBox "員工編號是數(shù)字量！", vbExclamation cboNumber.SetFocus Exit Sub Else sql = "select * from Wage where EmployeeID=" & _ cboNumber.Text & "" Adodc1.RecordSource = sql Adodc1.Refresh End If End If 按姓名查詢 If chkName.Value = True Then If cboName.Text = "" Then MsgBox "請選擇員工姓名！", vbExclamation cboName.SetFocus Exit Sub Else sql = "select * from Wage where EmployeeName=" & _ cboName.Text & "" Adodc1.RecordSource = sql Adodc1.Refresh End If End If 全部查詢 If chkAll.Value = True Then sql = "select * from Wage" Adodc1.RecordSource = sql Adodc1.Refresh End If End Sub Private Sub Form_Load() Dim sql As String Dim rs As New ADODB.Recordset ChangeFormPos MDIForm1, Me 填充員工編號下拉框 sql = "select EmployeeID from Wage" Set rs = ExeSQL(sql) If rs.EOF = False Then Do Until rs.EOF = True cboNumber.AddItem rs!EmployeeID rs.MoveNext Loop End If 填充員工姓名下拉框 sql = "select EmployeeName from Wage" Set rs = ExeSQL(sql) If rs.EOF = False Then Do Until rs.EOF = True cboName.AddItem rs!Employeename rs.MoveNext Loop End If End Sub 第六章 用戶操作手冊 此系統(tǒng)是企業(yè)和事業(yè)單位進行工資基本信息管理的軟件。 1. 系統(tǒng)登陸 用戶輸入用戶名和密碼后可以登錄。 圖6.1 登陸界面 2. 系統(tǒng)主界面 此處可以進行系統(tǒng)設(shè)置，人事管理和工資管理等功能。 圖6.2 系統(tǒng)主界面 3. 用戶管理 主要有查看用戶，修改密碼，增加和刪除用戶等操作。輸入提示的內(nèi)容，點擊確定則完成相應(yīng)的操作，下圖可實現(xiàn)添加用戶功能。 4. 人事信息管理 下圖實現(xiàn)人事管理功能，輸入信息或選定進行添加，修改和刪除操作。 圖6.3 人事信息管理 5. 工資管理 輸入基本的信息組成部分可進行工資計算，并實現(xiàn)工資查詢。 圖6.4 設(shè)置工資 第七章 軟件測試報告 登陸界面測試：輸入為空或密碼錯誤時有相應(yīng)的提示。（如圖7.1和7.2） 圖7.1 提示未輸入同戶名 圖7.2 提示密錯誤 用戶管理功能測試：用戶管理時修改添加等輸入不正確情況。（圖7.3和圖7.4） 圖7.3 密碼不輸入提示 圖7.4 資料填寫不完整提示 人事管理功能測試：對職工信息操作時的提示。（圖7.5到圖7.6） 圖7.5 添加用戶操作時空輸入 圖7.6 刪除操作時提示 工資管理功能測試：計算工資和查詢工資。（圖7.7到圖7.8） 圖7.7 計算工資 圖7.8 查詢工資 第八章 總結(jié) 8.1 參考文獻 戴志誠.SQL Server 2005數(shù)據(jù)庫系統(tǒng)開發(fā)與實例.北京：電子工業(yè)出版社，2007年3月 安劍 孫秀梅.Visual Basic數(shù)據(jù)庫系統(tǒng)開發(fā)自學(xué)手冊.北京：人民郵電出版社，2008年3月 8.2 設(shè)計體會與建議 通過本次軟件工程的課程設(shè)計，動手能力得到了提高，也對軟件工程導(dǎo)論的知識有了進一步的掌握。此次所完成的是一個小型系統(tǒng)，基本上完成了要求的功能，也設(shè)計了友好的人際交互界面。 除此之外，我們也深刻體會到團隊合作精神的可貴;更重要的是，我們鍛煉了我們自學(xué)能力和處理實際問題的能力，從而為后續(xù)課程的學(xué)習、畢業(yè)設(shè)計環(huán)節(jié)以及將來的實際工作打好堅實的基礎(chǔ)。 最后，感謝老師的指導(dǎo)與幫助！