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

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

數據庫 課程設計報告 題目：工資管理系統(tǒng)設計與實現 班級： 教師： 學號： 姓名： 安徽新華學院 年 月 課程設計任務書 姓 名 學 號 班 級 課程名稱 軟件工程導論 課程性質 專業(yè)基礎課 設計時間 2017年 5月 20 日—— 2017年 06 月 12 日 設計名稱 工資管理系統(tǒng)設計與實現 項 目 組 成 員 姓名 學號 在本項目中的分工 代碼實現 文檔編寫 設計要求 使用傳統(tǒng)軟件工程方法對工資管理系統(tǒng)進行分析和設計，本程序是建立在Windows操作系統(tǒng)上，以VB為開發(fā)軟件的應用程序，主要功能包括：人事信息的錄入，修改，刪除和查詢操作：工資的核算查詢；用戶信息的管理等。 計劃與進度 9日20日至9月30日——學習項目開發(fā)的背景目標 10日1日至10月7日——可行性研究 10日8日至10月13日——系統(tǒng)分析（包括需求分析，數 據流圖，數據字典等） 10日14日至10月24日——系統(tǒng)設計（包括功能設計， 數據庫設計及數據庫的實現） 10月25日至11月2日——系統(tǒng)實現 11月3日至11月12日——軟件測試及資料整理 指導教師意見 目錄 內容概要 第一章 引 言 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)的設計思想 3.2 需求分析 3.3 系統(tǒng)的運行環(huán)境和開發(fā)平臺 3.4 數據流圖 3.5 數據字典 第四章 系統(tǒng)設計 4.1 功能模塊設計 4.2 系統(tǒng)總體功能模塊 4.3 數據庫設計 4.4 數據庫結構的實現 第五章 工資管理系統(tǒng)功能實現 5.1 開發(fā)環(huán)境簡介 5.2 系統(tǒng)界面的設計 5.3 員工基本信息管理功能設計 5.4 工資管理功能設計 第六章 軟件測試 第七章 用戶操作手冊 第八章 總結 8.1 參考文獻 8.2 設計體會與建議 內容摘要 工資管理系統(tǒng)是使用Visual Basic 6.0開發(fā)的一個數據庫管理系統(tǒng)。在此主要講述了使用SQL Server 2000和Visual Basic 6.0完成工資管理系統(tǒng)基本功能的過程。開發(fā)這個系統(tǒng)的步驟主要有系統(tǒng)分析、系統(tǒng)設計、系統(tǒng)實現和系統(tǒng)維護。在系統(tǒng)的設計中，詳細的展現了系統(tǒng)的各個模塊、所需的數據庫表及表字段菜單的設計等。在系統(tǒng)的實現中，給出了實現表單中相應的功能控件的事件、代碼及菜單實現的方法。本系統(tǒng)具有數據輸入，數據存儲，信息計算修改刪除等功能，本系統(tǒng)也提供了友好的人際對話界面。 第一章 引 言 1.1 項目開發(fā)背景 眾所周知當今時代的世界經濟正從工業(yè)經濟向知識經濟轉變，而知識經濟的兩個重要特征就是信息化合全球化。要實現信息化和全球化就必須依靠完善的網絡和數據庫機制。處于現在這樣一個飛速發(fā)展的信息時代，在各行各業(yè)中都離不開信息處理，這正是計算機被廣泛應用于管理信息系統(tǒng)的環(huán)境，使用計算機進行信息控制不僅提高了工作效率，而且大大的提高了其安全性。尤其是對于復雜的信息管理，計算機能夠充分發(fā)揮其優(yōu)越性。計算機進行信息管理與信息管理系統(tǒng)的開發(fā)密切相關，系統(tǒng)的開發(fā)時系統(tǒng)管理的前提。 因此，對于企業(yè)或是事業(yè)單位來說開發(fā)一套工資管理系統(tǒng)是很必要的。雖然企業(yè)事業(yè)單位的管理已經進入信息化管理，但對于不同的單位所需要的功能是不一樣的，這樣通用的軟件使用效率不高，還會造成人力，財力的浪費，這樣就不能滿足所有單位和部門的需求。所以必須做好客戶的需求分析工作，設計符合用戶要求的系統(tǒng)。 1.2 系統(tǒng)開發(fā)的目標及意義 企業(yè)和事業(yè)單位工資管理系統(tǒng)唯有采用自動化，高效率，人性化的管理，才能滿足服務員工的需求。工資管理系統(tǒng)的主要目標在于加強服務而不在于精簡人力。所以系統(tǒng)要能提供更自動化的服務，期望以最快的速度將人事工資信息做最適當的運用。主要目標有：以自動化、系統(tǒng)化、高效管理代替分散重復操作；提高單位效益和現代化信息管理水平；提高員工的自律性，促進員工人才的成長和流動；減輕人事工資管理員的負擔，節(jié)省人力物力的開支等。 引進以計算機信息管理技術和網絡通訊技術，是加快人事工資管理信息服務進程的重要手段。新的管理系統(tǒng)的使用會給人事管理體系發(fā)生變化。這促進了工資數據管理方式和理念的轉變，提高了企業(yè)單位的現代化和信息化水平，為企業(yè)帶來更多的效益。 1.3 系統(tǒng)的開發(fā)方法 本系統(tǒng)采用Visual Basic 6.0可視化開發(fā)工具開發(fā)，采用ADO對象數據技術來提高系統(tǒng)的安全性和穩(wěn)定性。工資管理系統(tǒng)可為企業(yè)和事業(yè)單位使用，屬于C/S結構的數據庫系統(tǒng)，固定后臺數據庫采用SQL Server 2000。 第二章 可行性研究 2.1 系統(tǒng)流程圖 員工錄入 人事信息管理 部門錄入 員工出勤 工資核算 工資管理 基本工資 出勤 信息 基本 信息 工資報表 圖2.1 系統(tǒng)流程圖 2.2 完成新系統(tǒng)的可行性 工資管理系統(tǒng)吸取通用系統(tǒng)的優(yōu)點的基礎上，根據具體企業(yè)單位所要求的功能進行設計。添加業(yè)務管理模塊，在業(yè)務管理模塊中添加管理員工的業(yè)務檔案，當用戶的業(yè)務工種等發(fā)生變化時只需修改業(yè)務檔案表記錄即可。通用型工資管理的技術比較成熟，所以可以學習技術并添加一些企業(yè)需要的功能，這樣就能完成此系統(tǒng)以滿足客戶的需求。 第三章 系統(tǒng)分析 3.1 系統(tǒng)的設計思想 工資管理系統(tǒng)是企業(yè)和事業(yè)單位常見的計算機信息管理系統(tǒng)。它的主要任務是對各種工資信息進行日常的管理，如工資信息的輸入、查詢、修改、增加、刪除，迅速準確地完成各種工資信息的統(tǒng)計計算和匯總，快速打印出報表。在建立與實現工資管理系統(tǒng)時，應進行功能劃分，能夠由數據庫管理系統(tǒng)完成的功能應盡可能由數據庫管理系統(tǒng)完成，這樣才能夠充分發(fā)揮數據庫管理系統(tǒng)高效、完全、可靠、便捷的性能，減少編程人員的工作量。 3.2 需求分析 工資管理系統(tǒng)是針對企事業(yè)單位的大量業(yè)務處理工作用計算機進行全面現代化管理主要包括信息輸入功能，信息修改刪除功能，信息的查詢以及工資的計算管理等。 1.信息輸入功能 1）輸入職工的基本信息。包括：Eno(員工編號)、Ename（員工姓名）、Epart(所屬部門)、Eduty(職務)、Esex（性別）、Eedu(學歷)、Eaddr(住址)、Ebir(出生年月)、Etel(電話號碼)等。 2）輸入工資的信息。包括：（基本工資）、（崗位工資）、（住房補貼）、（津貼）、(工會會費)、(水電費)、（住房公積金）、（養(yǎng)老保險）、（獎懲）。 3）輸入員工的部門信息。包括：Bno（部門編號）、Bname（部門名稱）、Bzg（部門總管）、Bmount(部門人數)等。 2.數據修改和刪除功能 1）修改和刪除員工的基本信息。當單位人員的信息發(fā)生變化，如職稱的改變，工作部門變動，或調離本單位等，系統(tǒng)應能修改員工的信息或將其從員工信息表中刪除。 2）修改和刪除員工的工資信息。員工升職加薪、工資普調是企業(yè)中常見的事情，這就需要系統(tǒng)能方便對員工工資進行個別及批量的修改；如員工調離本單位，就應當從員工信息表中刪除這個員工信息，將其工資信息表中相應的數據刪除。 3）修改和刪除部門信息。當撤消一個部門時，文學藝術在能從部門信息表中將其刪除。而當一個部門的名稱發(fā)生改變時，系統(tǒng)中所有該項部門的名稱應一致的改變。 3.查詢和統(tǒng)計功能 1）能夠查詢指定員工的基本信息。 2）能夠查詢指定某個部門或全部部門的基本信息。 3）查詢某個員工的工資信息。 4）統(tǒng)計、匯總指定年份企業(yè)各部門或某個部門每個月或全年工資總額，匯總各部門的人數或本單位的總人數。 5）工資表月工資記錄的生成功能。生成當月所有員工或某個部門的工資記錄，同時能進行員工工資的計算，即計算應發(fā)金額、應扣金額及實發(fā)金額。 3.3 系統(tǒng)的運行環(huán)境和開發(fā)平臺 本系統(tǒng)使用Visual Basic進行軟件開發(fā)，SQL Server 2000進行數據庫開發(fā)。VB是微軟公司開發(fā)的最為流行的軟件之一，也是社會上使用較多的開發(fā)工具之一。VB是一個完全可視化，面向對象的開發(fā)工具，因此此系統(tǒng)具有兼容性較好，安全性強，通用性好等優(yōu)點。 3.4 數據流圖 在對企業(yè)和事業(yè)單位工資管理過程進行分析后，根據系統(tǒng)功能的描述，得到工資管理系統(tǒng)的數據流圖如下： 1. 頂層數據流圖與0層數據流圖 圖3.1 頂層數據流圖 圖3.2 0層數據流圖 2.人事管理模塊、工資管理模塊查詢模塊分層數據流圖 部門表 1.1查詢部門及員工信息 1.2工資錄入 員工編號 員工與考勤數據 工資數據 考勤表 工資表 圖3.3 員工信息查詢與錄入 考勤表 2.2計算工資 2.1查詢考勤內容 員工名稱 考勤數據 工資信息 工資表 圖3.4 工資核算 備份員工名 3.2數 據備份 3.1查詢工資數據 備份工資表 備份數據 工資表 工資備份表 圖3.5 工資備份 工資表 考勤表 4.2查 詢處理 4.1要求加工 員工信息查詢要求 查詢規(guī)則 查詢結果 員工表 圖3.6 員工信息查詢 3．5 數據字典 數據字典是系統(tǒng)中各類數據描述的集合 簡要說明工資管理系統(tǒng)的數據字典。 1).名字：職工編號，部門編號 別名：職工號，部門號 描述：職工號唯一地標識數據庫中職工信息相關表中的一個特定員工的關鍵域；部門號唯一地標識部門信息表中的一個特定部門的關鍵域 位置：員工信息表 考勤表 工資表 2).名字：職工信息報表 別名：職工信息 描述：用戶指定條件下的員工基本信息情況查詢結果的信息表 定義：職工信息表=職工號+職工姓名+性別+出生年月+職務+學歷+電話號碼+住址+所屬部門+身份證號 位置：輸出到打印機 3).名字：考勤信息報表 別名：考勤信息 描述：用戶指定條件下的員工考勤信息查詢結果的信息表 定義：員工考勤信息查詢報表=考勤編號+員工號+員工姓名+加班天數+出差天數+曠工天數+遲到次數+考勤日期 位置：輸出到打印機 4).名字：工資報表 別名：工資信息 描述：記錄工資的組成部分以及員工的工資情況的信息 定義：工資信息報表=職務+基本工資+每日工資+加班系數+出差天數+曠工標準+遲到標準+獎金 位置：輸出到打印機 第四章 系統(tǒng)設計 4.1 系統(tǒng)功能設計 軟件所實現的功能強弱是衡量一個軟件最根本的標準。經過系統(tǒng)的可行性研究，需求分析后，得出中小型企業(yè)的工資信息管理系統(tǒng)的功能分層圖如下： 工資管理系統(tǒng) 2.1添加人事信息 2.2修改人事信息 2.4查詢人事信息 3.1設置工資 3.3查詢職務基本工資 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 數據庫設計 4.3.1概念結構設計 1. 根據如上的信息可得到實體之間的關系E-R圖如下： 圖4.2 E-R圖 2.概念結構模型 圖4.3 概念模型CDM 4.3.2 邏輯結構設計 將E-R圖轉換成如下關系模式： 員工表（員工號，員工名，職務，部門號，性別，出生年月，學歷，電話，住址，身份證號） 部門表（部門號，部門名，部門總管，部門人數，） 考勤表（考勤編號，員工號，遲到次數，曠工次數，出差天數，加班次數，考勤日期） 工資表（職務，員工號，基本工資，獎金，出差標準，加班標準，遲到系數，曠工次數） 依據上面的關系模式，設計數據表如下： 1. 用戶表 ：用于進入系統(tǒng)的權限設置等。 表1 用戶信息表Users 列名 數據類型 長度 屬性 描述 userID char 5 主鍵 用戶編號 username varchar 10 不允許空 用戶名 password varchar 15 不允許空 密碼 mark varchar 20 備注 2.職工表：職工的基本信息。 表2 職工信息表Employee 列名 數據類型 長度 屬性 描述 Eno char 6 主鍵 職工編號 Ename varchar 15 不允許為空 職工姓名 Esex varchar 10 性別 Ebirth Datetime 出生年月 Eduty varchar 20 外鍵 職務 Eedu varchar 20 學歷 Etel varchar 15 電話號碼 Eaddr varchar 20 住址 Bno varchar 20 外鍵 部門編號 IDidentify varchar 20 身份證號 3.部門表：部門基本信息。 表3 部門信息表Department 列名 數據類型 長度 屬性 描述 Bno char 5 主鍵 部門號 Bname varchar 10 不允許空 部門名 Bzg varchar 10 部門總管 Bmount int 4 部門人數 4.工資表：工資的基本組成信息。 表4 工資設置表WageConfig 列名 數據類型 長度 屬性 描述 Duty Varchar 20 主鍵 職務 BaseWage Money 8 基本工資 DayWage Money 8 每日工資 QvertinmeJob Float 8 加班系數 EvectionStandard Money 出差標準 AbsenStandard Money 8 曠工標準 LateStandard Money 8 遲到標準 Bonus money 8 獎金 5.考勤表：記錄員工的到職情況。 表5 考勤統(tǒng)計表CheckStat 列名 數據類型 長度 屬性 描述 CheckID Int 主鍵 考勤編號 Eno Char 6 外鍵 員工號 Ename char 15 不允許空 員工姓名 OvertimeDay Varchar 加班天數 EvectionDay Smallint 出差天數 AbsentDay Smallint 曠工天數 LateDay Smallint 遲到次數 CheckDate smalldatetime 考勤日期 6.工資表：記錄保存計算出來的工資。 表6 工資表Wage 列名 數據類型 長度 屬性 描述 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 物理結構模型 圖4.4 物理結構模型PDM 4.4 數據庫結構的實現 1、數據庫的創(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、數據表的創(chuàng)建（可同時在創(chuàng)建時定義相關的約束） 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,,總管,財務部,,15862110353,淮安, union select 0301,潘娟,女,1988-01-25,,工人,生產部,,15862110371,徐州, union select 0402,許潔,女,1990-01-27,,工人,財務部,,15862110365,河南, union select 0501,王濤,,1987-10-13,,工人,銷售部,,15862110001,福建, union select 0201,徐杰,,1984-07-09,研究生,技術人員,研發(fā)部,,15862110002,無錫, union select 0701,張凱,,1985-04-12,,總管,后勤部,,15862110003,浙江, union select 0601,李璐,女,1986-05-16,大專,總管,宣傳部,,15862110004,蘇州, union select 0302,石磊,,1985-02-07,,工人,生產部,,15862110005,揚州, union select 0303,吳華,,1986-06-24,,工人,生產部,,15862110006,山東, union select 0304,唐建青,,1989-11-10,,總管,生產部,,15862110007,揚州, union select 0502,李云,女,1988-03-17,,工人,銷售部,,158621100008,鎮(zhèn)江, union select 0202,王兆坤,,1986-04-30,,總管,研發(fā)部,,15862110009,無錫, union select 0305,梁玉沖,,1990-09-04,,工人,生產部,,15862110010,無錫, union select 0503,金壇,,1989-12-15,,總管,銷售部,,15862110011,上海, union select 0403,夏平,,1986-01-13,大專,工人,財務部,,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,研究生,技術人員,研發(fā)部,,15862110017,浙江, union select 0703,李曉梅,女,1982-04-03,,工人,后勤部,,15862110018,宿遷, 第五章 工資管理系統(tǒng)功能實現 5.1 開發(fā)環(huán)境簡介 Visual Basic是一個可視化、面向對象的、采用事件驅動的結構化高級程序設計語言，它具有強大的數據庫操作功能，提供了數據管理器（Data Manager）、數據控件（data Control）以及ADO(Activex數據對象)等工具，利用它能夠建立多種類型的數據庫并可以管理維護和使用這些數據。 5.2 系統(tǒng)界面的設計 圖5.1 系統(tǒng)界面 系統(tǒng)主界面主要有系統(tǒng)菜單和運行界面。給界面提供了系統(tǒng)設置，人事管理，工資管理和幫助等功能，下面又分多個子功能。 5.3 員工基本信息管理功能設計（代碼） 添加操作： 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 "該員工已經存在，請重新輸入！" 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í)顚懸薷牡膬热荩?, 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 工資管理功能設計 員工信息查詢： 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 "員工編號是數字量！", 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)設置，人事管理和工資管理等功能。 圖6.2 系統(tǒng)主界面 3. 用戶管理 主要有查看用戶，修改密碼，增加和刪除用戶等操作。輸入提示的內容，點擊確定則完成相應的操作，下圖可實現添加用戶功能。 4. 人事信息管理 下圖實現人事管理功能，輸入信息或選定進行添加，修改和刪除操作。 圖6.3 人事信息管理 5. 工資管理 輸入基本的信息組成部分可進行工資計算，并實現工資查詢。 圖6.4 設置工資 第七章 軟件測試報告 登陸界面測試：輸入為空或密碼錯誤時有相應的提示。（如圖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 查詢工資 第八章 總結 8.1 參考文獻 戴志誠.SQL Server 2005數據庫系統(tǒng)開發(fā)與實例.北京：電子工業(yè)出版社，2007年3月 安劍 孫秀梅.Visual Basic數據庫系統(tǒng)開發(fā)自學手冊.北京：人民郵電出版社，2008年3月 8.2 設計體會與建議 通過本次軟件工程的課程設計，動手能力得到了提高，也對軟件工程導論的知識有了進一步的掌握。此次所完成的是一個小型系統(tǒng)，基本上完成了要求的功能，也設計了友好的人際交互界面。 除此之外，我們也深刻體會到團隊合作精神的可貴;更重要的是，我們鍛煉了我們自學能力和處理實際問題的能力，從而為后續(xù)課程的學習、畢業(yè)設計環(huán)節(jié)以及將來的實際工作打好堅實的基礎。 最后，感謝老師的指導與幫助！