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

《課程設(shè)計---人事管理信息系統(tǒng)》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在學(xué)術(shù)論文-天天文庫。

1、人事管理信息系統(tǒng)由于信息化社會的飛速發(fā)展，人事管理系統(tǒng)已經(jīng)成為每一個企業(yè)，政府部門以及其他機(jī)構(gòu)組成中不可或缺的一部分。人事管理系統(tǒng)是滿足了公司對員工基本信息管理的需求，擁有人事管理系統(tǒng)，可以更加方便的進(jìn)行人事的管理，操作簡單方便，可以為員工節(jié)省大量時間，從而提高工作效率。本節(jié)針對人事管理系統(tǒng)介紹使用VB開發(fā)數(shù)據(jù)庫應(yīng)用程序的基本方法。本程序的記錄雖然包含的信息量較少，但其功能與實現(xiàn)方法具有相當(dāng)?shù)钠毡樾院蛯嵱眯浴?系統(tǒng)設(shè)計1.1系統(tǒng)功能分析系統(tǒng)開發(fā)的總體任務(wù)是實現(xiàn)各種信息的系統(tǒng)化、規(guī)范化和自動化。系統(tǒng)功能分析是在系統(tǒng)開發(fā)的總體任務(wù)的基礎(chǔ)上完成?？紤]

2、系統(tǒng)的通用功能，本例子中人事管理信息系統(tǒng)需要完成功能主要有：（1）．密碼設(shè)置：每個管理員均可有自己的用戶名和密碼，可以防止非本系統(tǒng)人員進(jìn)入系統(tǒng)。（2）．信息管理：可對職工信息進(jìn)行更改，添加和刪除，。（3）．信息查詢：能夠快速地進(jìn)行員工基本信息各種組合的查詢。雙擊查詢結(jié)果可對其進(jìn)行更改。（4）．信息統(tǒng)計：飽含簡單統(tǒng)計和自定義統(tǒng)計。其中自定義統(tǒng)計可進(jìn)行各種組合的統(tǒng)計。（5）．?dāng)?shù)據(jù)打印：對職工基本信息進(jìn)行打印和導(dǎo)出。201.2系統(tǒng)功能模塊設(shè)計對上述各項功能進(jìn)行集中、分塊，按照結(jié)構(gòu)化程序設(shè)計的要求，得到如圖1-2-1所示的系統(tǒng)功能模塊圖。人事管理系統(tǒng)信

3、息統(tǒng)計信息管理信息打印信息查詢密碼設(shè)置清空刪除查找添加數(shù)據(jù)管理信息管理設(shè)置密碼用戶登錄看圖1-2-1系統(tǒng)功能模塊圖2數(shù)據(jù)庫設(shè)計20數(shù)據(jù)庫在一個信息管理系統(tǒng)中占有非常重要的地位，數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的好壞將直接對應(yīng)用系統(tǒng)的效率以及實現(xiàn)的效果產(chǎn)生影響。合理的數(shù)據(jù)庫結(jié)構(gòu)設(shè)計可以提高數(shù)據(jù)存儲的效率，保證數(shù)據(jù)的完整和一致。在數(shù)據(jù)庫中建立一個名為人事系統(tǒng)管理的數(shù)據(jù)庫，其包含數(shù)據(jù)庫表RSGL（職工表）和Yh（用戶密碼表),表的結(jié)構(gòu)見表2-1與表2-2表2-1職工表列名數(shù)據(jù)類型可否為空說明職工編號Text（8）not主鍵職工姓名Text（8）yes職工年齡Integ

4、er（2）not職工性別Text（2）yes所在部門Text（16）yes技術(shù)職稱Text（12）yes工作時間Data（8）not婚姻狀況Text（4）yes基本工資Single（4）not表2-2用戶密碼表列名數(shù)據(jù)類型可否為空說明ynameText（50）not用戶名（主鍵）ypassText（50）not口令3用戶登陸界面執(zhí)行“工程”菜單中的“添加窗體“命令，添加一個新的窗體。在里面添加兩個容器（frame1，F(xiàn)rame2），3個標(biāo)簽，兩個文本框，兩個命令按鈕，一個數(shù)據(jù)控件（Data）。用戶登陸界面如圖3-1所示。20圖3-1用戶登錄窗體

5、設(shè)置各控件的屬性如圖3-2圖3-2各控件屬性對象名稱屬性名稱屬性值說明Form1Namelogin窗體名稱Caption用戶登錄設(shè)置標(biāo)題欄Frame1Caption無設(shè)置為空Frame2Caption無設(shè)置為空Label1Caption歡迎使用人事管理系統(tǒng)設(shè)置標(biāo)簽內(nèi)容Font隸書粗體二號設(shè)置字體ForeColorHFF&設(shè)置字體顏色Lable2Caption用戶名：設(shè)置標(biāo)簽內(nèi)容Lable3Caption口令：設(shè)置標(biāo)簽內(nèi)容Text1Caption無設(shè)置為空Text2Caption無設(shè)置為空Command1Caption確定設(shè)置命令按鈕Comman

6、d2Caption退出設(shè)置命令按鈕Data1DataBaseNameYh.mdb綁定數(shù)據(jù)庫20在通用段添加代碼：DimxchangeAsIntegerDimychangeAsInteger窗體的load事件過程代碼如下：PrivateSubForm_Load()xchange=100ychange=100EndsubPrivateSubCommand1_Click()‘======================================================‘判斷用戶輸入的名稱和口令是否合法‘首先判斷輸入的用戶名是否存在，如果

7、不存在，給出提示‘如果用戶名存在，判斷輸入口令是否正確，如果錯誤，給出提示‘如果用戶名和口令輸入正確，卸載本窗體，‘否則，判斷是否用完三次機(jī)會，并給出相應(yīng)提示?！?======================================================DimIsuserAsBoolean‘用戶是否存在DimpwdAsStringDimUnameAsStringStaticcountAsIntegerpwd=Trim(Text2.Text)‘記錄輸入口令次數(shù)Uname=Trim(Text1.Text)Isuser=False‘

8、比較用戶名稱和口令的正確與否DoWhileNotData1.Recordse.EOFIfUname=Data1.Recordset.Fields(0)