【正文】 ADODataSet::GetFields()//用來獲取記錄集中字段的集合{ return m_DataSetGetFields()。 m_DataSetget_State(amp。}BOOL CADODataSet::Open(CString SQLStr)//打開數(shù)據(jù)集{ if (IsOpen()) m_DataSetClose()。 m_Connection = NULL。}。//設置記錄集的數(shù)據(jù)庫連接對象 BOOL Open(CString SQLStr)。//添加新紀錄 BOOL Next()。//獲取記錄集行號 void move(int nIndex)。//數(shù)據(jù)集接口指針 CADOConnection *m_Connection。State)。 return Str。Integrated Security=SSPI。 m_ConnectionOpen((_bstr_t)ConStr,adModeUnknown)。}。}CADOConnection::~CADOConnection()//~CADOConnection方法是構造方法，用于取消OLE 的初始化和釋放_Connection接口指針{ if (IsOpen()) m_ConnectionClose()。CADOConnection類的實現(xiàn)代碼如下：CADOConnection * GetConnection()//GetConnection函數(shù)是一個全局函數(shù)，用于返回全局數(shù)據(jù)庫連接對象的的指針{ return amp。//獲取SQL連接字符串 BOOL Open(CString ConStr)。protected: _ConnectionPtr m_Connection。在系統(tǒng)中建立了ADO的兩個公共類CADOConnection和CADODataSet,。g) 系統(tǒng)運行穩(wěn)定、安全可靠。c) 可以錄入員工信息、部門信息。216。b) 部門信息錄入c) 人員信息管理d) 考勤信息錄入e) 考勤信息匯總。 開發(fā)背景 某公司業(yè)務不斷發(fā)展，員工數(shù)量不斷增加，人事考勤方面的管理已成為公司管理中的重要部分，但傳統(tǒng)的人事考勤制度已不能有效地管理員工的出勤狀況，急需一套人事考勤管理的有效工具——人事考勤管理系統(tǒng)。216。2) 系統(tǒng)功能描述用戶需要輸入用戶名和密碼進入人事考勤管理系統(tǒng)，對各部門、員工的基本信息進行維護和管理。 三、系統(tǒng)設計1) 系統(tǒng)目標 人事考勤管理系統(tǒng)以實現(xiàn)員工日常出勤信息管理為設計目標，加以強大的數(shù)據(jù)庫管理功能，可以極大地提高人事部門的日常工作效率。d) 對員工的考勤信息按月匯總計算。2) 系統(tǒng)功能結構 人事考勤管理系統(tǒng)的功能結構如圖所示：人事考勤管理系統(tǒng) 考勤數(shù)據(jù)錄入考勤信息匯總用戶管理部門信息管理員工信息管理3) 業(yè)務流圖人事考勤管理系統(tǒng)業(yè)務流程圖如圖：用戶登錄 部門、員工信息 維 護考 勤 信 息 匯 總 查 詢考 勤 信 息 錄 入4) 系統(tǒng)預覽： 人事考勤管理系統(tǒng)由多個功能模塊組成，下面僅列出一些典型的功能模塊，其他模塊以后陸續(xù)列出：a) 部門管理模塊如圖：主要管理各部門之間的結構信息b) 用戶管理模塊如圖:用于用戶的一些操作管理c) 人員信息管理如圖:主要用于維護員工的基本信息d) 考勤管理模塊如圖: 用于記錄人事考勤的信息e) 考勤匯總查詢?nèi)鐖D: 對員工的考勤信息進行匯總統(tǒng)計5) 數(shù)據(jù)庫設計A. 數(shù)據(jù)庫分析人事考勤系統(tǒng)采用SQL Server 2008 數(shù)據(jù)庫，數(shù)據(jù)庫名稱為 tb_person 在數(shù)據(jù)庫中建立四個表存儲不同的信息，如圖：B. 數(shù)據(jù)庫邏輯設計a) 管理員信息表（tab_user），用于保存管理員的信息，如圖：b) 部門信息表（tab_Dept）用于記錄部門的信息，如圖： C) 考勤信息表（tab_check）用于記錄考勤信息c) 員工信息表（tab_Employees）保存公司員工信息，如圖：216。A．CADOConnection類 CADOConnection類是用來連接數(shù)據(jù)庫的，實現(xiàn)了對_Connection接口的封裝。//指針接口public: BOOL IsOpen()。//建立數(shù)據(jù)庫連接 CADOConnection()。g_Connection。 m_Connection = NULL。void CADOConnection::UnInitADO()//UnInitADO是一個靜態(tài)方法，用于取消初始化OLE{ if (ConCount == 0) CoUninitialize()。 return IsOpen()。Persist Security Info=False。}_ConnectionPtr CADOConnection::GetConnection()//該方法用于返回_Connection接口指針{ return m_Connection。 if (State == adStateOpen) return true。//數(shù)據(jù)庫連接對象public: BOOL Open(CString SQLStr,int LockType)。//移動記錄指針 void Save()。//記錄集指針指向下一個記錄 FieldsPtr GetFields()。//打開記錄集 CADODataSet()。CADODataSet類的實現(xiàn)如下： CADODataSet::CADODataSet()//該方法為記錄集實現(xiàn)類的構造方法，在該方法中實現(xiàn)記錄集接口對象的創(chuàng)建{ ()。}void CADODataSet::SetConnection(CADOConnection *pCon)//設置記錄集所連接的數(shù)據(jù)庫連接類的對象{ m_Connection = pCon。 //*/ m_DataSetOpen(_bstr_t(SQLStr), _variant_t((IDispatch*)(), true), adOpenKeyset, adLockOptimistic, adCmdText)。State)。}BOOL CADODataSet::Next()//記錄集指針下移一位{ if (m_DataSetadoEOF) return false。}void CADODataSet::SetFieldValue(CString FieldName, _variant_t Value)//想記錄集中指定的字段賦值{ m_DataSetPutCollect((_bstr_t)FieldName,Value)。}int CADODataSet::GetRecordNo()//獲取記錄集中的當前行號{ return m_DataSetAbsolutePosition。 return IsOpen()。 CLoginDialog logindlg。C. 實現(xiàn)過程a. 創(chuàng)建一個對話框b. 向?qū)υ捒蛑刑砑觾蓚€靜態(tài)文本控件、一個編輯框控件、和兩個按鈕控件。 (GetConnection())。 i count。 return TRUE。 (Select * From tab_user Where UserName = 39。, user,pass)。 } else AfxMessageBox(用戶名或密碼不正確！)。 for (int i = 0 。 (i,no)。 (UserName,(_bstr_t))。 (no1)。 }}d. 修改按鈕代碼：void CUserManage::OnEdit() { CUserEdit useredit。 if (() == IDOK) { (UserName,(_bstr_t))。 八、部門管理模塊設計A． 概述：該模塊記錄了部門間的的層次結構和部門信息，一般使用樹控件實現(xiàn)，如圖: B． 實現(xiàn)過程：a. 創(chuàng)建一個對話框b. 向?qū)υ捒蛑刑砑酉鄳目丶. 給對話框添加對話框類d. 給類添加函數(shù)及成員變量e. 給控件關聯(lián)變量f. 編寫函數(shù) C. 相關代碼如下： BOOL CDeptManage::OnInitDialog() //初始化函數(shù){ CDialog::OnInitDialog()。 } 將部門信息一次性讀入樹控件中。 CString str。 int ID。i++) { node = ((_bstr_t)()Item[DeptName]Value,pNode)。 GetNode(node,ID)。 GetNode(TVI_ROOT,0)。 if () pID = 0。 (Select top 1 * From tab_Dept)。 (PID,(long)pID)。代碼如下void CDeptManage::OnEdit() {CDeptEdit deptedit。 int pID = (pNode)。 (Select * From tab_Dept where id = %d,pID)。 if (() == IDOK) { (DeptName,(_variant_t))。 } }當單擊“刪除”按鈕時，將刪除當前選中的節(jié)點，代碼如下：void CDeptManage::OnDelete() { HTREEITEM pNode = ()。 (::GetConnection())。 ()。 九、人員信息管理模塊設計A． 概述：人員信息管理模塊根據(jù)部門分類顯示人員，同時可對人員信息進行維護，界面如下： B． 實現(xiàn)過程：a． 創(chuàng)建對話框b． 向?qū)υ捒蛑刑砑酉鄳目丶． 給對話框添加對話框類d． 給類添加函數(shù)及成員變量e． 給控件關聯(lián)變量C. 相關代碼：GetNode方法，獲取部門信息，并添加到樹控件中。 CString str。 int ID。i++) { node = ((_bstr_t)()Item[DeptName]Value,pNode)。 GetNode(node,ID)。 node = (全部,TVI_ROOT)。代碼如下：void CPersonManage::UpdatePerson(){()。 if (m_DeptID == 1) (Select * From tab_Employees)。 int n = 0。i++) { int index = 1。 (n,index++,(_bstr_t)()Item[Emp_NAME]Value)。 (n,index++,(_bstr_t)()Item[Political_Party]Value)。 (n,index++,(_bstr_t)()Item[Office_phone]Value)。 (n,index++,(_bstr_t)()Item[Memo]Value)。 n++。 if (() == IDOK) { CADODataSet dataset。 ()。 (Nationality,(_bstr_t))。 (Marital_Condition,(_bstr_t))。 (HireDate,(_bstr_t)(%Y%m%d))。 (Hukou,(_bstr_t))。 UpdatePerson()。 CADODataSet dataset。 (str)。 = (char *)(_bstr_t)()Item[Nationality]Value。 int dd=atoi((9,2))。 = (char *)(_bstr_t)()Item[Culture_Level]Value。 = (char *)(_bstr_t)()Item[Mobile]Value。 int dd=atoi((9,2))。 = (