Gewusst wie: der Pfad und ein Office-Anwendung von Visual C++-Version

Dieser Artikel beschreibt, wie Sie die Registrierung zur Laufzeit den Installationspfad und die Version von Office-Anwendung bestimmen untersuchen können.

Jede Office-Anwendung ist eine Version zugeordnet unabhängige ProgID und CLSID. Sie können die Registrierung auf Schlüssel mit eines Servers CLSID und ProgID den Installationspfad und die Version von der Serveranwendung bestimmen untersuchen.

• Der Pfad zu der Serveranwendung finden Sie unter:

    HKEY_CLASSES_ROOT\CLSID\{xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxx}\LocalServer32
  						

  , wobei {Xxxxxxxx-Xxxx-Xxxx-Xxxx-Xxxxxxxxxx} darstellt den die CLSID des Servers.
  
  
• Entsprechend der Version abhängige ProgID für die registrierte Version für die Serveranwendung befindet sich am:

  HKEY_CLASSES_ROOT\sss.sss\CurVer
  						

  sss.sss steht, in denen die Version unabhängige ProgID des Servers.

Schritte zum Beispiel erstellen

1. Erstellen einer MFC-Appwizard- mit dem Namen Office-Pfad . Wählen Sie im Schritt 1 des Anwendungs-Assistent Dialog Based und klicken Sie auf Fertig stellen .
2. Klicken Sie auf die Registerkarte Ressourcen und öffnen Sie das Dialogfeld IDD_OFFICEPATH_DIALOG .
3. Entfernen Sie die OK und Abbrechen-Schaltflächen im Dialogfeld.
4. Fügen Sie ein Bearbeitungsfeld auf das Dialogfeld und nennen Sie es IDC_PROGID .
5. Zwei Befehlsschaltflächen im Dialogfeld hinzufügen. Name der Befehlsschaltflächen IDPATH und IDVERSION und legen Sie die Beschriftungen auf GetPath und GetVersion bzw..
6. Starten Sie Klassen-Assistenten .
7. Fügen Sie einen Funktionshandler an die BN_CLICKED -Nachricht eines jede Befehlsschaltfläche.
8. Erstellen Sie eine Membervariable für Bearbeitungsfeld IDC_PROGID. Name der Member-Variable M_ProgID , und geben Steuerelement für die Kategorie und CEdit für den Variablentyp.
9. Schließen Sie die Klassen-Assistenten.
10. Der Datei OfficePathDlg.h der COfficePathDlg-Klasse fügen Sie die folgenden öffentlichen Member-Funktionen hinzu:
    

      static BOOL GetPath(LPOLESTR szApp, LPSTR szPath, ULONG cSize);
      static BOOL GetVersion(LPCTSTR szApp, LPSTR szVersion, ULONG cSize);

11. Fügen Sie die folgenden Funktionsdefinitionen OfficePathDlg.cpp:
    

    void COfficePathDlg::OnPath() 
    {	
        LPOLESTR szwApp;
        char szLocation[255], szApp[50];
        
        // Get ProgID from EditBox
        m_ProgID.GetWindowText(szApp, 50);
        if (strcmp(szApp,"") == 0)
        {
    	MessageBox("Type ProgID in EditBox", "Error");
    	return;
        }
        // Find number ofcharacters to be allocated
        int len = strlen(szApp) + 1;
    
        // Use OLE Allocator to allocate memory
        szwApp = (LPOLESTR) CoTaskMemAlloc(len*2);
        if (szwApp == NULL)
        {
    	MessageBox("Out of Memory", "Error");
    	return;
        }
    
        //	AnsiToUnicode conversion
        if (0 == MultiByteToWideChar(CP_ACP, 0, szApp, len,
                 szwApp, len))
        {
           // Free Memory allocated to szwApp if conversion failed
           CoTaskMemFree(szwApp);
           szwApp = NULL;
           MessageBox("Error in Conversion", "Error");
           return;
        }
    
        // Get Path to Application and display it
        if (!GetPath(szwApp, szLocation, 255))
    	MessageBox("Error Getting Path", "Error");
        else
    	MessageBox(szLocation, "Path");	
    }
    
    void COfficePathDlg::OnVersion() 
    {
        CHAR szVersion[255], szApp[50];	
        // Get Version of Application
        m_ProgID.GetWindowText(szApp, 50);
        
        if (strcmp(szApp,"") == 0)
        {
    	MessageBox("Type ProgID in EditBox", "Error");
    	return;
        }
    	
        // Get Version and display it
        if (!GetVersion(szApp, szVersion, 255)) 
      	MessageBox("Error Getting Version", "Error");
    
        else
    	MessageBox(szVersion, "Version");
    }
    
    BOOL COfficePathDlg::GetPath(LPOLESTR szApp, LPSTR szPath, ULONG cSize)
    {
        CLSID clsid;
        LPOLESTR pwszClsid;
        CHAR  szKey[128];
        CHAR  szCLSID[60];
        HKEY hKey;
    
        // szPath must be at least 255 char in size
        if (cSize < 255)
    	return FALSE;
    	
        // Get the CLSID using ProgID
        HRESULT hr = CLSIDFromProgID(szApp, &clsid);
        if (FAILED(hr))
        {
    	AfxMessageBox("Could not get CLSID from ProgID, Make sure ProgID is correct", MB_OK, 0);
            return FALSE;
        }
    
        // Convert CLSID to String
        hr = StringFromCLSID(clsid, &pwszClsid);
        if (FAILED(hr))
        {
    	AfxMessageBox("Could not convert CLSID to String", MB_OK, 0);
            return FALSE;
        }
    
        // Convert result to ANSI
        WideCharToMultiByte(CP_ACP, 0, pwszClsid, -1, szCLSID, 60, NULL, NULL);
    
        // Free memory used by StringFromCLSID
        CoTaskMemFree(pwszClsid);
    
        // Format Registry Key string
        wsprintf(szKey, "CLSID\\%s\\LocalServer32", szCLSID);
    
        // Open key to find path of application
        LONG lRet = RegOpenKeyEx(HKEY_CLASSES_ROOT, szKey, 0, KEY_ALL_ACCESS, &hKey);
        if (lRet != ERROR_SUCCESS) 
        {
    	// If LocalServer32 does not work, try with LocalServer
            wsprintf(szKey, "CLSID\\%s\\LocalServer", szCLSID);
            lRet = RegOpenKeyEx(HKEY_CLASSES_ROOT, szKey, 0, KEY_ALL_ACCESS, &hKey);
    	if (lRet != ERROR_SUCCESS) 
            {
                AfxMessageBox("No LocalServer Key found!!", MB_OK, 0);
                return FALSE;
            }
        }
    
        // Query value of key to get Path and close the key
        lRet = RegQueryValueEx(hKey, NULL, NULL, NULL, (BYTE*)szPath, &cSize);
        RegCloseKey(hKey);
        if (lRet != ERROR_SUCCESS)
        {
    	AfxMessageBox("Error trying to query for path", MB_OK, 0);
            return FALSE;
        }
    
        // Strip off the '/Automation' switch from the path
        char *x = strrchr(szPath, '/');
        if(0!= x) // If no /Automation switch on the path
        {
        int result = x - szPath; 
        szPath[result]  = '\0';  // If switch there, strip it
        }   
        return TRUE;
    }
    
    BOOL COfficePathDlg::GetVersion(LPCTSTR szApp, LPSTR szVersion, ULONG cSize)
    {
        CHAR  szKey[128], szValueName[128];
        HKEY hKey, hKey1;  
        
        wsprintf(szKey, "%s", szApp);
        LONG lRet = RegOpenKeyEx(HKEY_CLASSES_ROOT, szKey, 0, KEY_ALL_ACCESS, &hKey);
        if (lRet != ERROR_SUCCESS) {
    	// Word is registered, but no local server can be found!!!
    	AfxMessageBox("Could not get CLSID from ProgID, Make sure ProgID is correct", MB_OK, 0);
            return FALSE;
    	}
    
        wsprintf(szValueName, "%s", "CurVer");
        lRet = RegOpenKeyEx(hKey, szValueName, 0, KEY_ALL_ACCESS, &hKey1);
        if (lRet != ERROR_SUCCESS) {
    	// Excel is registered, but no local server can be found!!!
            return FALSE;
    	}
    
        // Get the Version information
        lRet = RegQueryValueEx(hKey1, NULL, NULL, NULL, (BYTE*)szVersion, &cSize);
    
        // Close the registry keys
    
        RegCloseKey(hKey1);
        RegCloseKey(hKey);
    
        // Error while querying for value
        if (lRet != ERROR_SUCCESS)
           return FALSE;
    
        // At this point szVersion contains the ProgID followed by a number. 
        // For example, Word 97 will return Word.Application.8 and Word 2000 will return Word.Application.9
    
    	
        // Store the version number
        char *x = strrchr(szVersion, '.');
        szVersion[0] = *(x + 1);
        szVersion[1] = '\0';
    	
        if (strcmp(szVersion, "6") == 0)
    	strcpy(szVersion, "Version 95");
    	else if (strcmp(szVersion, "8") == 0)
    		strcpy(szVersion, "Version 97");
    		else if  (strcmp(szVersion, "9") == 0)
    			strcpy(szVersion, "Version 2000");
    			else if (strcmp(szVersion,?1?) == 0)
    			strcpy(szVersion, ?Version 2002?);
    
    			else
    			strcpy(szVersion, "Version unknown");
        return TRUE;
    
    }

12. Erstellen Sie das Projekt.

Wenn Sie die Anwendung ausführen, geben Sie die ProgID für eine Office-Anwendung im Bearbeitungsfeld. Hinweis: ein Beispiel für eine ProgID ist Word.Application . Klicken Sie auf die Schaltfläche GetPath , um den Pfad abrufen und klicken Sie zum Abrufen der registrierten Version GetVersion .

Zusätzliche Hinweise

Wenn Sie mehrere Versionen von Office-Anwendung auf Ihrem System installiert haben, entspricht die Versionsnummer der Anwendung, die registriert ist. In den meisten Fällen ist die registrierte Version der letzten Version ausführen.

Wenn der Server-Anwendung nicht installiert ist, fehl, die Aufrufe an die zugehörigen Registrierungsschlüssel öffnen. Sie können Fehlerbehandlung in dieser Situation verwenden, um festzustellen, ob der Server-Anwendung installiert ist.