【正文】 Box 你已經(jīng)超過最大登陸次數(shù)！退出系統(tǒng) , vbOKOnly + vbCritical, 系統(tǒng)登錄 End Else 用戶名 =39。 vbCrLf amp。刪除記錄 strSql = delete * from t_br where 工號 =39。 查找數(shù)據(jù)庫，讀取記錄 If = Then 39。 ) (下午下班時間 ) = CDate( amp。 (出入標志 ) = aflag (遲到次數(shù) ) = ilate MsgBox 已完成添加上班信息 , vbOKOnly + vbInformation, 添加結果！ Unload Me Exit Sub End If 39。根據(jù)需要進行字段限制 If = True Then If = Then MsgBox 產(chǎn)品類型不能為空 TextFocus Combo1 Exit Sub End If If = True Then 。 amp。 amp。二進制模式 .Open .LoadFromFile strFileName End With (照片 ) = Else End If 30 Set rs = Nothing = True Call DisabledControl = True MsgBox 添加成功 If blnDel Then If tmpPath Then Kill tmpPath End If End If Call RefreshGrid End Sub 、 員工考勤信息的實現(xiàn) 、 設置員工上下班時間 在 該窗體中輸入相應的上下班信息，具體如 圖 44 所示，相應部分代碼如下 ： 圖 44 設置上下班時間 31 Private Sub cmdOK_Click() 39。 \ If Not IsNull((照片 ).Value) Then Set iStm = New With iStm .Mode = adModeReadWrite .Type = adTypeBinary .Open .Write (照片 ).Value .SaveToFile tmpPath blnDel = True End With strFileName = tmpPath 39。) Set objRs = ExecuteSQL(strSql, strMsg) Unload Me End If End If End If End If End If Logontimes = Logontimes + 1 39。 用戶名分為管理員用戶和普通用戶。工資結算時根據(jù)記錄進行扣除。 、數(shù)據(jù)庫概念結構設計 數(shù)據(jù)庫需求分析是數(shù)據(jù)庫結構設計的第一個階段，是非常重要的一個階段。 在用戶暫時離開時可鎖定操作畫面，防止非法操作。 10 ? 新建一個數(shù)據(jù)庫 創(chuàng)建任何一個數(shù)據(jù)庫的第一步是仔細的規(guī)劃數(shù)據(jù)庫，設計必須是靈活的、有邏輯的。系統(tǒng)程序大體可分成四個模塊：數(shù)據(jù)輸入、根據(jù)查詢、數(shù)據(jù)打印和通訊。 (2) 對象 (Object) 對象是 VB 系統(tǒng)內(nèi)部提供給設計者可以直接使用的處理輸出的控制工具。重點的說明了系統(tǒng)設計的重點、設計思想、難點技術和解決方案 。如果拒絕執(zhí)行，則向用戶返回錯誤信息。內(nèi)模式也 稱存儲模式，它是數(shù)據(jù)物理結構和存儲結構的描述，是數(shù)據(jù)在數(shù)據(jù)庫內(nèi)部的表示方式。運行結果證明，本企業(yè)工資管理系統(tǒng)極大提高了工作效率，節(jié)省了人力和物力，最終滿足企業(yè)財務管理、員工工資發(fā)放的需要，同時也成為現(xiàn)代化企業(yè)管理的標志 、 系統(tǒng)說明 、 數(shù)據(jù)模型分析 數(shù)據(jù)庫是某個企業(yè)、組織或部門所設計的數(shù)據(jù)的一個綜合，它不僅 要反映數(shù)據(jù)本身的內(nèi)容，而且要反映數(shù)據(jù)之間的聯(lián)系。在朝這個思想靠近的過程中，在許多小的細節(jié)上還存在著很多不足。模塊組成主要包括該工資系統(tǒng)的主要組成模塊以及每個模塊所要達到的功能。早期工資管理多采取紙質(zhì)材料和具有較強的時間限制。 三級模式結構是指數(shù)據(jù)庫系統(tǒng)是由外模式、模式和內(nèi)模式三級構成，如圖 所示。從最終用戶角度看，數(shù)據(jù)庫系統(tǒng)分為單用戶結構、主從式結構、分布式結構和客戶 /服務器結構。數(shù)據(jù)庫運行控制程序：負責數(shù)據(jù)庫運行過程中的控制和管理。 美國微軟公司在 1991年推出 6個版本， win9x或 winme， win2021， winxp， windowsNT 等操作系統(tǒng)下，是一個 32 位的應用程序開發(fā)工具。 (5) 方法 (Method) 方法主要是指對一個對象使用某 種作用的過程。 本系統(tǒng)就用了 Cool 工具中的 Statubar 控件，在系統(tǒng)這一界面中，添加了狀態(tài)欄，在第一個欄中，在樣式這一欄中選擇了文本，在第二個欄中，選擇了系統(tǒng)日期，第三個欄中選擇了系統(tǒng)時間，這樣，任何時候操作本系統(tǒng)，都可以看到當前的時間和日期。 11 第 二 章 概要設計 、 系統(tǒng)概述 縱觀各企業(yè) 工資管理 軟件、一個好的企業(yè) 工資 管理軟件，應具有簡單友好的操作界面、安全性好的數(shù)據(jù)庫、分級用戶權限管理、強大數(shù)據(jù)導出及備份功能、聯(lián)機幫肋文檔。 幫助部分，為幫助主題，版本信息和關于。 表 31 基本檔案表 t_br 字段 類型 長度 必填字段 工號 文本 6 是 姓名 文本 10 是 性別 文本 10 是 部門 文本 10 是 薪金 數(shù)字 10 是 所學專業(yè) 文本 20 是 職務 文本 10 否 工資類別 數(shù)字 10 是 合同開始時間 日期 /時間 是 合同終止時間 日期 /時間 是 職工類型 文本 10 是 生日 日期 /時間 否 工齡 數(shù)字 10 否 年齡 數(shù)字 3 是 文化程度 文本 10 否 民族 文本 10 否 政治面貌 文本 10 否 身份證號 文本 18 是 籍貫 文本 200 是 聯(lián)系電話 數(shù)字 15 否 手機 數(shù)字 15 是 家庭住址 文本 200 是 健康狀況 文本 10 是 照片 OLE 對象 否 18 員工考勤信息表， 其結構如 表 32 所示。 圖 35 要求輸入密碼 21 第 四 章 各功能的實現(xiàn) 、 系統(tǒng)安全及權限的實現(xiàn) 為了確保系統(tǒng)的安全，對數(shù)據(jù)庫進行加密處理，采用了用戶和組管理，并記錄用戶登錄信息。 39。 amp。數(shù)字型 If = Then (薪金 ) = 0 Else (薪金 ) = End If If = Then (所學專業(yè) ) = Null Else (所學專業(yè) ) = 28 End If 39。 : amp。 : amp。 : amp。 : amp。添加上班信息 If InFlag = True Then If = Or = Then MsgBox 要添加上班信息 ,員工編號與姓名不能為空 ,請輸入 , vbOKOnly, 提示 Exit Sub End If 39。 : amp。 amp。 如 圖 43 所示 圖 43 員工 基本檔案 信息 錄入窗口 25 相應部分代碼如下 ： 39。MsgBox 歡迎使用工資 管理系統(tǒng) , vbOKCancel + vbOKOnly, 系統(tǒng)登錄 strusername = txtUserName userpassword = txtPassword If CmbStatus = Then MsgBox 請選擇登陸身份 !, vbOKOnly + vbCritical, 系統(tǒng)登錄 Else If = 0 And objRs!admin = True Then UserAdmin = 1 End If If = 0 And objRs!admin = False Then 23 X = MsgBox(你不是管理員，將以普通用戶登陸 , vbOKCancel + vbOKOnly, 系統(tǒng)登錄 ) End If If X = 2 Then = = Else 39。在改 擴展 名的同時也對數(shù)據(jù)庫進行了加密。 基本檔案表 t_br ER 模型 如圖 32 所示， 系統(tǒng)用戶 ER 模型如 圖 33 所示 ， 員工考勤信息表 AttendanceInfo ER 模型如 圖 34 所示 。 刪除考勤信息：分為刪除上下班信息和刪除其它考勤信息。一個更高級的連接形式稱為自連接。 CoolBar 就是一個可以在窗體上浮動的工具，同時也是其他 ActiveX 的容器。比如，對象的名稱、在屏幕上顯示的位置、大小、顏色、接收或容納的數(shù)據(jù)內(nèi)容及數(shù)據(jù)的表現(xiàn)格式等。程序的規(guī)模小到簡單的個人數(shù)據(jù)庫應用，大到復雜的企業(yè)的多層次分布式系統(tǒng)，都可以使用 VB 進行開發(fā)，其友好的集成開發(fā)界面，可視化的雙向開發(fā)模式，良好的數(shù)據(jù)庫應用支持高效的程序開發(fā)和程序運行，備受廣大程序開發(fā)人員的好評。數(shù)據(jù)定義語言及其翻譯處理程序：首先用數(shù)據(jù)定義語言定義數(shù)據(jù)庫的模式、存儲模式、外模式、各級模式間的映射、有關的約束條件等。模式 /內(nèi)模式映象定影 了數(shù)據(jù)全局邏輯結構與存儲結構之間的對應關6 系。關系模型的數(shù)據(jù)5 操縱包括查詢、插入、刪除和更新數(shù)據(jù)。工資管理既涉及到企業(yè)勞動人事的管理，同時也是企業(yè)財務管理的重要組成部分。在事業(yè)單位以往的工資錄入中，計算、合計等需要通過大量的手工完成，數(shù)據(jù)量多，處理速度慢，而且極易出錯，導致工作效率低。工資管理系統(tǒng)軟件作為一種管理軟件正在各企事業(yè)單位中得到越來越廣泛的應用。 數(shù)據(jù)模型有良種不同的類型：概念模型和數(shù)據(jù)模型。外模式 /模式映象定義了外模式與模式之間的對應關系。操作系統(tǒng)執(zhí)行后，將數(shù)據(jù)送至系統(tǒng)緩沖區(qū)。 作為數(shù)據(jù)庫系統(tǒng)的開發(fā)， VB 是一個非常理想選擇。正確使用對象可以減少程序和開發(fā)時間，提高程序設計者的工作效率。 實現(xiàn)菜單選項 菜單是程序最重要的特性之一，大多數(shù)程序都依賴一個定義良好的菜單使程序易于使用和維護， Visual Basic 也提供了 強大的創(chuàng)建菜單功能是程序更加標準。這三種操作均可由 Visual Basic 創(chuàng)建的程序來完成，下面的章節(jié)將詳細描述實現(xiàn)的具體方法。 修改員工考勤信息 ： 當考勤信息出現(xiàn)錯誤需要修改的時候，可以從這里修改相應的記錄。 、 數(shù)據(jù)庫設計 數(shù)據(jù)庫 中 共有 18 張表，如 圖 31 所示。 該 表 即完成每日 產(chǎn)品 考勤，同時也保存 由系統(tǒng) 自動計算出的每天的員工工資，月底時只要匯總出 這些 每天的工資 和 即可。 txtUserNam