Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Funktion "GetSystemDirectory"
Autor: JOMA
Datum: 19.06.03 10:50
'Notwendig für die Ermittlung des Windowsverzeichnisses Declare Function GetWindowsDirectory Lib "kernel32" Alias _ "GetWindowsDirectoryA" (ByVal lpBuffer$, ByVal nSize&) As Long 'Notwendig für die Ermittlung des Windowssystemverzeichnisse Declare Function GetSystemDirectory Lib "kernel32" Alias _ "GetSystemDirectoryA" (ByVal lpBuffer$, ByVal nSize&) As Long Public Function GetSystemDir() As String 'Ermittlung des Systemverzeichnisses 'z.B. c:\windows\system Dim s$, i% s = Space$(255) i = GetSystemDirectory(s, 255) GetSystemDir = Left(s, i) End Function Public Function GetWinDir() As String 'Ermittlung des Windowsverzeichnisse 'z.B. c:\windows Dim s$, i% s = Space$(255) i = GetWindowsDirectory(s, 255) GetWinDir = Left(s, i) End Function 0

Funktion "GetSystemDirectory"	100	gizzy	19.06.03 10:43
Re: Funktion "GetSystemDirectory"	560	JOMA	19.06.03 10:50
Re: Funktion "GetSystemDirectory"	48	gizzy	19.06.03 10:58
Re: Funktion "GetSystemDirectory"	515	JOMA	19.06.03 11:40

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen