基于VFP的高職學校人事管理系統的設計及實現

余翠蘭

摘 要： 人事管理是一個復雜的系統工程，手工管理方式不利于查找、更新和維護等，開發一套對人事信息進行管理的軟件是必須的。在此使用數據庫管理系統Visual Foxpro 9.0作為開發工具，采用面向對象的設計方法、簡單易讀的算法，構建一款適合高職學校的人事管理系統。該系統主要包括檔案查詢、檔案瀏覽與編輯、檔案統計、檔案輸出等功能，使信息管理工作更加系統化、信息化、科學化。實驗結果表明，該系統運行穩定、正確、界面操作方便、成本低、具有較強的實用價值。

關鍵詞： 人事管理系統； VFP； 查詢； 統計

中圖分類號： TN964?34； TP315 文獻標識碼： A 文章編號： 1004?373X（2014）04?0072?04

Design and realization of VFP?based personnel management system suitable for higher vocational schools

YU Cui?lan

（Department of computer science， Dehong Teacher's College， Luxi 678400， China）

Abstract： Personnel management is a complex engineering， which the manual management is not easy to inquire， update and maintain. Therefore， it is extremely necessary to develop a personnel management software. With the Object?oriented design method， comprehensible algorithm and database management system Visual Foxpro 9.0， a VFP?based personnel management system suitable for higher vocational schools was built. It has the functions of information search， archival statistics， information output， archival browse and archival edition. With the above functions， it makes the information management more systematization， informationization and scientization. The experimental results demonstrate that the system running is stable and accurate， and the interface operation is convenient. Its cost is low. The system has a strong practical value.

Keywords： personnel management system； VFP； search； statistics

人事管理信息化是計算機技術的必然趨勢。使用計算機對高職學校人事信息進行管理，具有傳統管理無法比擬的優點。例如，檢索迅速、管理靈活、存儲量大等。Visual FoxPro 9.0 是一個關系型數據庫管理系統[1]，它提供的數據庫表、表單、菜單、報表等功能使得數據存儲、查詢、界面設計、報表生成等變得非常簡單，也具有存儲方式單一、面向對象、支持ODBC、數據處理速度快、開發成本低等特點。因此本文采用Visual FoxPro 9.0作為高職學校人事管理系統的開發工具和數據庫系統。

1 系統設計

1.1 系統功能設計

系統的設計開發[2?3]需要針對不同院校的實際情況采取定制化的開發模式，既滿足復雜多樣的人事管理[4?6]工作需求，又要滿足用戶界面的簡單易用。結合我校人事信息管理日常工作的實際需要，通過需求分析和可行性分析，高職學校人事管理系統主要包含以下幾個功能：檔案瀏覽及編輯、檔案查詢、檔案統計、檔案輸出。該人事管理系統的功能模塊如圖1所示。

1.2 數據庫結構設計

根據系統功能結構建立所需要的一系列數據表，并根據數據表間的相關性建立表間關聯，然后設置相關的數據參照完整性規則，使得相關聯的表能夠協同工作，數據庫結構設計直接關系到系統運行的效率和實現效果。本系統創建了一個名為“人事數據庫.DBC”的數據庫文件，該數據庫中共包含4個數據庫表。

（1） 員工表。含有字段：編號、部門編號、姓名、性別、出生年月、到崗日期、戶口所在地、婚姻狀況、籍貫、聯系電話、民族、身份證號、文化程度、員工狀態、政治面貌、職務，并按編號建立了主索引。

（2） 部門表。含有字段：部門編號、部門名稱、上級編號、部門描述，并按部門編號建立了主索引。

圖1 高職學校人事管理系統功能模塊圖

（3） 員工工資表。含有字段：編號、姓名、部門名稱、邊疆補貼、地區補貼、浮動工資、福利費、艱苦補貼、固定一級、津貼、獎金津貼、三項補貼、特種津貼、校內津貼、各種補貼、個人稅、公積金、應發數、房租、曠假、其他扣款、扣款合計、實發合計，并按編號建立了候選索引，部門名稱建立了普通索引。

（4） 用戶表。用來實現對用戶的管理，含有字段：用戶名、密碼、用戶類型。只有輸入了正確的用戶名和口令才能使用本系統。

該數據庫中表間關聯的數據參照完整性規則設置情況如下：更新規則設置為“級聯”，刪除和插入規則都設置為“限制”。

2 系統實現的關鍵技術

2.1 登錄密碼驗證

用戶使用系統前，必須在“登錄”表單中，輸入用戶名和密碼，系統用戶表存儲的記錄進行身份驗證。

“登錄”功能的實現代碼如下：

IF ALLTRIM（thisform.txtUserName.Value）==''

MessageBox（"請輸入用戶名"）

RETURN

ENDIF

IF ALLTRIM（thisform.txtUserPwd.Value）==''

MessageBox（"請輸入密碼"）

RETURN

ENDIF

use date＼用戶表

Locate For Allt（用戶名）=Allt（thisform.txtUserName.Value）

If Found（）==.T.

If Allt（密碼）==Allt（thisform.txtUserPwd.Value）

MessageBox（"歡迎使用本程序"，64，"身份驗證通過"）

UserName = 用戶名

UserYype = 用戶類型

release thisform

Else

MessageBox（"密碼不正確"，16，"錯誤提示"）

Endif

Else

MessageBox（"用戶名不存在"，16，"錯誤提示"）

Endif

2.2 檔案查詢

輸入查詢條件，系統可以顯示符合條件的記錄，該系統包括：員工基本信息查詢、員工工資查詢、部門查詢。其中，員工基本信息查詢可以根據姓名、身份證號、或籍貫查詢。

例如，員工工資查詢界面如圖2所示，單擊“查詢”，得到查詢結果如圖3所示。

圖2 員工工資查詢界面

“查詢”功能的實現代碼如下：

select * from 員工工資表 where alltrim（姓名）=alltrim（thisform.combo1.displayvalue） into cursor temp

go top

if eof（）

go bottom

=messagebox（"對不起，沒有此人，請確認"，0+32+1024，"人事管理系統"）

else

do form 查詢結果

endif

圖3 員工工資查詢結果

2.3 檔案瀏覽及編輯

該模塊對信息進行瀏覽、添加、刪除、修改。包括員工基本信息瀏覽及編輯、部門信息瀏覽及編輯、員工工資瀏覽及編輯。例如，員工基本信息瀏覽及編輯界面如圖4所示 ，可以實現：單擊“上一條”、“下一條”按鈕等瀏覽“員工表”中每一個員工的信息；單擊“修改”按鈕，重新輸入需修改的值，單擊“保存”或“放棄”，則可實現修改當前員工的信息；單擊“添加”按鈕，輸入新員工信息，單擊“保存”，則可增加新員工信息；單擊“刪除”按鈕，可增加當前顯示的員工信息。“上一條”“下一條”等按鈕是自建了一個“移動記錄”按鈕類。

圖4 員工基本信息瀏覽及編輯界面

“增加”功能的實現代碼如下：

append blank

thisform.refresh

thisform.編號1.setfocus

thisform.編號1.enabled=.t.

thisform.姓名1.enabled=.t.

thisform.性別1.enabled=.t.

……

“保存”按鈕功能的click事件代碼如下：

=tableupdate（.t.）

？？chr（7）

=messagebox（"增加或修改記錄成功！"，48，"信息窗口"）

“保存”按鈕功能的Error事件代碼如下：

LPARAMETERS nError， cMethod， nLine

cmessagetitle="學校人事管理系統"

cmessagetext="員工編號不唯一，請重新輸入！"

cmessagetype=16

messagebox（cmessagetitle，cmessagetext，cmessagetype）

=tablerevent（.t.）

locate for empty（員工表.編號）

delete

pack

2.4 檔案統計

該模塊對教職工的信息進行統計，包括統計政治面貌、統計婚姻民族狀況。如統計婚姻民族狀況的結果如圖5所示。

圖5 員工婚姻民族狀況統計表

“統計婚姻民族狀況”功能的部分代碼如下：

store 0 to h11，h22，h33，h44，h55，h66，h77

use date＼員工表

do while i<7

dw=substr（"辦公室 計科系 外語系 中文系 數學系 后勤處 "，j，8）

store 0 to h1，h2，h3，h4，h5，h6，h7

count all for 婚姻狀況="已婚" .and. 部門編號=i to h4

count all for 婚姻狀況="未婚" .and. 部門編號=i to h5

count all for 民族="漢" .and. 部門編號=i to h6

count all for 民族<>"漢" .and. 部門編號=i to h7

count all for 性別="男" .and. 部門編號=i to h2

count all for 性別="女" .and. 部門編號=i to h3

store h2+h3 to h1

h11=h1+h11

……

h77=h7+h77

store h+1 to h

i=i+1

j=j+8

h=h+1

enddo

2.5 檔案輸出

該模塊輸出檔案相關信息，包括輸出部門信息、全體員工基本信息、員工工資信息、員工名冊，如圖6所示。例如，選擇“員工工資信息”，單擊“打印預覽”，則調用報表“全體員工基本信息”，結果界面如圖7所示。

圖6 檔案輸出

圖7 員工工資信息輸出

“打印預覽”功能的實現代碼如下：

do case

case thisform.optiongroup1.value=1

report form 部門信息 preview

case thisform.optiongroup1.value=2

report form 全體員工基本信息 preview

case thisform.optiongroup1.value=3

report form 員工工資信息 preview

case thisform.optiongroup1.value=4

report form 員工名冊 preview

endcase

3 結 語

基于VFP的學校人事管理系統，通過優化合理的數據庫結構，并利用菜單、表單、報表設計等理論方法，實現對學校人事的系統管理。該系統界面友好，運行穩定、功能基本符合用戶需求，具有較高的應用推廣價值。

參考文獻

[1] 陳明銳，李懷成.數據庫管理系統Visual FoxPro 9.0應用教程[M].北京：高等教育出版社，2010.

[2] 于寧，吳慶學.基于VFP的校園招聘信息管理系統的設計與實現[J].現代電子技術，2013，36（4）：23?25.

[3] 江世軍.基于VFP6的學籍成績管理信息系統的設計與實現[D].成都：電子科技大學，2010.

[4] 侯偉.高職學院人事管理系統設計與實現[D].濟南：山東大學，2013.

[5] 金鑒祿，孟憲寶.人事管理系統的研究與實現[J].長春工業大學學報：自然科學版，2003，24（2）：23?25.

[6] 李強.一種人事管理系統的開發[J].電子測試，2013（7）：90?91.

store 0 to h11，h22，h33，h44，h55，h66，h77

use date＼員工表

do while i<7

dw=substr（"辦公室 計科系 外語系 中文系 數學系 后勤處 "，j，8）

store 0 to h1，h2，h3，h4，h5，h6，h7

count all for 婚姻狀況="已婚" .and. 部門編號=i to h4

count all for 婚姻狀況="未婚" .and. 部門編號=i to h5

count all for 民族="漢" .and. 部門編號=i to h6

count all for 民族<>"漢" .and. 部門編號=i to h7

count all for 性別="男" .and. 部門編號=i to h2

count all for 性別="女" .and. 部門編號=i to h3

store h2+h3 to h1

h11=h1+h11

……

h77=h7+h77

store h+1 to h

i=i+1

j=j+8

h=h+1

enddo

2.5 檔案輸出

該模塊輸出檔案相關信息，包括輸出部門信息、全體員工基本信息、員工工資信息、員工名冊，如圖6所示。例如，選擇“員工工資信息”，單擊“打印預覽”，則調用報表“全體員工基本信息”，結果界面如圖7所示。

圖6 檔案輸出

圖7 員工工資信息輸出

“打印預覽”功能的實現代碼如下：

do case

case thisform.optiongroup1.value=1

report form 部門信息 preview

case thisform.optiongroup1.value=2

report form 全體員工基本信息 preview

case thisform.optiongroup1.value=3

report form 員工工資信息 preview

case thisform.optiongroup1.value=4

report form 員工名冊 preview

endcase

3 結 語

基于VFP的學校人事管理系統，通過優化合理的數據庫結構，并利用菜單、表單、報表設計等理論方法，實現對學校人事的系統管理。該系統界面友好，運行穩定、功能基本符合用戶需求，具有較高的應用推廣價值。

參考文獻

[1] 陳明銳，李懷成.數據庫管理系統Visual FoxPro 9.0應用教程[M].北京：高等教育出版社，2010.

[2] 于寧，吳慶學.基于VFP的校園招聘信息管理系統的設計與實現[J].現代電子技術，2013，36（4）：23?25.

[3] 江世軍.基于VFP6的學籍成績管理信息系統的設計與實現[D].成都：電子科技大學，2010.

[4] 侯偉.高職學院人事管理系統設計與實現[D].濟南：山東大學，2013.

[5] 金鑒祿，孟憲寶.人事管理系統的研究與實現[J].長春工業大學學報：自然科學版，2003，24（2）：23?25.

[6] 李強.一種人事管理系統的開發[J].電子測試，2013（7）：90?91.

store 0 to h11，h22，h33，h44，h55，h66，h77

use date＼員工表

do while i<7

dw=substr（"辦公室 計科系 外語系 中文系 數學系 后勤處 "，j，8）

store 0 to h1，h2，h3，h4，h5，h6，h7

count all for 婚姻狀況="已婚" .and. 部門編號=i to h4

count all for 婚姻狀況="未婚" .and. 部門編號=i to h5

count all for 民族="漢" .and. 部門編號=i to h6

count all for 民族<>"漢" .and. 部門編號=i to h7

count all for 性別="男" .and. 部門編號=i to h2

count all for 性別="女" .and. 部門編號=i to h3

store h2+h3 to h1

h11=h1+h11

……

h77=h7+h77

store h+1 to h

i=i+1

j=j+8

h=h+1

enddo

2.5 檔案輸出

該模塊輸出檔案相關信息，包括輸出部門信息、全體員工基本信息、員工工資信息、員工名冊，如圖6所示。例如，選擇“員工工資信息”，單擊“打印預覽”，則調用報表“全體員工基本信息”，結果界面如圖7所示。

圖6 檔案輸出

圖7 員工工資信息輸出

“打印預覽”功能的實現代碼如下：

do case

case thisform.optiongroup1.value=1

report form 部門信息 preview

case thisform.optiongroup1.value=2

report form 全體員工基本信息 preview

case thisform.optiongroup1.value=3

report form 員工工資信息 preview

case thisform.optiongroup1.value=4

report form 員工名冊 preview

endcase

3 結 語

基于VFP的學校人事管理系統，通過優化合理的數據庫結構，并利用菜單、表單、報表設計等理論方法，實現對學校人事的系統管理。該系統界面友好，運行穩定、功能基本符合用戶需求，具有較高的應用推廣價值。

參考文獻

[1] 陳明銳，李懷成.數據庫管理系統Visual FoxPro 9.0應用教程[M].北京：高等教育出版社，2010.

[2] 于寧，吳慶學.基于VFP的校園招聘信息管理系統的設計與實現[J].現代電子技術，2013，36（4）：23?25.

[3] 江世軍.基于VFP6的學籍成績管理信息系統的設計與實現[D].成都：電子科技大學，2010.

[4] 侯偉.高職學院人事管理系統設計與實現[D].濟南：山東大學，2013.

[5] 金鑒祿，孟憲寶.人事管理系統的研究與實現[J].長春工業大學學報：自然科學版，2003，24（2）：23?25.

[6] 李強.一種人事管理系統的開發[J].電子測試，2013（7）：90?91.