【導(dǎo)讀】息化管理，使用計(jì)算機(jī)系統(tǒng)代替復(fù)雜的手工方式來(lái)管理考勤事務(wù)?？梢杂行У毓芾砉締T工的出勤情況，規(guī)范人事制度管理，保證公司正常的工作，是人力資源管理的重要組成部分。統(tǒng)用戶管理模塊。為工具軟件，數(shù)據(jù)庫(kù)為SQLServer2021。系統(tǒng)采用目前比較流行的ADO. 面向?qū)ο蟮某绦蛟O(shè)計(jì)思想應(yīng)用到數(shù)據(jù)庫(kù)應(yīng)用程序中。

　　

【正文】 if () 39 pID = 0。 else pID = (pNode)。 CADODataSet dataset。 (::GetConnection())。 (Select top 1 * From tab_Dept)。 ()。 (DeptName,(_variant_t))。 (memo,(_variant_t))。 (PID,(long)pID)。 ()。 UpdateDept()。 } } 當(dāng)單擊“修改”按鈕時(shí)將彈出部門(mén)編輯窗體，輸入部門(mén)信息后單擊“確定”按鈕將添加一個(gè)新的部門(mén)，代碼如下： void CDeptManage::OnEdit() { CDeptEdit deptedit。 = false。 HTREEITEM pNode = ()。 40 if (pNode == 0) return。 int pID = (pNode)。 CADODataSet dataset。 (::GetConnection())。 CString str。 (Select * From tab_Dept where id = %d,pID)。 (str)。 = (char *)(_bstr_t)()Item[LDeptName]Value。 = (char *)(_bstr_t)()Item[memo]Value。 if (() == IDOK) { (DeptName,(_variant_t))。 (memo,(_variant_t))。 ()。 UpdateDept()。 } } 當(dāng)單擊“刪除”按鈕時(shí)將刪除當(dāng)前選中的節(jié)點(diǎn)，代碼如下： void CDeptManage::OnDelete() { HTREEITEM pNode = ()。 if (pNode == 0) 41 return。 if (MessageBox(是否刪除此記錄！ ,提示 , MB_YESNO|MB_ICONWARNING) == IDYES) { int pID = (pNode)。 CADODataSet dataset。 (::GetConnection())。 CString str。 (Select * From tab_Dept where id = %d,pID)。 (str)。 ()。 ()。 UpdateDept()。 } } 人員信息管理模塊 人員信息管理模塊根據(jù)部門(mén)分類(lèi)顯示，同時(shí)可對(duì)人員信息進(jìn)行維護(hù)。人員信息管理界面 如圖 49 所示。 在人員信息管理界面中可以看到，左側(cè)是部門(mén)信息，右側(cè)是人員信息。當(dāng)選中某一部門(mén)信息分類(lèi)時(shí)右側(cè)的人員信息會(huì)根據(jù)選中的部門(mén)進(jìn)行人員信息的分類(lèi)顯示。這一 42 操作主要是通過(guò)數(shù)列表視圖控件中的 OnSelchanged 事件完成的，當(dāng)樹(shù)列表中的選中節(jié)點(diǎn)發(fā)生改變時(shí)就會(huì)觸發(fā)該事件，實(shí)現(xiàn)代碼如下： void CPersonManage::OnSelchangedTreedept(NMHDR * pNMHDR,LRESULT * pResult) { NM_TREEVIEW * pNMTreeView = (NM_TREEVIEW*)pNMHDR。 m_DeptID = (pNMTreeView)。 UpdatePerson()。 *pResult = 0。 } 創(chuàng)建一個(gè)對(duì)話框，打開(kāi)對(duì)話框?qū)傩源翱?，將?duì)話框的 ID改為 IDD_DLGPERSON,將對(duì)話框標(biāo)題改為“人員信息管理”。向?qū)υ捒蛑刑砑觾蓚€(gè)群組控件、一個(gè)樹(shù)列表視圖控件、一個(gè)列表視圖控件和 4個(gè)按鈕控件。分別設(shè)置按鈕的 Caption 屬性為“添加”、“修改”、“刪除”和“退出”。添加 GetNode 方法 獲取部門(mén)表中的數(shù)據(jù)信息添加到樹(shù)列表視圖控件中。該方法由 UpdateDept 方法調(diào)用，實(shí)現(xiàn)代碼如下： void CPersonManage::UpdatePerson() { ()。 CADODataSet DataSet。 (::GetConnection())。 CString str。 43 if(m_DeptID == 1) (Select * From tab_Employees)。 else (Select * From tab_Employees where Dept = %d,m_DeptID)。 (str)。 int count = ()。 int n = 0。 _variant_t value。 for(int i = 0。icount。i++) { int index = 1。 (n,(_bstr_t)()Item[Emp_Id]Value)。 value = ()Item[AutoID]Value。 (n,value,lVal)。 (n,index++,(_bstr_t)()Item[Emp_NAME]Value)。 (n,index++,(_bstr_t)()Item[Sex]Value)。 (n,index++,(_bstr_t)()Item[Nationality]Value)。 (n,index++,(_bstr_t)( 44 )Item[Birth]Value)。 (n,index++,(_bstr_t)()Item[Political_Party]Value)。 (n,index++,(_bstr_t)()Item[Culture_Level]Value)。 (n,index++,(_bstr_t)()Item[Marital_Condition]Value)。 (n,index++,(_bstr_t)()Item[Id_Card]Value)。 (n,index++,(_bstr_t)()Item[Office_phone]Value)。 (n,index++,(_bstr_t)()Item[Mobile]Value)。 (n,index++,(_bstr_t)()Item[HireDate]Value)。 (n,index++,(_bstr_t)()Item[Duty]Value)。 (n,index++,(_bstr_t)()Item[Memo]Value)。 (n,index++,(_bstr_t)()Item[Files_Keep_Org]Value)。 (n,index++,(_bstr_t)()Item[Hukou]Value)。 45 (n,index++,(_bstr_t)()Item[Family_Place]Value)。 n ++。 ()。 } } 添加 OnInitDialog 方法，用于初始化人員 信息管理界面中的數(shù)據(jù)。在該方法中顯示部門(mén)信息、人員信息，代碼如下： BOOL CPersonManage::OnInitDialog() { CDialog::OnInitDialog()。 m_DeptID = 1。 UpdateDept()。 int i = 0。 (i,人員編號(hào) )。 (i++,80)。 (i,人員名稱(chēng) )。 (i++,100)。 46 (i,性別 )。 (i++,50)。 (i,民族 )。 (i++,50)。 (i,出生日期 )。 (i++,100)。 (i,政治面貌 )。 (i++,100)。 (i,文化程度 )。 (i++,100)。 (i,婚姻狀況 )。 (i++,100)。 (i,身份證號(hào) )。 (i++,100)。 (i,辦公電話 )。 47 (i++,100)。 (i,手機(jī)電話 )。 (i++,100)。 (i,到崗日期 )。 (i++,100)。 (i,職務(wù) )。 (i++,100)。 (i,備注 )。 (i++,100)。 (i,家庭住址 )。 (i++,100)。 (i,檔案所在地 )。 (i++,100)。 (i,戶口所在地 )。 (i++,100)。 48 (LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES)。 UpdatePerson()。 return TRUE。 } 單擊“添加”按鈕，彈出人員編輯窗體，輸入人員信息后單擊“保存”按鈕實(shí)現(xiàn)人員信息添加，代碼如下： BOOL CPersonManage::OnInitDialog() { CDialog::OnInitDialog()。 m_DeptID = 1。 UpdateDept()。 int i = 0。 (i,人員編號(hào) )。 (i++,80)。 (i,人員名稱(chēng) )。 (i++,100)。 (i,性別 )。 49 (i++,50)。 (i,民族 )。 (i++,50)。 (i,出生日期 )。 (i++,100)。 (i,政治面貌 )。 (i++,100)。 (i,文化程度 )。 (i++,100)。 (i,婚姻狀況 )。 (i++,100)。 (i,身份證號(hào) )。 (i++,100)。 (i,辦公電話 )。 (i++,100)。 50 (i,手機(jī)電話 )。 (i++,100)。 (i,到崗日期 )。 (i++,100)。 (i,職務(wù) )。 (i++,100)。 (i,備注 )。 (i++,100)。 (i,家庭住址 )。 (i++,100)。 (i,檔案所在地 )。 (i++,100)。 (i,戶口所在地 )。 (i++,100)。 (LVS_EX_FULLROWSELECT|LVS_EX_GRIDLINES)。 51 UpdatePerson()。 return TRUE。 } 單擊“修改”按鈕，彈出人員編輯窗體，輸入人員信息后單擊“保存”按鈕實(shí)現(xiàn)人員信息修改，代碼如下： void CPersonManage::OnEdit() { if (() == 1) return。 int id = (())。 CPersonEdit personedit。 CADODataSet dataset。 (::GetConnection())。 CString str。 (select * from tab_Employees where autoid = %d,id)。 (str)。 = (char *)(_bstr_t)()Item[Emp_Id]Value。 = (char *)(_bstr_t)()Item[Emp_NAME]Value。 = (char 52 *)(_bstr_t)()Item[Sex]Value。 = (char *)(_bstr_t)()Item[Nationality]Value。 CString birth = (char *)(_bstr_t)()Item[Birth]Value。 if (!()) { //設(shè)置日期數(shù)據(jù) int yy=atoi((4))。 int mm=atoi((6,2))。 int dd=atoi((9,2))。 CTime tbirth(yy,mm,dd,0,0,0)。 = tbirth。 } = (char *)(_bstr_t)()Item[Political_Party]Value。 = (char *)(_bstr_t)()Item[Culture_Level]Value。 = (char *)(_bstr_t)()Item[Marital_Condition]Value。 = (char *)(_bstr_t)()Item[Id_Card]Value。 = (char 53 *)(_bstr_t)()Item[Office_phone]Value。 = (char *)(_bstr_t)()Item[Mobile]Value。 CString hire = (char *)(_bstr_t)()Item[HireDate]Value。 if (!()) {