【文章內(nèi)容簡介】 系統(tǒng)日期，第三個欄中選擇了系統(tǒng)時間，這樣，任何時候操作本系統(tǒng)，都可以看到當(dāng)前的時間和日期。 使用 Access2021 實現(xiàn)關(guān)系型數(shù)據(jù)庫 ? 數(shù)據(jù)庫的概念 數(shù)據(jù)庫是一種存儲數(shù)據(jù)并對數(shù)據(jù)進行操作的工具。數(shù)據(jù)庫的作用在于組織和表達信息，簡而言之，數(shù)據(jù)庫就 是信息的集合。計算機的數(shù)據(jù)庫可以分為兩類：非關(guān)系數(shù)據(jù)庫（ flatfile）和關(guān)系數(shù)據(jù)庫（ relational）。關(guān)系數(shù)據(jù)庫中包含了多個數(shù)據(jù)表的信息，數(shù)據(jù)庫含有各個不同部分的術(shù)語，對象記錄、域等。 10 ? 新建一個數(shù)據(jù)庫 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設(shè)計必須是靈活的、有邏輯的。創(chuàng)建一個數(shù)據(jù)庫結(jié)構(gòu)的過程被認為是數(shù)據(jù)模型設(shè)計。 1．標(biāo)識需要的數(shù)據(jù)； 2．收集被標(biāo)識的字段到表中； 3．標(biāo)識主關(guān)鍵字字段； 4．繪制一個簡單的數(shù)據(jù)圖表； 5．規(guī)范數(shù)據(jù)； 6．標(biāo)識指定字段的信息； 7．創(chuàng)建物理表。 ? 修改已建 的數(shù)據(jù)庫 數(shù)據(jù)庫的修改分為：添加、編輯和刪除記錄。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細描述實現(xiàn)的具體方法。 實現(xiàn)數(shù)據(jù)庫之間的聯(lián)系 數(shù)據(jù)庫之間的關(guān)系指明兩個庫之間共享一個共同的關(guān)鍵字值。一個連接是指一種虛擬的表，這種表是在當(dāng)用戶要求從相互關(guān)聯(lián)的各個不同的表中獲取信息時建立的，關(guān)鍵字段用于在相互連接的不同表中查找匹配的記錄。一個更高級的連接形式稱為自連接。這種連接是指一個表被連接到它自己的一個字段，或在不同的記錄中由重復(fù)數(shù)據(jù)的組合字段。數(shù)據(jù)庫中有三種不同類型的關(guān)鍵字： 主關(guān)鍵字、組合關(guān)鍵字和外關(guān)鍵字。在表中使用的關(guān)鍵字類型用于描述庫表示什么以及在數(shù)據(jù)庫中如何與其它的庫建立關(guān)系。 11 第 二 章 概要設(shè)計 、 系統(tǒng)概述 縱觀各企業(yè) 工資管理 軟件、一個好的企業(yè) 工資 管理軟件，應(yīng)具有簡單友好的操作界面、安全性好的數(shù)據(jù)庫、分級用戶權(quán)限管理、強大數(shù)據(jù)導(dǎo)出及備份功能、聯(lián)機幫肋文檔。本系統(tǒng)著重圍繞這幾點進行開發(fā)設(shè)計。 基于以上眾多問題的分析，和企業(yè)管理制度的參考。將系統(tǒng)具體分為系統(tǒng)管理、員工信息設(shè)定 、 工資信息管理 、 工資結(jié)算管理 、數(shù)據(jù)庫管理、工具箱、幫助 七 大模塊 : 系統(tǒng)管理 分為操作員登錄管理，用戶管理，鎖定操作畫面及退出。操作員登錄管理記錄用戶登錄的時間，方便管理員查看。 在用戶暫時離開時可鎖定操作畫面，防止非法操作。 用戶管理分為 新建 普通 用戶 ，新建管理員用戶 ，修改密碼 三 部分。 、 員工考勤信息 設(shè)置上下班的時間：設(shè)置公司的上下班時間。 添加員工考勤信息 ： 主要分為上下班信息和其它考勤信息，上下班信息主要是記錄每天上下班的時間 ： 而其它考勤信息包括：請假，曠工、遲到等基本信息。 修改員工考勤信息 ： 當(dāng)考勤信息出現(xiàn)錯誤需要修改的時候，可以從這里修改相應(yīng)的記錄。 查 詢員工考勤信息 ： 根據(jù)員工編號或時間進行查詢得到所有的考勤信息。包括上下班，加班和出差信息，但是不能夠?qū)π畔⑦M行任何的操作。 刪除考勤信息：分為刪除上下班信息和刪除其它考勤信息。 考勤信息列表：分為員工上下班信息列表和員工其它考勤信息列表 。 信息初始化部分，由于公司的不同，其部門、 職務(wù)、工資類別、職工類型 信息設(shè)定可能不同，采取設(shè)定方式，可以減少輸入次數(shù)，以方便用戶。 工具箱部分，帶有常用的工具，如計算器、記事本， EMIAL 發(fā)送等。 幫助部分，為幫助主題，版本信息和關(guān)于。 、 系統(tǒng)功能 本系統(tǒng)將實現(xiàn) 以下主要功能 ： 用戶和組管理功能 數(shù)據(jù)的添加、刪除、修改功能 數(shù)據(jù)統(tǒng)計功能 信息保存功能 數(shù)據(jù)導(dǎo)出功能 12 方便的數(shù)據(jù)庫備份功能 提供實用的工具箱 、 數(shù)據(jù)流圖 具有相應(yīng)權(quán)限的用戶在正確登陸后，可以打開并添加新員工的個人檔案，添加完成后可以使用數(shù)據(jù)導(dǎo)出功能，導(dǎo)出數(shù)據(jù)。數(shù)據(jù)流圖如下 圖 21 所示 ： 13 、 模塊圖 如圖 ： 圖 22 系統(tǒng)功能模塊圖 14 第三章 數(shù)據(jù)庫設(shè)計 、 概述 在數(shù)據(jù)庫應(yīng)用系統(tǒng)的開發(fā)過程中，數(shù)據(jù)庫的結(jié)構(gòu)設(shè)計是其中非常重要的一個環(huán)節(jié)。 數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的好壞將直接對應(yīng)用系統(tǒng)的效率以及實現(xiàn)的效果產(chǎn)生影響。所以在盡量全面考慮用戶的各種需求的前提下，進行了數(shù)據(jù)庫設(shè)計。 、數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計 數(shù)據(jù)庫需求分析是數(shù)據(jù)庫結(jié)構(gòu)設(shè)計的第一個階段，是非常重要的一個階段。這個階段主要是確定基本數(shù)據(jù)、數(shù)據(jù)結(jié)構(gòu)以及數(shù)據(jù)處理的流程，組成一份詳盡的數(shù)據(jù)字典，為以后進一步設(shè)計打好基礎(chǔ)。 對一個數(shù)據(jù)管理員來說，設(shè)計良好的數(shù)據(jù)庫應(yīng)使之開始于一個合理的邏輯設(shè)計。概念模型是用戶和數(shù)據(jù)庫設(shè)計人員之間進行交流的工具 根據(jù)上面的設(shè)計規(guī)劃的實體有：職工基本信息實體、工資項目設(shè)置信息 實體、職工應(yīng)發(fā)款信息實體、職工代扣款信息實體、職工工資信息實體。 、 數(shù)據(jù)庫設(shè)計 數(shù)據(jù)庫 中 共有 18 張表，如 圖 31 所示。 其中 分為 12 張 主 表 ,分別為： t_br（基本檔案表）、 t_login（操作員登錄記錄表）、 系統(tǒng)用戶 （用戶表）、 AttendanceInfo（員工考勤信息表）、 LeaveInfo(員工請假信息 )、 OvertimeInfo(員工加班信息 ) 、 BasicSar（基本工資設(shè)定表）、 kouchu（扣除）、 timekaoqin（記時考勤）、 salarysta（產(chǎn)品單價設(shè)定表） 、 salary（員工工 資表） 、 YGZJS（月工資結(jié)算表） 等 詳細信息如下 。 15 圖 31 數(shù)據(jù)庫表 各個實體具體的描述 ER 圖如下。 基本檔案表 t_br ER 模型 如圖 32 所示， 系統(tǒng)用戶 ER 模型如 圖 33 所示 ， 員工考勤信息表 AttendanceInfo ER 模型如 圖 34 所示 。 圖 32 基本檔案表 ER圖 工 號 姓名 性別 部門 薪金 所學(xué)專業(yè) 合同終止時間 合同開始時間 基本檔案表 t_br 職務(wù) 工資類別 職工類型 生日 工齡 年齡 文化程度 民族 政治面貌 身份證號 手機 籍貫 照片 16 圖 33 系統(tǒng)用戶 圖 34 員工考勤信息表 AttendanceInfo 系統(tǒng) 用戶 用戶名稱 用戶密碼 管理 圓 否 工號 姓名 當(dāng)前日期 出入標(biāo)志 上班時間 下班時間 遲到次數(shù) 早退次數(shù) 員工請假信息 LeaveInfo 17 職工 基本檔案表 t_br，其結(jié)構(gòu)如 表 31 所示。保存員工的相關(guān)信息，是管理系統(tǒng)核心數(shù)據(jù)，所有其它的信息都是依附與這張表而存在的。 以 工號 作為主關(guān)鍵字， 盡量減少數(shù)據(jù)的冗余，保證數(shù)據(jù)的一致性。 表 31 基本檔案表 t_br 字段 類型 長度 必填字段 工號 文本 6 是 姓名 文本 10 是 性別 文本 10 是 部門 文本 10 是 薪金 數(shù)字 10 是 所學(xué)專業(yè) 文本 20 是 職務(wù) 文本 10 否 工資類別 數(shù)字 10 是 合同開始時間 日期 /時間 是 合同終止時間 日期 /時間 是 職工類型 文本 10 是 生日 日期 /時間 否 工齡 數(shù)字 10 否 年齡 數(shù)字 3 是 文化程度 文本 10 否 民族 文本 10 否 政治面貌 文本 10 否 身份證號 文本 18 是 籍貫 文本 200 是 聯(lián)系電話 數(shù)字 15 否 手機 數(shù)字 15 是 家庭住址 文本 200 是 健康狀況 文本 10 是 照片 OLE 對象 否 18 員工考勤信息表， 其結(jié)構(gòu)如 表 32 所示。保存 員工考勤信息 的相關(guān)信息 。 此表數(shù)據(jù)只保存員工的出勤情況，并不包括每日生產(chǎn)產(chǎn)量的考勤信息。 表 32 員工考勤信息表 AttendanceInfo 字段 類型 長度 必填字段 工號 文本 6 是 姓名 文本 10 是 當(dāng)前日期 文本 10 是 出入標(biāo)志 文本 2 是 上班時間 日期 /時間 是 下班時間 日期 /時間 是 遲到次數(shù) 數(shù)字 10 否 早退次數(shù) 數(shù)字 10 否 LeaveInfo 員工請假 信息表， 其結(jié)構(gòu)如 表 33 所示。 用戶所有請假信息保存在此表中。工資結(jié)算時根據(jù)記錄進行扣除。 表 33 員工請假信息表 LeaveInfo 字段 類型 長度 必填字段 工號 文本 5 是 姓名 文本 10 是 病假天數(shù) 數(shù)字 長整型 是 事假天數(shù) 數(shù)字 長整型 是 假期開始時間 日期 /時間 是 19 員工加班信息表 ， 結(jié)構(gòu)如 表 34 所示。 為了方便系統(tǒng)的管理， 員工 加班信息同樣也作為一個獨立的表存儲。 表 34 員工 加班信息表 OverTimeInfo 字段 類型 長度 必 填字段 工號 文本 5 是 姓名 文本 10 是 特殊加班天數(shù) 數(shù)字 長整型 否 正常加班天數(shù) 數(shù)字 長整型 否 加班日期 日期 /時間 是 員工工資表，結(jié)構(gòu)如 表 35 所示。 該 表 即完成每日 產(chǎn)品 考勤，同時也保存 由系統(tǒng) 自動計算出的每天的員工工資，月底時只要匯總出 這些 每天的工資 和 即可。然后轉(zhuǎn)存到其它表作進一步處理。 表 35 員工工資表 salary 字段 類型 長度 必填字段 ID 自動編號 是 工號 文本 5 是 姓名 文本 10 是 工作日 日期 /時間 是 產(chǎn)品類型 一 文本 文本 否 產(chǎn)品類型二 文本 否 產(chǎn)品類型三 文本 否 數(shù)量一 數(shù)字 否 數(shù)量二 數(shù)字 否 數(shù)量三 數(shù)字 否 單價一 數(shù)字 否 單價二 數(shù)字 否 單價三 數(shù)字 否 每日匯總 數(shù)字 是 20 最后，設(shè)計數(shù)據(jù)庫時， 考慮 數(shù)據(jù)庫的安全性，防止非管理人員用第三方軟件打開數(shù)據(jù)庫，特對數(shù)據(jù)庫 文件 也進行了處理，將數(shù)據(jù)庫的 擴展名 mdb 替換為 ldl， 起到了一定的迷惑性。在改 擴展 名的同時也對數(shù)據(jù)庫進行了加密。 在用 ACCESS數(shù)據(jù)庫打開時要求輸入打開密碼 ， 如圖 35 所 示。 只有正確輸入打開密碼時才能打開數(shù)據(jù)庫。為了方便記憶， 本數(shù)據(jù)庫的打開密碼為： wlz。 圖 35 要求輸入密碼 21 第 四 章 各功能的實現(xiàn) 、 系統(tǒng)安全及權(quán)限的實現(xiàn) 為了確保系統(tǒng)的安全，對數(shù)據(jù)庫進行加密處理，采用了用戶和組管理，并記錄用戶登錄信息。擁有高級權(quán)限的用戶，可以創(chuàng)建不同的組，并可將全部或部分權(quán)限分配給創(chuàng)建 用戶 。 為了實現(xiàn)該功能，系統(tǒng)采用了遞歸方式，使高一級別的用戶可以管理低級用戶，最高權(quán)限屬于管理員。 具體描述如下 : 、 登錄窗口的實現(xiàn) 系統(tǒng)登陸時，要求正確輸入用戶名和密 碼。 成功登陸后顯示如圖 42 所示工資管理系統(tǒng)主界面。 用戶名分為管理員用戶和普通用戶。 如 圖 41 所示： 圖 41 登錄窗口 實現(xiàn) 功能的部分主要代碼： Private Sub Comok_Click() On Error GoTo Dealerror Dim strSql As String Dim strMsg As String 39。On Error GoTo Dealerror Dim objCn As New Connection str = CS() = str 22 Set objRs = New Recordset Set = objCn = adUseClient strSql = SELECT * FROM 系統(tǒng)用戶 strSql = Nothing Set objCn