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