PB人事管理系統(tǒng)課程設(shè)計

1、課程設(shè)計報告書2009/2010 學(xué)年 第 2 學(xué)期課程名稱： PB數(shù)據(jù)庫應(yīng)用程序開發(fā) 項 目： 人事管理系統(tǒng) 學(xué) 院： 計算機科學(xué)與技術(shù) 專 業(yè)： 計算機網(wǎng)絡(luò) 指導(dǎo)教師： 班 級： 成 員： 2010年6月目錄一、功能說明3二、整體設(shè)計41、軟件功能框架設(shè)計42、數(shù)據(jù)庫設(shè)計及其關(guān)系圖4（1）、數(shù)據(jù)關(guān)系圖5（2）、數(shù)據(jù)庫視圖5三、各功能簡要說明61. w_login窗體，登錄驗證后到主界面6(1).“登錄”按鈕代碼62. w_main窗體，顯示信息，打印，另存為等操作7(1).“保存修改”按鈕代碼7(2).“另存為”按鈕代碼7(3).“打印”按鈕代碼7(4).“刷新”按鈕代碼73. w_tia

2、njia窗體，添加新員工8(1).“添加”按鈕代碼84. w_shanchu窗體，刪除員工9(1).“刪除”按鈕代碼95. w_hunying窗體，查看婚姻信息10(1).“修改”按鈕代碼106. w_xueli窗體，查看學(xué)歷信息11(1).“保存修改”按鈕代碼11(2).“打印”按鈕代碼11(3).“另存為”按鈕代碼117. w_gonghao窗體，按工號查詢員工信息12(1).“查詢”按鈕代碼128. w_xingming窗體，按姓名查詢員工信息13(1). “查詢”按鈕代碼139. w_txueli窗體，統(tǒng)計員工學(xué)歷信息1410. w_bumen窗體，查看部門信息14(1).“添加”按鈕

3、代碼15(2).“刪除”按鈕代碼15(3).“保存修改”按鈕代碼1511. w_gangwei窗體，查看崗位信息15(1).“添加”按鈕代碼16(2).“刪除”按鈕代碼16(3).“保存修改”按鈕代碼1612.菜單menus16四、總結(jié)171、程序說明172、心得體會17一、功能說明“人事管理系統(tǒng)”整體功能說明整個工資管理系統(tǒng)僅一管理員賬號，登陸后能查看員工基本信息，員工學(xué)歷信息，員工婚姻信息，添加、修改、刪除員工信息，查看、修改部門和崗位信息功能說明如下：1 新員工的基本信息的添加2 員工信息查看，修改3 修改密碼4 查詢員工的信息5 導(dǎo)出數(shù)據(jù)到各種格式中，打印員工基本信息表6. 員工學(xué)歷統(tǒng)

4、計圖7 部門信息管理8. 崗位信息管理本程序制作環(huán)境：windows7，PowerBuilder 9.0,MSSQL2005二、整體設(shè)計1、軟件功能框架設(shè)計2、數(shù)據(jù)庫設(shè)計及其關(guān)系圖注意：以下此數(shù)據(jù)庫圖中未包含管理員賬號、密碼表格，且為MSSQL2005中創(chuàng)建（1）、數(shù)據(jù)關(guān)系圖 （2）、數(shù)據(jù)庫視圖三、各功能簡要說明1. w_login窗體，登錄驗證后到主界面(1).“登錄”按鈕代碼 string password,username SELECT user.admin, user.password INTO :username, :password FROM user WHERE user.adm

5、in = :sle_1.text;if sle_1.text= or sle_2.text= thenmessagebox(錯誤！,用戶名或密碼不能為空！,exclamation!,ok!,2)elseif username=sle_1.text and password=sle_2.text then messagebox(通過驗證！,用戶名和密碼正確，歡迎您使用本系統(tǒng)！,Information!,ok!,2) elsemessagebox(錯誤！,用戶名或密碼錯誤，請重新輸入！,exclamation!,ok!,2) end ifend if2. w_main窗體，顯示信息，打印，另存為等

6、操作(1).“保存修改”按鈕代碼if messagebox(提示信息,是否保存修改?,Question!,YesNo!,1)=1 thendw_1.update()，messagebox(提示信息,保存完成)else messagebox(提示信息,保存失敗)end if(2).“另存為”按鈕代碼dw_1.SaveAs()(3).“打印”按鈕代碼dw_1.Print()(4).“刷新”按鈕代碼dw_1.retrieve()3. w_tianjia窗體，添加新員工(1).“添加”按鈕代碼if(sle_1.text= or sle_2.text= or sle_3.text= or sle_4.t

7、ext= or sle_5.text= or sle_6.text= or sle_7.text= or sle_8.text= or sle_9.text= or sle_10.text= or sle_11.text= or sle_12.text= or sle_13.text= or sle_14.text= or sle_15.text= or sle_16.text=) thenmessagebox(提示信息,信息未填完整)else if messagebox(提示信息,是否添加此員工?,Question!,YesNo!,1)=1 theninsert into 員工基本信息表(員

8、工基本信息表.工號,員工基本信息表.姓名,員工基本信息表.學(xué)歷,員工基本信息表.崗位,員工基本信息表.部門,員工基本信息表.電話號碼,員工基本信息表.性別,員工基本信息表.出生日期,員工基本信息表.家庭住址,員工基本信息表.婚否,員工基本信息表.參加工作時間)values(:sle_1.text,:sle_2.text,:sle_12.text,:sle_3.text,:sle_4.text,:sle_5.text,:sle_10.text,:sle_6.text,:sle_8.text,:sle_9.text,:sle_7.text);insert into 員工婚姻情況表(員工婚姻情況表.

9、姓名,員工婚姻情況表.性別,員工婚姻情況表.配偶)values(:sle_2.text,:sle_10.text,:sle_11.text);insert into 員工學(xué)歷情況表(員工學(xué)歷情況表.姓名,員工學(xué)歷情況表.學(xué)歷,員工學(xué)歷情況表.專業(yè),員工學(xué)歷情況表.學(xué)校,員工學(xué)歷情況表.外語水平,員工學(xué)歷情況表.畢業(yè)時間)values(:sle_2.text,:sle_12.text,:sle_13.text,:sle_14.text,:sle_15.text,:sle_16.text); messagebox(提示信息,添加完成) else messagebox(提示信息,添加失敗) end

10、ifend if4. w_shanchu窗體，刪除員工(1).“刪除”按鈕代碼if(sle_1.text= or sle_2.text=) then messagebox(提示信息,請兩項都要輸入)else if messagebox(提示信息,刪除后無法恢復(fù)，是否刪除此員工所有信息?,Question!,YesNo!,1)=1 thendelete from 員工基本信息表where 員工基本信息表.姓名=:sle_1.text and 員工基本信息表.工號=:sle_2.text;delete from 員工學(xué)歷情況表where 員工學(xué)歷情況表.姓名=:sle_1.text;delete

11、from 員工婚姻情況表where 員工婚姻情況表.姓名=:sle_1.text;messagebox(提示信息,刪除完成)sle_1.text= else messagebox(提示信息,刪除失敗) end ifend if5. w_hunying窗體，查看婚姻信息(1).“修改”按鈕代碼if messagebox(提示信息,是否保存修改?,Question!,YesNo!,1)=1 thendw_1.update()messagebox(提示信息,保存完成)else messagebox(提示信息,保存失敗)end if6. w_xueli窗體，查看學(xué)歷信息(1).“保存修改”按鈕代碼if

12、 messagebox(提示信息,是否保存修改?,Question!,YesNo!,1)=1 thendw_1.update()messagebox(提示信息,保存完成)else messagebox(提示信息,保存失敗)end if(2).“打印”按鈕代碼dw_1.Print()(3).“另存為”按鈕代碼dw_1.saveas()7. w_gonghao窗體，按工號查詢員工信息 (1).“查詢”按鈕代碼if(sle_6.text=) then messagebox(提示信息,請輸入工號)elseselect 員工基本信息表.工號,員工基本信息表.姓名,員工基本信息表.學(xué)歷,員工基本信息表.崗

13、位,員工基本信息表.部門,員工基本信息表.家庭住址into:sle_1.text,:sle_2.text,:sle_3.text,:sle_4.text,:sle_5.text,:sle_7.textfrom 員工基本信息表where 員工基本信息表.工號=:sle_6.text;sle_6.text=end if8. w_xingming窗體，按姓名查詢員工信息(1). “查詢”按鈕代碼if(sle_6.text=) then messagebox(提示信息,請輸入姓名)elseselect 員工基本信息表.工號,員工基本信息表.姓名,員工基本信息表.學(xué)歷,員工基本信息表.崗位,員工基本信息

14、表.部門,員工基本信息表.家庭住址into:sle_1.text,:sle_2.text,:sle_3.text,:sle_4.text,:sle_5.text,:sle_7.textfrom 員工基本信息表where 員工基本信息表.姓名=:sle_6.text;sle_6.text=end if9. w_txueli窗體，統(tǒng)計員工學(xué)歷信息10. w_bumen窗體，查看部門信息(1).“添加”按鈕代碼int k1k1=dw_1.InsertRow(0)dw_1.ScrollToRow(k1)(2).“刪除”按鈕代碼dw_1.DeleteRow(0)(3).“保存修改”按鈕代碼if mess

15、agebox(提示信息,是否保存修改?,Question!,YesNo!,1)=1 thendw_1.update()messagebox(提示信息,保存完成)else messagebox(提示信息,保存失敗)end if11. w_gangwei窗體，查看崗位信息(1).“添加”按鈕代碼int g1g1=dw_1.InsertRow(0)dw_1.ScrollToRow(k1)(2).“刪除”按鈕代碼dw_1.DeleteRow(0)(3).“保存修改”按鈕代碼if messagebox(提示信息,是否保存修改?,Question!,YesNo!,1)=1 thendw_1.update()messagebox(提示信息,保存完成)else messagebox(提示信息,保存失敗)end if12.菜單menus四、總結(jié)1、程序說明本系統(tǒng)是采用Powerbu