Wie ermittelt man den Installationspfad und die Version von Access?

Dafür steht Ihnen die SysCmd-Methode zur Verfügung, welche Ihnen Informationen zu Microsoft Access und den zugehörigen Dateien/Objekten zurückgibt. Rufen Sie über eine Prozedur oder Funktion die SysCmd-Funktion auf und übergebe ihr den entsprechenden Parameter. Zum Beispiel: 

Public Function GetAccessDir() As String

   GetAccessDir = SysCmd(acSysCmdAccessDir)

End Function

Anbei noch eine kleine Übersicht der Konstanten und deren Bedeutungen: 

Konstante Bedeutung 
acSysCmdAccessDir Gibt das Installationsverzeichnis von Access zurück 
acSysCmdAccessVer  Gibt die Versionsnummer von Access zurück 
acSysCmdGetObjectState, Objekttyp, Objektname Ermittelt den Status eines angegebenen Datenbankobjekts. Als Rückgabe kann folgendes erfolgen:
acObjStateOpen Geöffnet 1 
acObjStateDirty Geändert, aber nicht gespeichert 2 
acObjStateNew Neu 4 
acSysCmdGetWorkgroupFile  Gibt den Pfad zur aktuellen Arbeitsgruppen-Datei zurück 
acSysCmdRuntime True = die aktuelle Datenbank wird unter der Runtime-Version von Access ausgeführt.
False = die aktuelle Datenbank wird unter der Vollversion ausgeführt. 

Alles weitere findet man in der VBA-Online-Hilfe: Stichwort SysCmd

Zurück zu Tipps und Tricks

All Rights Reserved 2006. http://www.rolffs.de Design by Rolffs WebDesign
Datenschutzerklärung