數(shù)據(jù)庫課程設(shè)計(jì),職工考勤系統(tǒng)

1、竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除數(shù)據(jù)庫課程設(shè)計(jì)，職工考勤系統(tǒng)數(shù)據(jù)庫課程設(shè)計(jì)職工考勤系統(tǒng)摘要在現(xiàn)代企業(yè)管理中，企業(yè)信息化是提高企業(yè)管理效率的重要手段。隨著企業(yè)人事管理的日趨復(fù)雜和企業(yè)人員的增多，企業(yè)的考勤管理變得越來越復(fù)雜。規(guī)范的考勤管理是現(xiàn)代企業(yè)提高管理效益的重要保障， 而傳統(tǒng)的人工管理存在著效率低、不易統(tǒng)計(jì)、成本咼和易出錯(cuò)等弊端， 已經(jīng)無法適應(yīng)現(xiàn)代企業(yè)的需求。隨著計(jì)算機(jī)技術(shù)和通信技術(shù)的迅速發(fā) 展，將傳統(tǒng)的人工考勤管理信息化，建立一個(gè)高效率的、無差錯(cuò)的考 勤管理系統(tǒng)，能夠有效地幫助企業(yè)實(shí)現(xiàn) 公正考勤，高效薪資”的管理 理念，使企業(yè)的管理水平登上一個(gè)新的臺(tái)階。 本課程設(shè)計(jì)主要是對(duì)企 業(yè)員工的考勤管

2、理。本系統(tǒng)的設(shè)計(jì)只要是為了實(shí)現(xiàn)管理和查詢企業(yè)員工的工作出勤情況。主要功能有：刷卡記錄管理、加班管理、請(qǐng)假管理、用戶登錄和注冊(cè) 功能以及月考勤統(tǒng)計(jì)表的查詢。本系統(tǒng)的數(shù)據(jù)庫是用 microsoftaccess20XX軟件進(jìn)行創(chuàng)建和設(shè)計(jì)，分別包括刷卡記錄信息 表，加班信息表，請(qǐng)假信息表，月考勤統(tǒng)計(jì)表和登錄信息表五個(gè)表。通過系統(tǒng) odBc 數(shù)據(jù)源管理工具把已創(chuàng)建的數(shù)據(jù)源與系統(tǒng)數(shù)據(jù)庫相 連。然后利用 VisualBasic 軟件對(duì)系統(tǒng)的窗口進(jìn)行設(shè)計(jì)，包括登錄界 面、注冊(cè)新竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除用戶界面、主界面、瀏覽窗體和查詢窗體等，可以通過這竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除月考勤信息查詢菜單：顯示

3、月考勤信息查詢窗體些窗體進(jìn)行登錄操作，對(duì)輸入的用戶信息進(jìn)行驗(yàn)證，和注冊(cè)新用戶操 作，以及最重要的操作是對(duì)數(shù)據(jù)庫中信息進(jìn)行修改與查詢。并可以對(duì)數(shù)據(jù)進(jìn)行添加與刪除，做到及時(shí)更新員工考勤信息。關(guān)鍵詞：考勤管理，microsoftaccess20XX 軟件，VisualBasic 軟件1.系統(tǒng)功能概述1.1 系統(tǒng)功能考勤管理系統(tǒng)主要是實(shí)現(xiàn)刷卡記錄、加班和請(qǐng)假的管理以及員工月考 勤統(tǒng)計(jì)。設(shè)計(jì)為 mdi 窗體，含有主菜單： 文件、 管理考勤信息、 查詢考勤信息。文件菜單包含以下子菜單及其功能：注冊(cè)：打開 注冊(cè)新用戶”窗體關(guān)閉:結(jié)束程序運(yùn)行登錄:登錄主界面管理考勤信息包含以下子菜單：刷卡信息菜單：顯示刷卡信

4、息瀏覽和編輯窗體加班信息菜單：顯示加班信息瀏覽和編輯窗體請(qǐng)假信息菜單：顯示請(qǐng)假信息瀏覽和編輯窗體查詢考勤信息包含以下子菜單：竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除月考勤信息查詢菜單：顯示月考勤信息查詢窗體刷卡信息查詢菜單：顯示刷卡信息查詢窗體加班信息查詢菜單：顯示加班信息查詢窗體請(qǐng)假信息查詢菜單：顯示請(qǐng)假信息查詢窗體竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除1.2 系統(tǒng)結(jié)構(gòu)總圖考勤管理系統(tǒng)的結(jié)構(gòu)總圖，如圖 1.1 所示：圖 1.1 考勤管理系統(tǒng)的結(jié)構(gòu)總體2.數(shù)據(jù)庫設(shè)計(jì)2.1 需求分析隨著現(xiàn)代數(shù)據(jù)的信息化和大數(shù)據(jù)時(shí)代的到來，各個(gè)企業(yè)也逐漸實(shí)行信 息化管理。而企業(yè)考勤管理一直以來就遵循著傳統(tǒng)的人工管理制度，這種人工管

5、理方法已經(jīng)不再是高效、 快速解決問題的最好選擇。隨著 各企業(yè)的快速發(fā)展和企業(yè)員工頻繁交替更換，使得企業(yè)對(duì)考勤管理系 統(tǒng)有著更高的要求，來達(dá)到企業(yè)利益最大化和職工利益的公平性。數(shù)據(jù)庫管理系統(tǒng)能快速的幫助管理者處理數(shù)據(jù)，提高工作效率，實(shí)現(xiàn)公平公正的管理制度。2.2E-R 模型刷卡記錄信息管理 E-R 圖，如圖 2.1 所示。加班信息管理 E-R 圖，如 圖2.2 所示。請(qǐng)假信息管理 E-R 圖，如圖 2.3 所示。月考勤統(tǒng)計(jì)信息 E-R 圖，如圖 2.4 所示。登錄 E-R 圖，如圖 2.5 所示。全局 E-R 圖，如圖 2.6 所示。圖 2.1 刷卡記錄信息管理實(shí)體屬性圖圖 2.2 加班信息管理

6、實(shí)體屬性圖圖 2.3 請(qǐng)假信息管理實(shí)體屬性圖圖 2.4 月考勤統(tǒng)計(jì)信息管理實(shí)體屬性圖竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除息查詢、加班信息查詢、請(qǐng)假信息查詢、月考勤信息查詢和 mdi 主窗圖 2.5 登錄實(shí)體屬性圖 下頁數(shù)據(jù)庫課程設(shè)計(jì)職工考勤系統(tǒng)圖 2.6 全局 E-R 圖2.3 關(guān)系模型一個(gè)實(shí)體性轉(zhuǎn)換為一個(gè)關(guān)系模式。實(shí)體的屬性就是關(guān)系的屬性，實(shí)體 的碼就是關(guān)系的碼。根據(jù) E-R 圖向關(guān)系模型轉(zhuǎn)換的原則，就是把 E-R 圖轉(zhuǎn)換為關(guān)系模型。刷卡記錄信息：職員編號(hào)、刷卡時(shí)間、刷卡日期（主鍵為職員編號(hào)） 加班信息：職員編號(hào)、加班時(shí)數(shù)、加班日期、加班原因（主鍵為職員 編號(hào)）請(qǐng)假信息：職員編號(hào)、請(qǐng)假日期、請(qǐng)假次

7、數(shù)、請(qǐng)假原因（主鍵為職員 編號(hào)）月考勤統(tǒng)計(jì)信息：職員編號(hào)、日期、加班時(shí)間、請(qǐng)假次數(shù)、曠工次數(shù)、 遲到次數(shù)、早退次數(shù)（主鍵為職員編號(hào)）登錄：用戶名、密碼（主鍵為用戶名）2.4 表結(jié)構(gòu)設(shè)計(jì)3.系統(tǒng)各功能模塊的詳細(xì)設(shè)計(jì)3.1 各窗體的設(shè)計(jì)此考勤管理系統(tǒng)共包括 13 個(gè)窗體，分別是登錄、注冊(cè)、刷卡記錄信體。竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除3.2 各窗體實(shí)現(xiàn)及代碼 321 登錄窗體打開登錄界面后，輸入用戶名和密碼，點(diǎn)擊登錄按鈕，進(jìn)入 mdi 主窗 體，如圖 3.1 所示。圖 3.1 登錄界面圖代碼：dimmico un tas in tegerPrivateSubcomma nd1_click()dims

8、trasStri ngstr= “ select*fro 登錄 where 用戶名二' ”&Text1.Text &“ ' ”adodc1.RecordSource二stradodc1.Refreshifadodc1.Recordset.BoF二TrueThe nmsgBox”用戶名錯(cuò)誤，請(qǐng)重新輸入” ,vbExlamation 警告”Text1.Text= “Text2.Text= “Text1.SetFocusElseifTrim(adodc1.Recordset.Fields(“密碼” )=Text2.TextThenmFiorm1.Sho

9、wUnloadme竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除息查詢、加班信息查詢、請(qǐng)假信息查詢、月考勤信息查詢和 mdi 主窗mdiForm1.g.E nabled二TruemdiForm1.c.E nabled二TrueElse竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除PrivateSubg4_click()月考勤信息查詢.ShowEndSubmsgBox”密碼錯(cuò)誤，請(qǐng)重新輸入”，vbExlamation 警告”Text2.Text二“Text2.SetFocusE ndifE ndifmico un t=mico un t+1ifmico un t=3The nUn loadmeE ndSubPrivateSub

10、comma nd2_click()U nloadmeE ndSub3.2.2mdi 主窗體主窗體含有主菜單：文件、數(shù)據(jù)管理、數(shù)據(jù)查詢。文件菜單包 含子菜單登錄、注冊(cè)、退出。數(shù)據(jù)管理菜單包含子菜單有：刷卡信 息管理、加班信息管理和請(qǐng)假信息管理。數(shù)據(jù)查詢包含子菜單有： 刷卡信息查詢、加班信息查詢、請(qǐng)假信息查詢和月考勤信息查詢。女口 圖 3.2 所示。圖 3.2mdi 主窗體圖代碼：PrivateSubc1_click()刷卡信息.ShowEndSubPrivateSubc2_click()加班信息.ShowEndSubPrivateSubc3_click()請(qǐng)假信息.ShowEndSubPriva

11、teSubg1_click()刷卡信息查詢.ShowEndSubPrivateSubg2_click()竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除ifadodc1.Recordset.EoF=FalseThe n加班信息查詢.ShowEndSubPrivateSubg3_click()請(qǐng)假信息查詢.ShowEndSubPrivateSubmdiForm_Load()g.E nabled二Falsec.E nabled二FalseEndSubPrivateSubw1_click()注冊(cè).ShowE ndSubPrivateSubw2_click()登錄.ShowE ndSubPrivateSubw3_cli

12、ck()U nloadmeE ndSub3.2.3 新用戶注冊(cè)在主窗體上點(diǎn)擊查單文件下的注冊(cè)，進(jìn)入注冊(cè)界面，輸入用戶名、密碼和確認(rèn)密碼，點(diǎn)擊確定，注冊(cè)成功。如圖3.3 所示。圖 3.3 新用戶注冊(cè)圖代碼：PrivateSubcomma nd1_click()dimsqlstrasStri ngifText1=“The nmsgBox”請(qǐng)輸入用戶名！”，vbExclamation 確認(rèn)用戶名”Text1.SetFocusExitSub上頁下頁數(shù)據(jù)庫課程設(shè)計(jì)職工考勤系統(tǒng)Elsesqlstr=“Select*fr 登錄 where 用戶名二' ”&竭誠為您提供優(yōu)質(zhì)文檔/雙擊可

13、除ifadodc1.Recordset.EoF=FalseThe nText1.Text &“ ' ”adodc1.RecordSource=sqlstradodc1.Refresh竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除adodc1.Recordset.Fields(用戶名 ”)=Trim(Text1)msgBox”用戶名已存在，請(qǐng)重新輸入！”，vbExclamation|僉驗(yàn)用戶名”Text 仁“Textl.SetFocusText2= “Text3= “ExitSubEndifEndififText2Text3ThenmsgBox”二次輸入的密碼不一致，請(qǐng)重新輸入” ,vb

14、Exclamation 檢驗(yàn)密碼”Text2= “ :Text3= “Text2.SetFocusExitSubElseifText2= “The nmsgBox”密碼不能為空！ ” ,vbExclamation 檢驗(yàn)密碼”Text2.SetFocus竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除adodcl.Recordset.moveFirstElseadodc1.Recordset.add newadodcl .Recordset.Fields(密碼” “二Trim(Text2)adodcI.Recordset.UpdatemsgBox”成功注冊(cè)新用戶！ ” ,vbinformation,添加用戶”me

15、.HidemdiForm1.ShowUni oadmeEndifEndSubPrivateSubcomma nd2_click()Uni oadmemdiForml.ShowEndSub3.2.4 刷卡信息點(diǎn)擊 mdi 主窗體的數(shù)據(jù)管理菜單下的刷卡信息，出現(xiàn)刷卡信息界面如 圖3.4 所示，如有修改，點(diǎn)擊修改，彈出圖 3.5 所示界面便于增加、 刪除、前移和后移的功能。圖3.4竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除adodcl.Recordset.moveFirst圖 3.5代碼：PrivateSubcomma nd1_click()竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除comma ndl.E nabled二F

16、alsecomma nd2.E nabled二Falsecomma nd3.E nabled二Truecomma nd4.E nabled二TrueLabel5.caption二記錄：”&adodc1.Recordset.absolutePositi on&“ / ”&adodc1.Recordset.Recordco untEndSubPrivateSubcomma nd1O_click()adodc1.Refreshcomma nd6.E nabled二Truecomma nd7.E nabled二Truecomma nd8.E nabled二Truecomma n

17、d9.E nabled二Falsecomma nd1O.E nabled二FalseText1 Locked二TrueText2.Locked二TrueText3.Locked二True竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除Text 4 Locked二TrueEndSubPrivateSubcomma nd2_click() adodcI.Recordset.movePreviouscomma nd3.E nabled二True comma nd4.E nabled二Trueifadodc1.Recordset.BoFThe n adodc1.Recordset.moveFirst command1.

18、E nabled二False comma nd2.E nabled二False EndifLabel5.caption二記錄：”& adodc1.Recordset.absolutePositi on&“ / ”& adodc1.Recordset.Recordco unt EndSubPrivateSubcomma nd3_click() adodc1.Recordset.move next command1.E nabled二True comma nd2.E nabled二Trueifadodc1.Recordset.EoFThe nadodcI.Recordset.moveLastcomma nd3.E nabled二Falsecomma nd4.E nabled二FalseEndifLabel5.caption二記錄：”&竭誠為您提供優(yōu)質(zhì)文檔/雙擊可除adodc1.Re