【正文】 = False = True = 歡迎 amp。 amp。 today amp。 workerId amp。 39。 amp。 ,39。 , amp。 39。 amp。 departId amp。 workerId amp。 worktype amp。, amp。 ,39。 TransactSQL (strSql) . . = False = True = amp。 nowtime amp。 amp。 39。 amp。 , amp。 and workerId= amp。 m_iDepartId Set rsDep = TransactSQL(strSql) = (0) = (1) = False DisConnect End Sub Public Function SetRowNumber(ByVal p_irownumber As Integer) m_irownumber = p_irownumber End Function Public Function GetRowNumber() As Integer GetRowNumber = m_irownumber End Function 員工考勤登記 Dim strSql As String Dim rs As New Dim today As String Dim qjLength As Double Dim qjTime As String Dim djTime As String Dim qjReason As String Dim ccLength As Double Dim ccTime As String Dim dcTime As String Dim ccArea As String Dim ccContent As String . . Dim nowtime As String Private Sub cboDept_Click() strSql = Select * from TWorker where departmentId= amp。 m_txtdepartName amp。 and departmentName like 39。 ,39。 and = amp。例如：生 產(chǎn)部為第七個(gè)創(chuàng)建的部門，所以他的編號(hào)為 07。 信息 。 信息 。 輸出：職工考勤情況。 可行性分析結(jié)論 結(jié)論意見(jiàn)：經(jīng)上述可行性分析，系統(tǒng)研制和開(kāi)發(fā)可以立即開(kāi)始進(jìn)行 客戶需求分析 考勤系統(tǒng)應(yīng)該便于管理者的查詢、修改、更新、統(tǒng)計(jì)以及高層管理人員的查詢等操作。計(jì)算機(jī)硬件和軟件技術(shù)的飛速發(fā)展，為系統(tǒng)的建議提供了技術(shù)條件。 手工方法所表現(xiàn)出來(lái)的種種劣勢(shì)，使人們慢慢意識(shí)到管理現(xiàn)代化已成為當(dāng)代社會(huì)發(fā)展的一股不可抗拒的洪流。計(jì)算機(jī)技術(shù)特別是數(shù)據(jù)庫(kù)技術(shù)的發(fā)展為企業(yè)建立管理信息系統(tǒng)，甚至對(duì)改變管理思想起著不可估量的作用 。 課程設(shè)計(jì)小組前期的準(zhǔn)備情況 ........... 錯(cuò)誤 !未定義書(shū)簽。它已經(jīng)被應(yīng)用于許多領(lǐng)域。一切的統(tǒng)計(jì)和計(jì)算都由計(jì)算機(jī)代為管理了，考勤信息管理系統(tǒng)對(duì)企業(yè)的合理化管理起到了很大的作用，它為企業(yè)信息化的建設(shè)打響了頭炮，而企業(yè)的信息化建設(shè)已成為現(xiàn)代各個(gè)企業(yè)發(fā)展的需要。科學(xué)的管理方法在管理中一般是指數(shù)學(xué)方法、系統(tǒng)方法、信息方法、控制論方法、社會(huì)學(xué)方法、心理學(xué)方法等科學(xué)方法，而先進(jìn)的科技手段主要是運(yùn)用當(dāng)代最新科學(xué)技術(shù)之一的電子計(jì)算機(jī)來(lái)為 考勤 管理現(xiàn)代化服務(wù)。 社會(huì)因素可行性分析 對(duì)所建議系統(tǒng)的社會(huì)因素方面的可行性分析： (1)法律可行性 新系統(tǒng)的研制和開(kāi)發(fā)，所有軟件都選用正版，將不會(huì)侵犯他、集體和國(guó)家的利益，不會(huì)違反國(guó)家政策和法律。 . . (1) 主要功能 考勤簽到 :員工每 天上班時(shí)需要登陸系統(tǒng)進(jìn)行簽到，如果當(dāng)天已經(jīng)簽到了，則不執(zhí)行重復(fù)操作！ 考勤簽退 :員工每天下班時(shí)需要登陸系統(tǒng)進(jìn)行簽退，如果當(dāng)天還沒(méi)有簽過(guò)到，則不執(zhí)行簽退操作，如果當(dāng)天還沒(méi)有到下班時(shí)間，也不執(zhí)行簽退操作！ 節(jié)假日查看 :員工可以登錄查看節(jié)假日加班安排 系統(tǒng)管理 :修改自己的密碼 , 查看系統(tǒng)簡(jiǎn)介 . 員工信息管理 :管理員登陸系統(tǒng)后可以添加新的員工信息，可以對(duì)現(xiàn)有員工的信息進(jìn)行修改和查詢！可以刪除某些員工信息，當(dāng)刪除員工信息時(shí)同時(shí)將刪除他們的考勤信息 職位類別及上下班時(shí)間管理 :不同的職位類別擁有不同的上下班 時(shí)間，管理員可以添加新的職位類別，修改已經(jīng)存在的職位類別的名稱和上下班時(shí)間 , 部門信息管理 :管理員可以添加和刪除部門信息，當(dāng)部門下面存在員工信息時(shí)不執(zhí)行刪除操作 . 系統(tǒng)管理 :修改自己的登陸密碼 ,查看系統(tǒng)簡(jiǎn)介。 系統(tǒng)默認(rèn)管理員登陸信息 : 帳號(hào) admin 密碼 admin . . 系統(tǒng)分析部分 業(yè)務(wù)流程圖 圖 21 業(yè)務(wù)流程圖 上 班 時(shí) 間 表設(shè) 置管 理 員查 詢出 差 情 況 表請(qǐng) 假 情 況 表上 班 情 況 表普 通 用 戶授 予 權(quán) 限上 班 請(qǐng) 假 出 差 數(shù)據(jù)流程圖 圖 22 頂層數(shù)據(jù)流程圖 檔 案 管 理 系 統(tǒng)管 理 員普 通 用戶員工信息添加員工信息更新查詢員工信息部門信息添加部 門信 息更 新查 詢 部 門 信 息部門信息查詢員工工作狀態(tài)上班時(shí)間設(shè)置員工信息工作狀態(tài)用戶信息工 作 狀 態(tài)上 班 時(shí) 間 . . 圖 23 一層數(shù)據(jù)流程圖 添 加 員 工修 改 員 工 信 息添 加 部 門查 詢 員 工 信 息新 員 工 信 息員 工 信 息員 工 信 息員 工 信 息員 工 信 息 更 新員 工 信 息 添 加查 詢 部 門 信 息修 改 部 門 信 息新 部 門 信 息部 門 信 息部 門 信 息部 門 信 息 更 新部 門 信 息 添 加部 門 信 息身 份 驗(yàn) 證注 冊(cè) 信 息出 差 登 記上 班 登 記請(qǐng) 假 登 記查 詢 員 工 工 作狀 態(tài)上 班 信 息請(qǐng) 假 信 息員 工 工 作 狀 態(tài)添 加 上 班 時(shí) 間上 班 時(shí) 間 設(shè) 置 上 班 時(shí) 間用 戶 信 息工 作 狀 態(tài)查 詢 部 門 信 息查 詢 員 工 信 息查 詢 員 工 工 作 狀 態(tài)員 工 表上 班 情 況表部 門 表請(qǐng) 假 情 況表注 冊(cè) 信 息表出 差 情 況表上 班 時(shí) 間表上 班 時(shí) 間新 員 工 注 冊(cè) 信 息出 差 信 息 . . ER 圖 圖 25 ER 圖 管 理 員管 理員 工部 門屬 于MNN1進(jìn) 入 公 司 時(shí)間員 工 姓 名 員 工 性 別 員 工 年 齡員 工員 工 密 碼部 門部 門 名 稱部 門 I D管 理 員密 碼管 理 員 編 號(hào)P請(qǐng) 假 單出 差 單上 班 單查 詢NNN1登 記111 . . 數(shù)據(jù)字典 名字：個(gè)人資料數(shù)據(jù) 描述：職工的個(gè)人信息，用于對(duì)職工的確認(rèn) 定義：個(gè)人資料數(shù)據(jù) =員工 ID+員工姓名 +員工性別 +出生日期 +職務(wù) +個(gè)人工作資料檔案 位置：輸入到員工表 名字：職工列表數(shù)據(jù) 描述：職工的部門信息，用于對(duì)職工部門的確認(rèn) 定義：職工列表數(shù)據(jù) =員工 ID +員工姓名 +部門代碼 +部門名稱 +員工類別 +員工職位 +查詢密碼 位置：輸入到部門表、用戶表 名字：考勤數(shù)據(jù) 描述：職工的考勤信息 定義：考勤數(shù)據(jù) =員工 ID+年月 +遲到 +早退 +請(qǐng)假 +曠工 位置：輸入到請(qǐng)假表、上班表、出差表 名字：上班類型數(shù)據(jù) 描述：上班類型的信息，用于對(duì)員工上班時(shí)間類型的確認(rèn) 定義：上班類型數(shù)據(jù) =類型代號(hào) +類型名稱 位置：輸入到上班類型表 名字：部門數(shù)據(jù) 描述：部門的信息，用于對(duì) 部門的確認(rèn) 定義：部門資料數(shù)據(jù) =部門代號(hào) +部門名稱 位置：輸入到部門表 名字：上班時(shí)間數(shù)據(jù) 描述：關(guān)于每日上班時(shí)間的信息，用于員工對(duì)上班時(shí)間的確認(rèn) 定義：上班時(shí)間數(shù)據(jù) =上午工作開(kāi)始時(shí)間 +上午工作離開(kāi)時(shí)間 +下午工作開(kāi)始時(shí)間 +下午工作離開(kāi)時(shí)間 位置：輸入到上班時(shí)間表 . . 名字：操作用戶表 別名：操作用戶信息 描述：是對(duì)使用本系統(tǒng)的用戶進(jìn)行身份和權(quán)限驗(yàn)證用的 定義：用戶名 +密碼 +所屬單位 +權(quán)限一 +權(quán)限二 +操作員 位置：所有表單 名字：用戶名 別名： 描述：惟一標(biāo)識(shí)本系統(tǒng)的用戶身份 定義：用戶名 =5{字符 }5 位置：操作用戶表 名字：密碼 別名： 描述：驗(yàn)證本系統(tǒng)的用戶身份 定義：密碼 =5{字符 }5 位置：用戶表 名字：權(quán)限一 別名： 描述：標(biāo)識(shí)本系統(tǒng)的用戶對(duì)本系統(tǒng)管理權(quán)使用權(quán)限 定義：權(quán)限一 =5{字符 }5 位置：用戶表 名字：權(quán)限二 別名： 描述：標(biāo)識(shí)本系統(tǒng)的用戶對(duì)本系統(tǒng)登記權(quán)的使用權(quán)限 定義：權(quán)限二 =5{字符 }5 位置：用戶表 . . 第三章 信息系統(tǒng)設(shè)計(jì) 功能結(jié)構(gòu)圖設(shè)計(jì) 圖 31 功能結(jié)構(gòu)圖 主 系 統(tǒng)管 理 員 功 能 用 戶 功 能添加刪除修改用戶查詢工作狀態(tài)設(shè)置上班下班時(shí)間添加修改刪除部門工作登記出差登記請(qǐng)假登記 輸入 輸出 設(shè)計(jì) 表 31 登錄 名稱、標(biāo)識(shí)符 登錄 輸入 填寫用戶的 ID號(hào)和密碼，點(diǎn)擊確認(rèn)按鈕。 包括編號(hào)、部門名稱、姓名、性別、出生日期、籍貫等信息。 包括用戶名稱、密碼、所在單位、用戶權(quán)限信息、操作員、最后修改時(shí)間。 上班類型代號(hào)為一位數(shù)，按照上班類型分為五類， 0：正常上班 1：請(qǐng)假 2：出差 3：早退 4：遲到。 dtpStartDate amp。 39。 %39。 amp。 () amp。 么？ , vbOKCancel) = vbOK Then psw = InputBox(請(qǐng)輸入員工密碼： , 輸入密碼) If yanzhengPWD(labwele, psw, workerPsw) = False Then Exit Sub = False Else Call getTime If DateDiff(s, nowtime, mstart) = 0 Then worktype = 6 Else worktype = 4 End If If yanzheng(departId, workerI