Функция GetAllSettings

Статья
11/05/2008

Обновлен: Ноябрь 2007

Возвращает список параметров ключей и соответствующих значений (созданных вместе с SaveSetting) из записи приложения в реестре Windows.

Использование свойства My предоставляет большую производительность и быстродействие в операциях с реестром файлов, по сравнению с функцией GetAllSettings. Дополнительные сведения см. в разделе Объект My.Computer.Registry.

Public Function GetAllSettings( _
   ByVal AppName As String, _ 
   ByVal Section As String _
) As String(,)

Параметры

AppName
Обязательный компонент. Выражение String, содержащее имя приложения или проекта, параметры ключей которого запрашиваются.
Section
Обязательный компонент. Выражение String, содержащее имя раздела, параметры ключей которого запрашиваются.GetAllSettings возвращает объект, содержащий двумерный массив строк. Строки содержат все параметры указанного раздела, а также соответствующие им значения.

Исключения

Тип исключения	Номер ошибки	Условие
ArgumentException	5	Пользователь не выполнил вход в систему.

См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic версии 6.0, в которых используется неструктурированная обработка ошибок. (Номер ошибки можно сравнить со значением Свойство Number (объект Err).) Тем не менее, по возможности следует заменить эту систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.

Заметки

GetAllSettings возвращает неинициализированный Object, если или AppName, или Section не существует.

Так как эта функция работает с разделом реестра HKEY_LOCAL_USER, который становится активным только при интерактивном входе в систему, то для GetAllSettings пользователю необходимо выполнить вход в систему.

Параметры реестра, доступные из неинтерактивного процесса (например Mtx.exe) должны быть сохранены в разделе реестра HKEY_LOCAL_MACHINE\Software\ или HKEY_USER\DEFAULT\Software.

Пример

В данном примере функция SaveSetting применяется для выполнения записи в реестре Windows для приложения, указанного как AppName, а затем используется функция GetAllSettings для отображения параметров. Обратите внимание, что имена приложений и Section не могут быть получены с помощью функции GetAllSettings. Наконец, функция DeleteSetting удаляет записи приложения.

' Object to hold 2-dimensional array returned by GetAllSettings.
' Integer to hold counter.
Dim MySettings(,) As String
Dim intSettings As Integer
' Place some settings in the registry.
SaveSetting("MyApp", "Startup", "Top", "75")
SaveSetting("MyApp", "Startup", "Left", "50")
' Retrieve the settings.
MySettings = GetAllSettings("MyApp", "Startup")
For intSettings = LBound(MySettings, 1) To UBound(MySettings, 1)
   WriteLine(1, MySettings(intSettings, 0))
   WriteLine(1, MySettings(intSettings, 1))
Next intSettings
DeleteSetting("MyApp")