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.
Egy fájl, könyvtár vagy mappa attribútumait képviselő egész számot ad eredményül.
Szintaxis
GetAttr(elérési út)
A szükséges elérési útargumentuma egy karakterlánc-kifejezés, amely megad egy fájlnevet. Az elérési út tartalmazhatja a könyvtárat vagy mappát és a meghajtót is.
Visszatérési értékek
A GetAttr függvény által eredményül adott érték az alábbi attribútumértékek összege:
| Állandó | Érték | Leírás: |
|---|---|---|
| vbNormal | 0 | Normál. |
| vbReadOnly | 1 | Csak olvasható. |
| vbHidden | 2 | Rejtett. |
| vbSystem | 4 | Rendszerfájlt. Macintosh rendszeren nem érhető el. |
| vbDirectory | 16 | Könyvtár vagy mappa. |
| vbArchive | 32 | A fájl megváltozott a legutóbbi biztonsági mentés óta. Macintosh rendszeren nem érhető el. |
| vbAlias | 64 | A megadott fájlnév egy hivatkozási név (alias). Csak Macintosh rendszeren érhető el. |
Megjegyzés
Az állandókat a Visual Basic for Applications adja meg. A nevek bárhol használhatók a kódban a tényleges értékek helyett.
Megjegyzések
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.
A beállított attribútumok meghatározásához használja az And operátort a GetAttr függvény által visszaadott érték és a kívánt fájlattribútum értékének bitenkénti összehasonlításához. Ha az eredmény nem nulla, akkor a program ezt az attribútumot állítja be az elnevezett fájlhoz. Ha például az Archívum attribútum nincs beállítva, a következő And kifejezés visszatérési értéke nulla:
Result = GetAttr(FName) And vbArchive
Ha az Archívum attribútum be van állítva, a függvény nullától eltérő értéket ad vissza.
Példa
Ez a példa a GetAttr függvényt használja egy fájl, könyvtár vagy mappa attribútumainak meghatározásához. Macintosh rendszeren csak a vbNormal, a vbReadOnly, a vbHidden és a vbAlias konstans érhető el.
Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.