Anwendungs-/ System- und spezielle Verzeichnisse Mit diesen Einzeilern ermitteln Sie das aktuelle Anwendungsverzeichnis, das Windowsverzeichnis und spezielle Systemverzeichnisse
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  24.381
https://www.tools4vb.com	System:  WinNT, Win2k, Win8, Win10, Win11	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 20 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.7 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Heute möchten wir Ihnen ein paar "Einzeiler" vorstellen, mit denen sich das Programm-/Anwendungsverzeichnis, Windowsverzeichnis und spezielle Systemverzeichnisse ermitteln lassen.

' aktuelles Anwendungsverzeichnis, aus dem die EXE-Datei gestartet wurde
Dim sPath As String = New IO.FileInfo(Application.ExecutablePath).DirectoryName

' System-Verzeichnis
Dim sPath As String = Environment.SystemDirectory

' Windows-Verzeichnis
Dim sPath As String = New IO.DirectoryInfo(Environment.SystemDirectory).Parent.FullName

' Verzeichnis für temporäre Dateien
Dim sPath As String = IO.Path.GetTempPath()

Weitere spezielle Verzeichnisse
Über die Environment.GetFolderPath-Eigenschaft lassen sich die wichtigsten Systemverzeichnisse ermitteln. Als Parameter wird eine der "SpecialFolder"-Konstanten erwartet.

Nachfolgend ein paar Beispiele:

' Anwendungsdaten
Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData)

' Programme\Gemeinsame Dateien
Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.CommonProgramFiles)

' AutoStart
Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup)

' Desktop
Dim sPath As String = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory)