管理信息系統(tǒng)課程設(shè)計(jì)-員工管理系統(tǒng)(共18頁(yè))

1、精選優(yōu)質(zhì)文檔-傾情為你奉上遼 寧 工 業(yè) 大 學(xué) 管理信息系統(tǒng)設(shè)計(jì)課程設(shè)計(jì)報(bào)告（論文）題目： 員工檔案系統(tǒng)的分析與設(shè)計(jì) 院（系）： 軟件學(xué)院 專業(yè)班級(jí)： 軟件工程113班 學(xué) 號(hào)： 學(xué)生姓名： 安凱辰 指導(dǎo)教師： 王彥華 教師職稱： 講 師 起止時(shí)間：2012.5.28-2012.6.8 課程設(shè)計(jì)（論文）任務(wù)及評(píng)語(yǔ)院（系）：軟件學(xué)院 教研室：軟件教研室學(xué) 號(hào)學(xué)生姓名安凱辰專業(yè)班級(jí)軟件113班課程設(shè)計(jì)（論文）題目員工檔案系統(tǒng)的分析與設(shè)計(jì)課程設(shè)計(jì)（論文）任務(wù)管理信息系統(tǒng)課程設(shè)計(jì)作為獨(dú)立的教學(xué)環(huán)節(jié)，是電子商務(wù)專業(yè)集中實(shí)踐性環(huán)節(jié)系列之一，是學(xué)習(xí)完管理信息系統(tǒng)課程并進(jìn)行完專業(yè)實(shí)習(xí)后進(jìn)行的一次全面的綜合練

2、習(xí)。任務(wù)：采用結(jié)構(gòu)化的系統(tǒng)開發(fā)方法，應(yīng)用具體的計(jì)算機(jī)語(yǔ)言（如PB、VB、Delphi）和數(shù)據(jù)庫(kù)（SQL、Oracle）等技術(shù)，按照軟件工程的思想，開發(fā)一個(gè)實(shí)用的中小型管理信息系統(tǒng)，完成員工檔案系統(tǒng)的分析設(shè)計(jì)實(shí)施工作，實(shí)現(xiàn)該系統(tǒng)設(shè)備管理等功能，并完成結(jié)合分析設(shè)計(jì)過(guò)程，撰寫系統(tǒng)設(shè)計(jì)說(shuō)明書（課設(shè)報(bào)告）。1根據(jù)課程設(shè)計(jì)時(shí)間選擇適當(dāng)規(guī)模大小的設(shè)計(jì)課題。采用專業(yè)實(shí)習(xí)的調(diào)研內(nèi)容作為課程設(shè)計(jì)選題。2根據(jù)合理的進(jìn)度安排，按照系統(tǒng)開發(fā)的流程及方法，踏實(shí)地開展課程設(shè)計(jì)活動(dòng)。3課程設(shè)計(jì)過(guò)程中，根據(jù)選題的具體需求，在開發(fā)各環(huán)節(jié)中撰寫相關(guān)的技術(shù)文檔，最后提交詳細(xì)的課程設(shè)計(jì)報(bào)告。4開發(fā)出可以運(yùn)行的管理信息系統(tǒng)，通過(guò)上機(jī)運(yùn)行

3、檢查。5設(shè)計(jì)說(shuō)明書要求文檔齊備，步驟全整，流程正確，說(shuō)明詳細(xì)，具有有可操作性。指導(dǎo)教師評(píng)語(yǔ)及成績(jī)成績(jī)：_ 指導(dǎo)教師簽字：_ 2012年6月12日專心-專注-專業(yè)目 錄第1章 系統(tǒng)分析1.1需求分析的任務(wù)檔案管理系統(tǒng)是現(xiàn)代企業(yè)員工資源管理中的重要內(nèi)容，也是人力資源開發(fā)利用的基礎(chǔ)性工作。檔案管理在信息化之前，在人員進(jìn)出、離退休、升遷、崗位變動(dòng)、職稱變動(dòng)、學(xué)位變動(dòng)，以及檔案管理人員的變動(dòng)等方面存在諸多不利于管理的地方，不適應(yīng)現(xiàn)代的企業(yè)管理形勢(shì)和人力資源開發(fā)利用的要求。開發(fā)檔案管理系統(tǒng)使企業(yè)的員工檔案管理工作實(shí)現(xiàn)了信息化、規(guī)范化，不僅使企業(yè)能夠高效率完成人事管理的日常工作，還使企業(yè)深入開發(fā)利用人力資源

4、成為可能。1.2數(shù)據(jù)流圖 數(shù)據(jù)流圖簡(jiǎn)稱DFD，是SA方法中用于表示系統(tǒng)邏輯模型的一種工具。它以圖形的方式描述數(shù)據(jù)在系統(tǒng)中流動(dòng)和處理的過(guò)程，由于它只反映系統(tǒng)必須完成的邏輯功能，所以它是一種功能模型。其工作流程為：因?yàn)楸締T工系統(tǒng)沒有設(shè)置賬戶，密碼，所以可以方便負(fù)責(zé)人員的進(jìn)行檔案的添加、修改和刪除的操作。使用本表單可以方便地修改員工的信息。數(shù)據(jù)維護(hù)：將計(jì)算機(jī)中保留的上一次操作后的結(jié)果清除。以備重新查詢、更新、統(tǒng)計(jì)、輸出等功能的執(zhí)行。員工 P 3撤銷處理 P 1員工統(tǒng)計(jì)企業(yè)2) 婚姻狀況信息：統(tǒng)計(jì)表 離職數(shù)據(jù) 基本 刪除 信息 數(shù)據(jù)人事部 P 4調(diào)動(dòng)處理員工P 2登記處理部門職務(wù)重新安排 登記添加數(shù)據(jù)

5、 修改調(diào)動(dòng)數(shù) 數(shù)據(jù) 數(shù)據(jù) P 5信息處理管理員員工工F1 員工基本信息查詢查詢圖1.1 數(shù)據(jù)流圖1.3 數(shù)據(jù)字典數(shù)據(jù)字典（Data dictionary）是一種用戶可以訪問(wèn)的記錄和應(yīng)用程序源數(shù)據(jù)的目錄。主動(dòng)數(shù)據(jù)字典是指在對(duì)數(shù)據(jù)庫(kù)或應(yīng)用程序結(jié)構(gòu)進(jìn)行修改時(shí)，其內(nèi)容可以由自動(dòng)更新的數(shù)據(jù)字典。被動(dòng)數(shù)據(jù)字典是指修改時(shí)必須手工更新其內(nèi)容的數(shù)據(jù)字典。員工檔案信息表=性別+出生日期 +身份證號(hào)+相片+籍貫+工齡+聘用日期+家庭住址+聯(lián)系部門信息表=部門編號(hào)+部門名稱+部門級(jí)別+部門主管+部門電話人事變動(dòng)信息表=變動(dòng)日期+工號(hào)+現(xiàn)部門名稱+現(xiàn)職務(wù)+變動(dòng)說(shuō)明+部門名稱+行政職務(wù)加班信息表=加班起始時(shí)間+加班結(jié)束時(shí)

6、間+工號(hào)+上報(bào)日期考勤信息表=月份+工號(hào)+姓名+部門名稱+年教育培訓(xùn)信息表=工號(hào)+培訓(xùn)時(shí)間+培訓(xùn)成績(jī)+培訓(xùn)費(fèi)用出差信息表=月份+工號(hào)+姓名+部門名稱第2章 系統(tǒng)設(shè)計(jì)21 結(jié)構(gòu)設(shè)計(jì)2.1.1概念設(shè)計(jì)概念設(shè)計(jì)階段主要是將需求分析階段得到的用戶需求抽象為信息結(jié)構(gòu)(概念模型)的過(guò)程,它是整個(gè)數(shù)據(jù)庫(kù)設(shè)計(jì)的關(guān)鍵。這一設(shè)計(jì)階段是在需求分析的基礎(chǔ)上，設(shè)計(jì)出能夠滿許用戶需求的各種實(shí)體，以及它們之間的關(guān)系，為后面的邏輯設(shè)計(jì)打基礎(chǔ)。員工號(hào)檔案號(hào)姓名員工電話性別工資部門部門編號(hào)部門名稱部門主管部門電話所屬姓名 n 1 1圖2.1 總體E-R圖 部門部門電話部門名稱部門編號(hào)圖2.2 部門管理E-R圖2.1.2邏輯設(shè)計(jì)需

7、要將上面的數(shù)據(jù)庫(kù)概念轉(zhuǎn)化為Visual Foxpro 數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。需要將上面的數(shù)據(jù)庫(kù)概念轉(zhuǎn)化為Visual Foxpro 數(shù)據(jù)庫(kù)系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型，也就是數(shù)據(jù)庫(kù)的邏輯結(jié)構(gòu)。員工檔案管理系統(tǒng)數(shù)據(jù)庫(kù)中各個(gè)表格的設(shè)計(jì)結(jié)果見如下表，每個(gè)表格在數(shù)據(jù)庫(kù)中是一個(gè)有關(guān)聯(lián)的表。下面列出幾個(gè)主要的數(shù)據(jù)庫(kù)表設(shè)計(jì)：（1）員工檔案信息數(shù)據(jù)表：字段字段名類型寬度小數(shù)位索引排序Nulls1檔案編號(hào)數(shù)值型11否2姓名字符型20否3身份證號(hào)字符型18否4民族字符型10否5性別字符型4否6出生日期字符型20否7畢業(yè)學(xué)校字符型20否8學(xué)歷字符型20否9部門名稱字符型20否10職稱字

8、符型20否11上司字符型20否12聯(lián)系電話字符型20否13技術(shù)職稱字符型20否14工資數(shù)值型50否15政治面貌字符型20否 表2.1 員工檔案信息表（2）部門信息數(shù)據(jù)表：字段字段名類型寬度小數(shù)位索引排序Nulls1部門編號(hào)字符型6否2部門名稱數(shù)值型11否3部門級(jí)別字符型20否4部門主管字符型20否5部門電話數(shù)值型6否表2.2 部門信息數(shù)據(jù)表（3）出差信息數(shù)據(jù)表：字段字段名類型寬度小數(shù)位索引排序Nulls1月份字符型6否2工號(hào)數(shù)值型11否3姓名字符型20否4部門名稱字符型20否5年數(shù)值型6否表2.3 出差信息表（4）人事變動(dòng)信息數(shù)據(jù)表：字段字段名類型寬度小數(shù)位索引排序Nulls1變東日期字符型6

9、否2工號(hào)數(shù)值型11否3現(xiàn)部門名稱字符型20否4現(xiàn)職務(wù)字符型20否5變動(dòng)說(shuō)明字符型100否6部門名稱字符型20否7行政職務(wù)字符型20否表2.4 人事變動(dòng)信息表2.1.3 物理設(shè)計(jì)物理設(shè)計(jì)是直屬局庫(kù)在存儲(chǔ)設(shè)備上的實(shí)現(xiàn)。在確定的SQL Server下，一切由系統(tǒng)去完成，此階段需要做的是確定文件記錄的組織方式，確定文件的類型及存放路徑以及確定文件的多半管理準(zhǔn)則。下面列出主要兩個(gè)表的索引和結(jié)構(gòu)：（1）部門信息表包括工號(hào)、部門、職位，設(shè)置管理員編號(hào)為主鍵。表2.5部門信息表（2）員工基本信息表記錄工號(hào)、員工姓名、出生年月、性別、職位、和聯(lián)系電話等，將工號(hào)設(shè)為主鍵。圖2.6 員工信息表2.2行為設(shè)計(jì)2.2.

10、1 總體設(shè)計(jì)管理信息系統(tǒng)設(shè)計(jì)階段的主要目的是將系統(tǒng)分析階段所提出的反映了用戶信息需求的系統(tǒng)邏輯方案轉(zhuǎn)換成可以實(shí)施的基于計(jì)算機(jī)與通信系統(tǒng)的物理技術(shù)方案。退出員工檔案管理系統(tǒng)員工檔案管理部門管理日常考核人事變動(dòng)教育培訓(xùn)決策查詢統(tǒng)計(jì)系統(tǒng)管理增加修改刪除圖2.7 功能模塊圖2.2.2模塊設(shè)計(jì)1.檔案信息管理界面設(shè)計(jì) 圖3.2 檔案管理界面主要代碼如下所示：Private Sub Adodc4_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As A

11、DODB.Recordset)End SubPrivate Sub cmdModity_Click() Select Case SSTab1.Tab Case 0 blnAdd0 = False If Adodc1.Recordset.RecordCount > 0 Then If DataCombo1.Text = "" Then MsgBox "請(qǐng)選擇工號(hào)！" Else Load main_rckh_kq main_rckh_kq.Show End If Else MsgBox "沒有您要修改的數(shù)據(jù)，請(qǐng)先添加數(shù)據(jù)！" End

12、 If Case 1 If Adodc2.Recordset.RecordCount > 0 Then Load main_rckh_jb main_rckh_jb.Show Else MsgBox "沒有您要修改的數(shù)據(jù)，請(qǐng)先添加數(shù)據(jù)！" End If Case 2 blnAdd2 = False If Adodc3.Recordset.RecordCount > 0 Then Load main_rckh_cc main_rckh_cc.Show End If End SelectEnd Sub2.部門信息管理界面設(shè)計(jì)圖3.3 部門管理界面主要代碼如下所示：P

13、rivate Sub Adodc1_WillMove(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)End SubPrivate Sub Form_Unload(Cancel As Integer)frm_main.Enabled = TrueEnd SubPrivate Sub CmdAdd_Click() Load main_bmgl_add main_bmgl_add.Show main_bmgl.Enabled

14、 = FalseEnd SubPrivate Sub CmdDelete_Click() If Adodc1.Recordset.RecordCount > 0 Then Adodc1.Recordset.Delete Adodc1.RecordSource = "select * from 部門信息表 order by 部門編號(hào)" Adodc1.Refresh Else MsgBox "沒有要?jiǎng)h除的數(shù)據(jù)！" End IfEnd SubPrivate Sub CmdExit_Click() Call CmdEnd(Me)End Sub3.日?？己私?/p>

15、面設(shè)計(jì) 圖3.4 日?？己私缑嬷饕a如下所示：Private Sub DataCombo1_Change() Adodc1.RecordSource = "select * from 考勤信息表 where 工號(hào) like +'" + DataCombo1.Text + "'+'%'" Adodc1.RefreshEnd SubPrivate Sub CmdAdd_Click() Select Case SSTab1.Tab Case 0 blnAdd0 = True If DataCombo1.Text = "

16、;" Then MsgBox "請(qǐng)選擇工號(hào)！" Else If Adodc1.Recordset.RecordCount = 0 Then Load main_rckh_kq main_rckh_kq.Show Else MsgBox "此員工考勤記錄已存在，只能進(jìn)行修改！" End If End If Case 1 blnAdd1 = True Load main_rckh_jb main_rckh_jb.Show Case 2 blnAdd2 = True Load main_rckh_cc main_rckh_cc.Show End Se

17、lectEnd Sub4.人事變動(dòng)管理界面設(shè)計(jì)對(duì)新增員工進(jìn)行登錄，對(duì)員工離職和出差進(jìn)行記錄圖3.5 人事變動(dòng)界面主要代碼如下所示：Private Sub CmdAdd_Click() Select Case SSTab1.Tab Case 0 Dim dabh As Long Dim gh As Long Dim rs1 As New ADODB.Recordset rs1.Open "select * from 人事檔案信息表 order by 檔案編號(hào)", Cnn, adOpenKeyset, adLockOptimistic If rs1.RecordCount &g

18、t; 0 Then If rs1.EOF = False Then rs1.MoveLast dabh = Val(Right(rs1.Fields("檔案編號(hào)"), 5) + 1 main_rsxx_lr.Txt1(0).Text = "C-" & Format(dabh, "00000") Else main_rsxx_lr.Txt1(0).Text = "C-00001" End If main_rsxx_lr.Txt1(1).Text = Right(main_rsxx_lr.Txt1(0).Tex

19、t, 5) rs1.Close Load main_rsxx_lr main_rsxx_lr.Show main_rsxx_lr.Caption = "人事檔案信息錄入窗口" main_rsxx_lr.Label10.Caption = "人事檔案信息錄入" Case 1 Load main_rsbd_yglz main_rsbd_yglz.Show Case 2 Load main_rsbd_rsbd main_rsbd_rsbd.Show End SelectEnd SubPrivate Sub CmdDelete_Click() Select Ca

20、se SSTab1.Tab Case 0 If Adodc1.Recordset.RecordCount > 0 Then Adodc1.Recordset.Delete Adodc1.Refresh End If Case 1 If Adodc2.Recordset.RecordCount > 0 Then Adodc2.Recordset.Delete Adodc2.Refresh End If Case 2 If Adodc3.Recordset.RecordCount > 0 Then Adodc3.Recordset.Delete Adodc3.Refresh En

21、d If End SelectEnd Sub第3章 系統(tǒng)實(shí)施3.1數(shù)據(jù)庫(kù)的實(shí)現(xiàn)本設(shè)計(jì)我將采用面向?qū)ο蟮姆椒?，綜合運(yùn)用數(shù)據(jù)庫(kù)技術(shù)、程序設(shè)計(jì)技術(shù)，結(jié)合企業(yè)人事管理知識(shí)，以Visual Basic 6.0作為系統(tǒng)前臺(tái)應(yīng)用程序開發(fā)工具，SQL SERVER作為后臺(tái)數(shù)據(jù)庫(kù)，通過(guò)Visual Basic 6.0中的Data控件使兩者進(jìn)行連接從而進(jìn)行系統(tǒng)軟件開發(fā)。在Visual Basic6.0中，數(shù)據(jù)訪問(wèn)接口有三種：ActiveX數(shù)據(jù)對(duì)象（ADO）、遠(yuǎn)程數(shù)據(jù)對(duì)象（RDO）和數(shù)據(jù)訪問(wèn)對(duì)象（DAO）。這三種接口的每一種都分別代表該技術(shù)的不同發(fā)展階段，最新的是ADO，它比RDO和DAO更加簡(jiǎn)單，更加靈活。對(duì)于新

22、工程，應(yīng)使用ADO作為數(shù)據(jù)訪問(wèn)接口。ADO 是Microsoft 數(shù)據(jù)庫(kù)應(yīng)用程序開發(fā)的接口，是建立在OLE DB之上的高層數(shù)據(jù)庫(kù)訪問(wèn)技術(shù)。它封裝了OLE DB所提供的接口，比起OLE DB提供者，ADO的接口可以使程序員在更高級(jí)別上進(jìn)行數(shù)據(jù)交互。ADO技術(shù)不僅可以應(yīng)用于關(guān)系數(shù)據(jù)庫(kù)，也可以應(yīng)用于非關(guān)系數(shù)據(jù)庫(kù)?？梢杂媒y(tǒng)一的方法對(duì)不同的文件系統(tǒng)進(jìn)行訪問(wèn)，大大簡(jiǎn)化了程序編制，增加了程序的可移植性。3.2程序?qū)崿F(xiàn)圖3.1 運(yùn)行界面主窗體的核心代碼如下：Private Sub Form_Load() Set DataGrid1.DataSource = Adodc1 Dim i As Integer Fo

23、r i = 0 To DataGrid1.Columns.Count - 1 DataGrid1.Columns(i).Width = 840 Next iEnd SubPrivate Sub CmdDelete_Click() Select Case SSTab1.Tab Case 0 If Adodc1.Recordset.RecordCount > 0 Then Adodc1.Recordset.Delete Adodc1.Refresh End If Case 1 If Adodc2.Recordset.RecordCount > 0 Then Adodc2.Records

24、et.Delete Adodc2.Refresh End If Case 2 If Adodc3.Recordset.RecordCount > 0 Then Adodc3.Recordset.Delete Adodc3.Refresh End If End SelectEnd SubPrivate Sub CmdEnd_Click() Unload MeEnd Sub 第4章 設(shè)計(jì)總結(jié)這次課設(shè)，給我?guī)?lái)的收獲卻遠(yuǎn)遠(yuǎn)超出了我們的預(yù)想。本次員工檔案管理的課程設(shè)計(jì)，提高了我各方面的能力操作實(shí)踐能力。通過(guò)學(xué)習(xí)和能力的培養(yǎng)，以加強(qiáng)自我發(fā)現(xiàn)問(wèn)題分析問(wèn)題解決問(wèn)題的能力，認(rèn)真主動(dòng)完成課設(shè)的要求。我們學(xué)生主要發(fā)揮自主學(xué)習(xí)的能力，充分利用時(shí)間，安排好課設(shè)的時(shí)間計(jì)劃，并在課設(shè)過(guò)程中不斷檢測(cè)自己的計(jì)劃完成情況。隨著當(dāng)今社會(huì)向信息化的發(fā)展，員工檔案管理信息化管理來(lái)越為各企事業(yè)單位所重視，它能有效地收集、執(zhí)行各種辦公信息，極大地提高了辦公效率，及時(shí)準(zhǔn)確地實(shí)現(xiàn)信息的上傳下達(dá)，而計(jì)算機(jī)技術(shù)、網(wǎng)絡(luò)技術(shù)、各種軟件工作平臺(tái)不斷的發(fā)展，又能夠促進(jìn)人事管理信息化管