Функция GetSystemDirectory

Declare Function GetSystemDirectory Lib "kernel32.dll" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Платформа

Win 95/98, Win NT

GetSystemDirectory возвращает путь системного каталога Windows. В системном каталоге хранятся очень важные файлы,в том числе API *.dll. Этот путь,как правило "C:\Windows\System",но не забывайте,что каталог самой Windows может называться,например Win98. Путь к системному каталогу содержится в строковой переменной lpBuffer. Функция в успешном случае возвращает длину возвращаемой строки или 0 в случае ошибки.

Параметры

lpBuffer
Строка,содержащая путь к системному каталогу
nSize
Длина lpBuffer в символах.

Пример

' показываем путь к системному каталогу
Dim sysdir As String  ' путь к системному каталогу
Dim slength As Long  ' длина возвращаемой строки

sysdir = Space(255)  ' отводим место для получения строки в буфере
slength = GetSystemDirectory(sysdir, 255)
sysdir = Left(sysdir, slength)  ' получаем имя из буфера
Debug.Print "Путь системного каталога: "; sysdir

Схожие функции

GetWindowsDirectory

Категория

Системная информация
В начало.
Рекламный шар на крыше здания
Рекламное агентство полного цикла. Сайт о рекламном креативе и пиаре
aeroreclama.ru