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
|