Returns a list of key settings and their respective values (originally created with SaveSetting) from an application's entry in the Windows registry.
Using the My feature gives you greater productivity and performance in registry operations than GetAllSettings. For more information, see.
Public Function GetAllSettings( _ ByVal AppName As String, _ ByVal Section As String _ ) As String(,)
Required. String expression containing the name of the application or project whose key settings are requested.
Required. String expression containing the name of the section whose key settings are requested. GetAllSettings returns an object that contains a two-dimensional array of strings. The strings contain all the key settings in the specified section, plus their corresponding values.
See the "Error number" column if you are upgrading Visual Basic 6.0 applications that use unstructured error handling. (You can compare the error number against the.) However, when possible, you should consider replacing such error control with .
GetAllSettings returns an uninitialized Object if either AppName or Section does not exist.
Because it operates under the HKEY_LOCAL_USER registry key, which is not active until a user logs on interactively, GetAllSettings requires that a user be logged on.
Registry settings that are to be accessed from a non-interactive process (such as Mtx.exe) should be stored under either the HKEY_LOCAL_MACHINE\Software\ or the HKEY_USER\DEFAULT\Software registry keys.
This example first uses the SaveSetting function to make entries in the Windows registry for the application specified as AppName, then uses the GetAllSettings function to display the settings. Note that application names and Section names cannot be retrieved with GetAllSettings. Finally, the DeleteSetting function removes the application's entries.
' 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")
Assembly: Visual Basic Runtime Library (in Microsoft.VisualBasic.dll)