Rubrik: Windows/System | 09.05.01 |
GetWindowsDirectory-Funktion Diese Funktion liefert das Laufwerk und den Verzeichnisnamen für das Windows zurück. | ||
Betriebssystem: Win95, Win98, WinNT, Win2000, WinME | Views: 9.916 |
Beschreibung:
Diese Funktion liefert das Laufwerk und den Verzeichnisnamen für das Windows zurück. Da man nicht davon ausgehen darf, daß jeder Anwender das Betriebssystem auf C:\Windows installiert hat, sollte man immer diese Funktion verwenden, wenn man gezielt auf das Windowsverzeichnis zugreifen möchte/muss.
Deklaration:
Declare Function GetWindowsDirectory Lib "kernel32.dll" _ Alias "GetWindowsDirectoryA" ( _ ByVal lpBuffer As String, _ ByVal nSize As Long) As Long
Parameter:
lpBuffer | Erwartet einen ausreichend großen Bufferstring, welcher dann das Windowsverzeichnis enthält. |
nSize | Gibt die Größe des reservierten Buffers in Bytes an (Länge/Anzahl Zeichen). |
Rückgabewert:
War der Funktionsaufruf erfolgreich enthält lpBuffer den Verzeichnisnamen des Windowsverzeichnisses und der Funktionsrückgabewert die Länge (Anzahl der Zeichen) des Verzeichnisses. Tritt ein Fehler auf, wird 0 zurückgegeben.
Beispiel:
Private Declare Function GetWindowsDirectory Lib "kernel32.dll" _ Alias "GetWindowsDirectoryA" ( _ ByVal lpBuffer As String, _ ByVal nSize As Long) As Long
Private Sub Command1_Click () Dim RetVal As Long Dim WinDir As String WinDir = Space$(256) RetVal = GetWindowsDirectory(WinDir, Len(WinDir)) If RetVal <> 0 Then Debug.Print "Windowsverzeichnis: " & Left$(WinDir, RetVal) End If End Sub