【文章內容簡介】 等字段其結構表如表 410 所示 表 410 考勤管理表 字段名 類型 是否允許空 說明 自編號 nvarchar 50 否 遞增的流水號 員工編號 nvarchar 50 否 員工編號 員工姓名 nvarchar 50 否 員工姓名 考勤年份 int 否 考勤年份 考勤月份 int 否 考勤月份 1 號 nvarchar 10 否 本月 1 日 2 號 nvarchar 10 否 本月 2 日 3號 nvarchar 10 否 本月 3 日 29 號 nvarchar 10 否 本月 29 日 30 號 nvarchar 10 否 本月 30 日 31 號 nvarchar 10 否 本月 31 日 11 員工工資核算表用于存放員工的工資信息包括自編號員工編號員工姓名基本工資津貼獎金工齡工資崗位工資其它應增項所得稅養(yǎng)老險醫(yī) 療險住房基金其它應減項實發(fā)工資說明等字段其結構表如表 411 所示 表 411 員工工資核算表 字段名 類型 是否允許空 說明 自編號 nvarchar 50 否 遞增的流水號 員工編號 nvarchar 50 否 員工編號 員工姓名 nvarchar 50 否 員工姓名 基本工資 float 否 員工基本工資 津貼 float 否 員工津貼 獎金 float 是 員工獎金 工齡工資 float 是 員工工齡工資 崗位工資 float 是 員工崗位工資 其它應增項 float 是 其它應增項目 所得稅 float 是 應繳所得稅 養(yǎng)老險 float 是 應繳養(yǎng)老險 醫(yī)療險 float 是 應繳醫(yī)療險 住房基金 float 是 扣除住房基金 其它應減項 float 是 其它應減項目 實發(fā)工資 float 否 實發(fā)工資數 說明 nvarchar 300 是 說明信息 5 系統各模塊的實現 51 系統登錄模塊的實現 企業(yè)人事管理系統登錄窗體如圖 51 所示 圖 51 管理程 序登錄窗體 當用戶輸入用戶名和密碼時在登錄的 click 事件中通過 Select COUNT From 操作用戶 Where 用戶名稱 用戶名稱 ND 用戶密碼 用戶密碼語句來判斷用戶輸入的用戶名和密碼是否正確若不正確則將定義的 MyTryCount 變量用于記錄登錄的次數自動加 1 并提示用戶名稱或用戶密碼有誤您還有次機會當MyTryCount 變量大于 3 的時候執(zhí)行連接斷開語句系統退出不能登錄若密碼正確則根據 Select From 操作用戶 Where 用戶名稱 thisMyOpertor 語句在 操作用戶表中找到相應的用戶名和密碼對應的權限進入系統并通過thisMyOpertor 所連接到的不同字符串來進行用戶的分權限進入系統 [7] 輸入用戶名或密碼有誤部分的具體實現代碼如下 StringMySQLConnectionString globlMyPersorsonnelConnectionString string MySQL Select COUNT From 操作用戶 Where 用戶名稱 用戶名稱 ND 用戶密碼 用戶密碼 SqlConnection MyConnection new SqlConnection MySQLConnectionString MyConnectionOpen SqlCommnd MyCommnd new SqlCommnd MySQL MyConnection MyCo SqlPrmeter MySqlNmePrmeter new SqlPrmeter MySqlNmePrmeterPrmeterNme 用戶名稱 MySqlNmePrmeterVlue this 用戶名稱 TextBoxText MyCo MySqlNmePrmeter SqlPrmeter MySqlPWPrmeter new SqlPrmeter MySqlPWPrmeterPrmeterNme 用戶密碼 MySqlPWPrmeterVlue this 用戶密碼 TextBoxText MyCo MySqlPWPrmeter int MyCount int MyCommndExecuteSclr if MyCount 1 thisClose else thisMyTryCount 1 if thisMyTryCount 3 int MyDoCount 3 thisMyTryCount MessgeBoxShow 用戶密碼或用戶名稱有錯還有 MyDoCount 次機會168。 信息提示 MessgeBoxButtonsOK MessgeBoxIconInformtion this 用戶密碼 TextBoxText this 用戶名稱 TextBoxText else 退出系統 3Button_Click null null 當輸入的用戶名和密碼均正確的時候執(zhí)行選擇用戶權限的 操作具體實現代碼如下 String MySQLConnectionString globlMyPersorsonnelConnectionString string MySQL Select From 操作用戶 Where 用戶名稱 thisMyOpertor SqlConnection MyConnection new SqlConnection MySQLConnectionString MyConnectionOpen DtTble MyTble new DtTble SqlDtdpter Mydpter new SqlDtdpter MySQL MyConnection MydpterFill MyTble if int MyTbleRows[0][人事管理之基本檔案 ] 0 this 基本檔案 ToolStripMenuItemVisible flse this 基本檔案 ToolStripSeprtorVisible flse 圖 52 主窗體 其實現的重點代碼如下 String MySQLConnectionString globlMyPersorsonnelConnectionString string MySQL Select From 公司信息 SqlConnection MyConnection new SqlConnection MySQLConnectionString MyConnectionOpen DtTble MyTble new DtTble SqlDtdpter Mydpter new SqlDtdpter MySQL MyConnection MydpterFill MyTble MyBgPhoto pplictionStrtupPth \\Dt\\ String MyTbleRows[0][管理系統背景照片 ] 53 系統人事基本檔案及相關模塊的實現 人事基本檔案及相關模塊用來對員工的基本檔案家庭信息工作簡歷獎懲記錄培訓記錄離職記錄等進行添加修改刪除的操作為了更好的進行查詢操作本界面設計了模糊查詢的功能 [8]人事基本檔案窗體運行結果圖如圖 53 所示 圖 53 人事基本檔案管理窗體 本窗體通過在 BindingNvigtor中添加相應的 Button控件和 Label控件首先來看本窗體查詢功能的實現在連接成功數據庫后用戶單擊查詢 Button 的按鈕響應其 click事件通過 ToolStripTextBoxText方法獲取文本框中的信息并與 This MyPer sonnelDtSet 基檔案 DataGridView 控件中顯示相關信息若遇到異常情況則通過 Messgeboxshow 系統異常請聯系管理員 來提示用戶中止操作以防治數據的丟失其次本窗體的添加功能實現用戶在單擊添加按鈕時在自編號的 Label 中實現了一個自動獲取編號的功能在定義的變量 MyLength 中通過 MyLength MyIDToString Length 獲取字段的長度進而通過 Switch 語句來控制自編號的位數自編號獲取成功后用戶添加相應的信息至文本框隨后調用保存按鈕的 click事件在保存的 click事件中先進行了一個判斷操作 If boxtext 則 Messgeboxshow 文本框為空請核對后再執(zhí)行保存操作 此判斷操作結束后執(zhí)行 this 基本檔案 Tbledpter Updte thismyPersonnelDtSet 基本檔案 MyCommndCommndText delete From 基本檔案 where 姓名 姓名 try this 基 本 檔 案 TbledpterFillByll thismyPersonnelDtSet 基 本 檔案 ddPercent 姓名 ToolStripTextBoxText ddPercent 性別224。 etoolStripComboBoxSelectedItem ddPercent 部門toolStripComboBoxSelectedItem ddPercent 民族toolStripComboBoxSelectedItem ddPercent 職稱toolStripComboBoxSelectedItem ddPercent 政 治 面 貌2toolStripComboBoxSelectedItem ddPercent 婚姻狀況toolStripComboBoxSelectedItem ddPercent 文 化 程 度toolStripComboBoxSelectedItem ddPercent 籍貫 toolStripTextBoxText this 基本檔案 TbledpterFill thismyPersonnelDtSet 基本檔案 thismyPersonnelDCler MyConnectionOpen SqlCommnd MyCommnd MyConnectionCreteCommnd MyCommndCommndText delete From 基本檔案 where 姓名 姓名 MyCommndCommndText Select mx 自編號 最大編號 From 基本檔案 object MyResult MyCommndExecuteSclr Int64 MyID 1 if M