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,  );

   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 );

                 }

             }

         }

     }