Megjegyzés
A témakörben ismertetett függvény, metódus, objektum vagy tulajdonság le van tiltva, ha a Microsoft Jet Expression Service védőfalas üzemmódban fut, mivel ez megakadályozza az esetleg nem biztonságos kifejezések kiszűrését. A védőfalas üzemmódról a súgóban a „védőfalas üzemmód” kifejezésre keresve talál további információt.
A kulcsbeállítások listáját és a megfelelő értékeket adja vissza (eredetileg a SaveSetting módszerrel létrehozva) egy alkalmazás Windows beállításjegyzékbeli bejegyzéséből, vagy (Macintosh rendszeren) az alkalmazás inicializálási fájljából.
Szintaxis
GetAllSettings(alkalmazásnév, szakasz)
A GetAllSettings függvény szintaxisa az alábbi argumentumokat foglalja magában:
| Argumentum | Leírás: |
|---|---|
| appnév | Kötelező megadni. Annak az alkalmazásnak vagy projektnek a nevét tartalmazó karakterlánc-kifejezés, amelynek billentyűbeállításait a rendszer kéri. Macintosh rendszeren ez a System mappa Preferences mappájában található inicializálási fájl neve. |
| szakasz | Kötelező megadni. Karakterlánc-kifejezés, amely annak a szakasznak a nevét tartalmazza, amelynek billentyűbeállításait a rendszer kéri. A GetAllSettings függvény egy olyan Variantot ad vissza, amelynek tartalma kétdimenziós karakterláncokból álló tömb, amely tartalmazza a megadott szakasz összes kulcsbeállítását és a hozzájuk tartozó értékeket. |
Megjegyzések
A GetAllSettings nem inicializált Variantot ad vissza, ha az appname vagy a section nem létezik.
Példa
Megjegyzés
A következő példák egy Visual Basic for Applications (VBA) modulban mutatják be a függvény használatát. A VBA használatáról a Keresés elem mellett található legördülő listából a fejlesztői forrásokat választva, majd egy vagy több keresőszót megadva kaphat további tájékoztatást.
Ez a példa először a SaveSetting utasítás használatával elemeket hoz létre a Windows beállításjegyzékében az appname elemként megadott alkalmazáshoz, majd a GetAllSettings függvénnyel jeleníti meg a beállításokat. Vegye figyelembe, hogy az alkalmazás- és szakasznevek nem olvashatók le a GetAllSettings parancsmaggal. Végül a DeleteSetting utasítás eltávolítja az alkalmazás bejegyzéseit.
' 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"