Inhalte

# Funktion GetAttr

Gibt ein Bitmuster zurück, das den Typ einer Datei, eines Verzeichnisses oder einer Datenträgerbezeichnung angibt.

## Syntax:

    GetAttr (Text As String)

## Rückgabewert:

Integer

## Parameter:

Text: Ein beliebiger Zeichenfolgenausdruck, der eine eindeutige Dateiangabe enthält. Sie können auch die URL-Schreibweise verwenden.

Diese Funktion bestimmt die Attribute einer bestimmten Datei und gibt ein Bitmuster zurück, aus dem Sie folgende Dateiattribute erkennen können:

### Fehlercodes:

5 Ungültiger Prozeduraufruf

53 Datei nicht gefunden

## Wert

Benannte Konstante | Wert | Definition
--- | --- | ---
ATTR_NORMAL | 0 | Normale Dateien.
ATTR_READONLY | 1 | Schreibgeschützte Dateien.
ATTR_HIDDEN | 2 | Versteckte Dateien
ATTR_SYSTEM | 4 | Systemdateien
ATTR_VOLUME | 8 | Der Name des Laufwerks wird zurückgegeben.
ATTR_DIRECTORY | 16 | Nur der Verzeichnisnamen werden zurückgegeben.
ATTR_ARCHIVE | 32 | Die Datei wurde seit dem letzten Backup geändert (Archive-Bit).

Um zu erfahren, ob ein bestimmtes Bit des Attributbytes gesetzt ist, verwenden Sie folgende Abfragemethode:

## Beispiel:

    Sub ExampleSetGetAttr
    On Error GoTo ErrorHandler ' Sprungziel für Fehlerbehandlung definieren
     If Dir("C:\test",16)="" Then MkDir "C:\test"
     If Dir("C:\test\autoexec.sav")="" Then FileCopy "c:\autoexec.bat", "c:\test\autoexec.sav"
     SetAttr "c:\test\autoexec.sav" ,0
     FileCopy "c:\autoexec.bat", "c:\test\autoexec.sav"
     SetAttr "c:\test\autoexec.sav" ,1
     Print GetAttr( "c:\test\autoexec.sav" )
     End
    ErrorHandler:
     Print Error
     End
    End Sub

Bitte unterstützen Sie uns!