GetAllSettings-Funktion

Hinweis : Die Funktion, die Methode, das Objekt oder die Eigenschaft, die bzw. das in diesem Thema erläutert wird, ist deaktiviert, falls der Ausdrucksdienst in Microsoft Jet im geschützten Modus (Sandkastenmodus) ausgeführt wird. In diesem Modus wird die Auswertung von potenziell unsicheren Ausdrücken verhindert. Weitere Informationen zum geschützten Modus erhalten Sie, wenn Sie in der Hilfe nach "Sandkastenmodus" suchen.

Gibt eine Liste mit Schlüsseleinstellungen und ihre jeweiligen Werte (die ursprünglich mit SaveSetting erstellt wurden) aus dem Eintrag einer Anwendung in der Windows-Registrierung oder (auf dem Macintosh) aus Informationen in der Initialisierungsdatei der Anwendung zurück.

Syntax

GetAllSettings(appname, section)

Die GetAllSettings-Funktionssyntax verwendet die folgenden Argument

Argument

Beschreibung

appname

Erforderlich. Zeichenfolgenausdruck, der den Namen der Anwendung oder das Projekt enthält, dessen Schlüsseleinstellungen angefordert werden. Auf dem Macintosh ist dies der Dateiname der Initialisierungsdatei im Ordner Einstellungen.

section

Erforderlich. Zeichenfolgenausdruck, der den Namen des Abschnitts enthält, dessen Schlüsseleinstellungen angefordert werden. GetAllSettings gibt einen Wert vom Typ Variant-Datentyp zurück, dessen Inhalt ein zweidimensionales Matrix von Zeichenfolgen ist, die alle Schlüsseleinstellungen im angegebenen Abschnitt und ihre entsprechenden Werte enthalten.


Hinweise

GetAllSettings gibt eine nicht initialisierte Variant-Variable zurück, wenn weder appname noch Abschnitt vorhanden sind.

Beispiel

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic für Applikationen). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerhilfe in der Dropdownliste neben Suchen, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

Dieses Beispiel verwendet die SaveSetting-Anweisung, um Einträge in der Windows-Registrierung für die Anwendung vorzunehmen, die als appname angegeben wird, dann die GetAllSettings-Funktion, um die Einstellungen anzuzeigen. Beachten Sie, dass mit GetAllSettings keine Anwendungsnamen und Abschnittsnamen abgerufen werden können. Mit der DeleteSetting-Anweisung werden Anwendungseinträge schließlich entfernt.

' Variant to hold 2-dimensional array returned by GetAllSettings
' Integer to hold counter.
Dim MySettings As Variant, intSettings As Integer
' Place some settings in the registry.
SaveSetting appname := "MyApp", section := "Startup", _
key := "Top", setting := 75
SaveSetting "MyApp","Startup", "Left", 50
' Retrieve the settings.
MySettings = GetAllSettings(appname := "MyApp", section := "Startup")
For intSettings = LBound(MySettings, 1) To UBound(MySettings, 1)
Debug.Print MySettings(intSettings, 0), MySettings(intSettings, 1)
Next intSettings
DeleteSetting "MyApp", "Startup"
Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×