考勤管理系统 vb+access

有详细的源代码 可以运行的系统 功能强大

// AttDlg.cpp : implementation file
//

#include “stdafx.h“
#include “Attendance.h“
#include “AttDlg.h“
#include “AttendanceDlg.h“
#include “PersonRS.h“

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

extern CDatabase db;
/////////////////////////////////////////////////////////////////////////////
// CAttDlg dialog


CAttDlg::CAttDlg（CWnd* pParent /*=NULL*/）
	: CDialog（CAttDlg::IDD pParent）
{
	// 设置起始时间
	CTime End_t=CTime::GetCurrentTime（）; // 当前时间
	CTimeSpan tp（30000）; // 时间间隔为30天
	//{{AFX_DATA_INIT（CAttDlg）
	m_StartTime = End_t-tp;
	m_EndTime = End_t;
	m_strPersonID = _T（““）;
	m_strName = _T（““）;
	m_bSeekbyperson = FALSE;
	m_bSeekbytime = FALSE;
	//}}AFX_DATA_INIT
}


void CAttDlg::DoDataExchange（CDataExchange* pDX）
{
	CDialog::DoDataExchange（pDX）;
	//{{AFX_DATA_MAP（CAttDlg）
	DDX_DateTimeCtrl（pDX IDC_DATETIMEPICKER1 m_StartTime）;
	DDX_DateTimeCtrl（pDX IDC_DATETIMEPICKER2 m_EndTime）;
	DDX_Text（pDX IDC_EDT_SEEKPERSONID m_strPersonID）;
	DDX_Text（pDX IDC_EDT_SEEKPERSONNAME m_strName）;
	DDX_Check（pDX IDC_CHK_SEEKBYPERSON m_bSeekbyperson）;
	DDX_Check（pDX IDC_CHK_SEEKBYTIME m_bSeekbytime）;
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP（CAttDlg CDialog）
	//{{AFX_MSG_MAP（CAttDlg）
	ON_EN_CHANGE（IDC_EDT_SEEKPERSONID onchangeEdtSeekpersonid）
	//}}AFX_MSG_MAP
END_MESSAGE_MAP（）

/////////////////////////////////////////////////////////////////////////////
// CAttDlg message handlers

BOOL CAttDlg::OnInitDialog（） 
{
	CDialog::OnInitDialog（）;
	
	// TODO: Add extra initialization here
	m_Sheet.AddPage（&m_Page1）; // 加第1页
	m_Sheet.AddPage（&m_Page2）; // 加第2页
	m_Sheet.AddPage（&m_Page3）; // 加第3页
	m_Sheet.AddPage（&m_Page4）; // 加第4页

	m_Sheet.Create（this WS_CHILD | WS_VISIBLE 0）; // 创建窗口
	m_Sheet.ModifystyleEx （0 WS_EX_CONTROLPARENT）; // 修改风格
	m_Sheet.Modifystyle（ 0 WS_TABSTOP ）; // 修改风格

	// 设置窗口位置
	m_Sheet.SetWindowPos（ NULL 0 100 0 0 
			SWP_NOZORDER | SWP_NOSIZE | SWP_NOACTIVATE ）;
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CAttDlg::onchangeEdtSeekpersonid（） 
{
	UpdateData（）; // 更新数据

	CPersonRS rs（&db）; // 构造记录集
	rs.m_strFilter = “ID=‘“ + m_strPersonID + “‘“; // 设置过滤条件
	rs.Open（）; // 打开记录集
	if（rs.GetRecordCount（）==1） // 判断员工记录是否存在
	{
		m_strName=rs.m_NAME; // 得到员工姓名
	}
	else m_strName.Empty（）; // 清除员工姓名的显示
	rs.Close（）; // 关闭记录集
	UpdateData（FALSE）; // 更新界面数据
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2656  2002-08-12 00:48  考勤管理系统\Code\AttDlg.cpp

     文件       1623  2002-08-12 00:46  考勤管理系统\Code\AttDlg.h

     文件      53152  2002-08-14 01:38  考勤管理系统\Code\Attendance.aps

     文件      11015  2002-08-26 05:56  考勤管理系统\Code\Attendance.clw

     文件       2953  2002-08-11 00:26  考勤管理系统\Code\Attendance.cpp

     文件       6573  2002-08-12 00:58  考勤管理系统\Code\Attendance.dsp

     文件        543  2002-08-08 10:14  考勤管理系统\Code\Attendance.dsw

     文件       1398  2002-08-09 04:23  考勤管理系统\Code\Attendance.h

     文件     189440  2002-09-12 18:34  考勤管理系统\Code\Attendance.ncb

     文件      49664  2006-06-01 20:23  考勤管理系统\Code\Attendance.opt

     文件       3916  2002-09-12 18:34  考勤管理系统\Code\Attendance.plg

     文件      17992  2002-08-14 01:38  考勤管理系统\Code\Attendance.rc

     文件       6082  2002-08-11 03:53  考勤管理系统\Code\AttendanceDlg.cpp

     文件       1751  2002-08-11 03:49  考勤管理系统\Code\AttendanceDlg.h

     文件       1461  2002-08-10 05:20  考勤管理系统\Code\AttendanceRS.cpp

     文件       1346  2002-08-10 03:54  考勤管理系统\Code\AttendanceRS.h

     文件       1351  2002-08-10 01:37  考勤管理系统\Code\CounterRS.cpp

     文件       1309  2002-08-10 01:37  考勤管理系统\Code\CounterRS.h

     文件       1823  2002-08-09 04:14  考勤管理系统\Code\Crypt.cpp

     文件        611  2002-08-05 09:52  考勤管理系统\Code\Crypt.h

     文件       1368  2002-08-10 01:24  考勤管理系统\Code\DepartRS.cpp

     文件       1308  2002-08-10 01:24  考勤管理系统\Code\DepartRS.h

    ....SHR         8  2007-01-06 21:20  考勤管理系统\Code\Desktop_.ini

     文件       1476  2002-08-10 16:11  考勤管理系统\Code\ErrandRS.cpp

     文件       1334  2002-08-10 15:57  考勤管理系统\Code\ErrandRS.h

     文件       1446  2002-08-10 16:11  考勤管理系统\Code\LeaveRS.cpp

     文件       1319  2002-08-10 06:35  考勤管理系统\Code\LeaveRS.h

     文件       2306  2002-08-10 01:28  考勤管理系统\Code\LoginDlg.cpp

     文件       1261  2002-08-09 04:16  考勤管理系统\Code\LoginDlg.h

     文件       1427  2002-08-10 06:10  考勤管理系统\Code\OvertimeRS.cpp

............此处省略63个文件信息