vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Mails senden, abrufen und decodieren - ganz easy ;-)  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2014
 
zurück
Rubrik: Windows/System09.05.01
GetWindowsDirectory-Funktion

Diese Funktion liefert das Laufwerk und den Verzeichnisnamen für das Windows zurück.

Betriebssystem:  Win95, Win98, WinNT, Win2000, WinMEViews:  4.830 

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:
lpBufferErwartet einen ausreichend großen Bufferstring, welcher dann das Windowsverzeichnis enthält.
nSizeGibt 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

Diese Seite wurde bereits 4.830 mal aufgerufen.

nach obenzurück
 
   

Druckansicht Druckansicht Copyright ©2000-2014 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.

Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel