检查本功能是否在Excel中运行

 

BOOL g_bParentIsNotEXCEL_EXE = FALSE;
BOOL isNotEXCEL_EXE( DWORD dwProcessID )
{
  HANDLE hProcessSnap;
  PROCESSENTRY32 pe32;

  // Take a snapshot of all processes in the system.
  hProcessSnap = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 );
  if( hProcessSnap == INVALID_HANDLE_VALUE )
  {
    return( FALSE );
  }

  // Set the size of the structure before using it.
  pe32.dwSize = sizeof( PROCESSENTRY32 );

  // Retrieve information about the first process, and exit if unsuccessful
  if( !Process32First( hProcessSnap, &pe32 ) )
  {    
    CloseHandle( hProcessSnap );    // Must clean up the  snapshot object!
    return( FALSE );
  }

  // Now walk the snapshot of processes, and display information about each process in turn
  do
  {

    if( pe32.th32ProcessID == dwProcessID )
    {
        CString strExeFile = pe32.szExeFile;    
        //AfxMessageBox( strExeFile);
        strExeFile.MakeUpper();
        if( strExeFile != _T("EXCEL.EXE") && strExeFile != _T("MATLAB.EXE"))
        {
            CloseHandle( hProcessSnap );    // Must clean up the  snapshot object!
            return TRUE;            
        }
        break;
    }    
  } while( Process32Next( hProcessSnap, &pe32 ) );
  CloseHandle( hProcessSnap );    // Must clean up the  snapshot object!
  return FALSE;
}

 

    HMODULE hModule = LoadLibrary(L"NTdll.dll");
    if (hModule)
    {        
        NTSTATUS (__stdcall *NtQueryInformationProcess) (
                IN HANDLE ProcessHandle,
                IN PROCESSINFOCLASS ProcessInformationClass,
                OUT PVOID ProcessInformation,
                IN ULONG ProcessInformationLength,
                OUT PULONG ReturnLength OPTIONAL
        );
          
        (FARPROC &)NtQueryInformationProcess = GetProcAddress(hModule, "NtQueryInformationProcess");
        if (NtQueryInformationProcess)
        {
            DWORD dwProcessID = GetCurrentProcessId();         
                
            HANDLE hProcess = OpenProcess(PROCESS_QUERY_INFORMATION,FALSE,dwProcessID);
            if( NULL != hProcess )    
            {
                LONG status;
                PROCESS_BASIC_INFORMATION pbi;
                status = NtQueryInformationProcess( hProcess,ProcessBasicInformation,(PVOID)&pbi,sizeof(PROCESS_BASIC_INFORMATION),NULL );
                if (!status)
                {                
                    g_bParentIsNotEXCEL_EXE = isNotEXCEL_EXE( ( DWORD )pbi.Reserved3 );
                }
            }            
        }
    }