IBM Lotus Symphony


Funkcja FileAttr [środowisko wykonawcze]

Zwraca tryb dostępu lub numer dostępu do pliku, który został otwarty przy użyciu instrukcji Open. Numer dostępu do pliku zależy od systemu operacyjnego (jest to uchwyt systemu operacyjnego).

Ikona Uwaga W przypadku korzystania z 32-bitowego systemu operacyjnego funkcja FileAttr nie umożliwia określenia numeru dostępu do pliku.

Patrz także: Open

Składnia

FileAttr (Numer_pliku As Integer, Atrybut As Integer)

Zwracana wartość

Liczba całkowita

Parametry

Numer_pliku: Numer pliku otwartego przy użyciu instrukcji Open.

Atrybut: Wyrażenie całkowitoliczbowe wskazujące typ informacji o pliku, które mają zostać zwrócone. Ten parametr może przyjmować następujące wartości:

1: Funkcja FileAttr zwraca tryb dostępu do pliku.

2: Funkcja FileAttr zwraca numer dostępu do pliku w systemie operacyjnym.

W przypadku określenia parametru atrybutu o wartości 1 zastosowanie mają następujące wartości zwracane:

1 - INPUT (plik otwarty dla danych wejściowych)

2 - OUTPUT (plik otwarty dla danych wyjściowych)

4 - RANDOM (plik otwarty dla dostępu bezpośredniego)

8 - APPEND (plik otwarty dla dopisywania)

32 - BINARY (plik otwarty w trybie binarnym)

Kody błędów

5 Nieprawidłowe wywołanie procedury

52 Nieprawidłowa nazwa lub numer pliku

Przykład

Sub Przyklad_FileAttr

Dim iNumer As Integer

Dim sWiersz As String

Dim aPlik As String

aPlik = "c:\data.txt"

iNumer = Freefile

Open aPlik For Output As #iNumer

Print #iNumer, "To jest wiersz tekstu"

MsgBox FileAttr(#iNumer, 1 ),0,"Tryb dostępu"

MsgBox FileAttr(#iNumer, 2 ),0,"Atrybut pliku"

Close #iNumer

End Sub


Opinia na temat produktu | Dodatkowa dokumentacja | Znaki towarowe