Funkcija FileAttr

Vrne način dostopa ali pa številko za dostop do datoteke, ki jo je program odprl z ukazom Open. Številka za dostop do datoteke je odvisna od operacijskega sistema (OSH = Operating System Handle).

Če uporabljate 32-bitni operacijski sistem, s funkcijo FiteAttr ne morete določiti številke za dostop do datoteke.

Glejte tudi: Open

Skladnja:

FileAttr (ŠtevilkaDatoteke As Integer, Atribut As Integer)

Vrnjena vrednost:

Integer

Parametri:

ŠtevilkaDatoteke: Številka datoteke, uporabljena v ukazu Open.

Atribut: Celo število oziroma izraz, ki določa, katero vrsto podatkov o datoteki želite. Možne so naslednje vrednosti:

1: Funkcija FileAttr vrne način dostopa za datoteko.

2: Funkcija FileAttr vrne številko dostopa do datoteke za operacijski sistem.

Če uporabite vrednost 1 za parameter atribut, vrne funkcija naslednje vrednosti:

1 – INPUT (datoteka je odprta za branje)

2 – OUTPUT (datoteka je odprta za pisanje)

4 – RANDOM (datoteka je odprta za naključni dostop)

8 – APPEND (datoteka je odprta za dodajanje vsebine)

32 – BINARY (datoteka je odprta v binarnem načinu).

Primer:

Sub ExampleFileAttr
Dim iNumber As Integer
Dim sLine As String
Dim aFile As String
    aFile = "c:\data.txt"
    iNumber = Freefile
    Open aFile For Output As #iNumber
    Print #iStevilka, "To je vrstica z besedilom"
    MsgBox FileAttr(#iStevilka, 1 ),0,"Način dostopa"
    MsgBox FileAttr(#iStevilka, 2 ),0,"Atribut datoteke"
    Close #iNumber
End Sub