Зміст
Покажчик 🔎︎

# Функція FileAttr

Повертає режим доступу або номер доступу до файлу, відкритого інструкцією Open. Номер доступу до файлу залежить від операційної системи (OSH = Operating System Handle, тобто дескриптор операційної системи).

Якщо використовується 32-розрядна операційна система, то для визначення номера доступу до файлу використовувати функцію FileAttr не можна.

Див. також: Open

### Синтаксис:

    FileAttr (Номер_файлу As Integer, Атрибут As Integer)

### Повертає значення:

Ціле число

### Параметри:

Номер_файлу: Номер відкритого файлу інструкцією Open.

Атрибут: цілий вираз, що визначає якого типу інформацію про файл потрібно отримати. Можливі значення:

1: Функція FileAttr вказує режим доступу до цього файлу.

2: Функція FileAttr повертає номер доступу до файлу операційної системи.

Якщо для параметра Атрибут вказується значення 1, то можуть бути повернуті такі значення:

1 - INPUT (файл відкритий для запису)

2 - OUTPUT (файл відкритий для виведення)

4 - RANDOM (файл відкритий для довільного доступу)

8 - APPEND (файл відкритий для додавання)

32 - BINARY (файл відкритий у двійковому режимі).

### Коди помилок:

5 Неправильний виклик процедури

52 Неправильне ім'я або номер файлу

### Приклад:

    Sub ExampleFileAttr
        Dim iNumber As Integer
        Dim sLine As String
        Dim aFile As String
        aFile = "C:\Users\ThisUser\data.txt"
        iNumber = Freefile
        Open aFile For Output As #iNumber
        Print #iNumber, "Це рядок тексту"
        MsgBox FileAttr(#iNumber, 1), 0, "Access mode"
        MsgBox FileAttr(#iNumber, 2), 0, "File attribute"
        Close #iNumber
    End Sub

Пов'язані теми

Close Statement

FreeFile Function

Open Statement

Print# Statement