Функция GetPrivateProfileString

Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" ( _
    ByVal lpApplicationName As String, _
    ByVal lpKeyName As Any, _
    ByVal lpDefault As String, _
    ByVal lpReturnedString As String, _
    ByVal nSize As Long, _
    ByVal lpFileName As String) As Long

GetPrivateProfileString читает строковые значения из INI-файлов. Параметры, передаваемые функции, определяют значение для чтения. Функция всегда возвращает длину в символах строки, помещенной в переменную lpReturnedString. Если выполнение функции было успешно, чтение строки от INI файла будет помещено в lpReturnedString. Если нет, то вместо этого получит строку, данную как lpDefault. Обратите внимание, что поддержка INI -файлов обеспечивается в Windows для совместимости; для хранения информации используйте системный реестр

Параметры

lpApplicationName
Раздел - имя, заключенное в квадратные скобки [] и группирующее ключи и значения
lpKeyName
Значение ключа. Ключ должен быть уникальным только внутри своего раздела
lpDefault
Возвращаемое значение, если правильное(допустимое) значение не может читаться
lpReturnedString
Строка фиксированной длины, получаемая при чтении любой строки файла или lpDefault
nSize
Длина в символах переменной lpReturnedString
lpFileName
Имя INI-файла для чтения

Пример

' Скопируйте файл oeminfo.ini
' в папку C:\Samples
' читаем значение "Manufacturer" в секции [General] 
' INI-файла oeminfo.ini
' Значение  Manufacturer "Русский_Проект"
Dim uname As String  ' значение ключа, получаемое из файла
Dim slength As Long  ' длина получаемой строки

uname = Space(255)  ' обеспечиваем достаточно места для функции, чтобы поместить значение в буфер
' читаем INI-файл
slength = GetPrivateProfileString("general", "Manufacturer", "anonymous", uname, 255, "C:\Samples\oeminfo.ini")
uname = Left(uname, slength)  ' извлекаем нужную строчку из буфера
Debug.Print "Производитель: "; uname

Смотри также

GetPrivateProfileInt, GetProfileString, WritePrivateProfileString

Категория

Файлы INI