operatelogunit.cpp

指纹门禁机管理系统

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "OperateLogUnit.h"
#include "DBAccessUnit.h"
#include "DMDataAccess.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "BaseLogUnit"
#pragma resource "*.dfm"
TOperaterLogFrm *OperaterLogFrm;
//---------------------------------------------------------------------------
__fastcall TOperaterLogFrm::TOperaterLogFrm(TComponent* Owner)
    : TBaseLogFrm(Owner)
{
}
//---------------------------------------------------------------------------
int __fastcall TOperaterLogFrm::QueryLogData()
{
  int lLogType = etNormalEvent;
  int lDeviceID;
  AnsiString lSQL = "select * from EventLog l,Employee e,Device d where l.DeviceID=d.DeviceID and MainEmpID=EmpID and EventType<>" + AnsiString(lLogType);;
  bool lOK;
  lOK = GetSelectedDeviceID(lDeviceID);
  if (lOK & lDeviceID != 0)
  {
     lSQL = lSQL + " and l.DeviceID =" + AnsiString(lDeviceID);
  }

  TDateTime lStartTime,EndTime;
  lOK = GetSelectedTime(lStartTime,EndTime);
  if (lOK)
  {
    lSQL = lSQL + " and EventTime between :BeginTime and :EndTime";
  }

  dmDatabase->adoLogData->Close();
  dmDatabase->adoLogData->SQL->Text = lSQL;
  if (lOK)
  {
    dmDatabase->adoLogData->Parameters->ParamByName("BeginTime")->Value = lStartTime;
    dmDatabase->adoLogData->Parameters->ParamByName("EndTime")->Value = EndTime;
  }
  try
  {
    dmDatabase->adoLogData->Open();
  }
  catch(...)
  {
    return  DBAccess_E;
  }
  sbInfo->Panels->Items[0]->Text = " 共查询到记录总数：" + dmDatabase->adoLogData->RecordCount;
  return OK;
}

//---------------------------------------------------------------------------
int __fastcall TOperaterLogFrm::ClearLogData()
{
  bool lOK;
  int lDeviceID;
  lOK = GetSelectedDeviceID(lDeviceID);
  int lRV;
  if (lOK)
  {
       AnsiString lMsg;
       if (lDeviceID == 0)
       {
          if (Application->MessageBoxA("您确认要清除电脑里所有的日志吗?","提示信息",MB_YESNO + MB_ICONWARNING) == ID_NO)
             return lRV;
          lRV = aDBAccess.ClearOperateLog();
       }
       else
       {
          lMsg = "您确认要删除所有 " + edtCurDeviceName->Text + " 设备的日志吗？";
          if (Application->MessageBoxA(lMsg.c_str(),"提示信息",MB_OK + MB_ICONWARNING) == ID_NO)
             return lRV;
          lRV = aDBAccess.ClearOperateLog(lDeviceID);
       }

       if (lRV == OK)
       {
          Application->MessageBoxA("清除电脑日志成功！","提示信息",MB_OK + MB_ICONINFORMATION);
       }
       else
       {
          Application->MessageBoxA("清除电脑日志失败！","提示信息",MB_OK + MB_ICONERROR);
       }
  }
  return lRV;
}
//---------------------------------------------------------------------------