FileAttr-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 den Datentyp Long-Datentyp zurück, der den Dateimodus für Dateien darstellt, die mit der Öffnen-Anweisung geöffnet werden.

Syntax

FileAttr(filenumber, returntype)

Die FileAttr-Funktionssyntax verwendet die folgenden Argument

Argument

Beschreibung

filenumber

Erforderlich. Integer-Datentyp. Jede gültige Dateinummer.

returntype

Erforderlich. Ein Wert vom Typ Integer. Zahl, die den zurückzugebenden Informationstyp angibt. Geben Sie 1 an, um einen Wert zurückzugeben, der den Dateimodus bezeichnet. Geben Sie 2 nur in 16-Bit-Systemen an, um einen Betriebssystem-Dateihandle abzurufen. returntype 2 wird in 32-Bit-Systemen nicht unterstützt und verursacht einen Fehler.

Rückgabewerte

Wenn das Argumentreturntype 1 ist, geben die folgenden Rückgabewerte den Dateizugriffsmodus an:

Modus

Wert

Eingabe

1

Ausgabe

2

Zufall

4

Anfügeabfrage

8

Binär

32

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.

In diesem Beispiel wird die FileAttr-Funktion verwendet, um den Dateimodus und den Dateihandle einer geöffneten Datei zurückzugeben. Der Dateihandle wird nur in 16-Bit-Systemen zurückgegeben. In 32-Bit-Systemen wird ein Fehler generiert, wenn 2 als zweites Argument übergeben wird.

Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.
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!

×