FileAttr Function
Visszaadja az Open utasĂtással megnyitott fájl fájlhozzáfĂ©rĂ©si számát vagy a hozzáfĂ©rĂ©si mĂłdját. A fájlhozzáfĂ©rĂ©si szám az operáciĂłs rendszertĹ‘l fĂĽgg (OSH = operáciĂłsrendszer-kezelĹ‘).
Ha 32 bites operációs rendszert használ, akkor nem használhatja a FileAttr függvényt a fájl hozzáférési számának meghatározására.
Lásd még: Open
Szintaxis:
FileAttr (Fájlszám As Integer, Attribútum As Integer)
Visszatérési érték:
Integer (egész szám)
Paraméterek:
Fájlszám: Az Open utasĂtással megnyitott fájl száma.
AttribĂştum: Integer (egĂ©sz szám) kifejezĂ©s, amely jelzi a fájlinformáciĂł tĂpusát, amelyet vissza kĂván adni. Az alábbi Ă©rtĂ©kek lehetsĂ©gesek:
1: A FileAttr fĂĽggvĂ©ny a fájl hozzáfĂ©rĂ©si mĂłdját jelenĂti meg.
2: A FileAttr függvény az operációs rendszer fájlhozzáférési számát adja meg.
Ha egy 1 értékű paraméterattribútumot ad meg, akkor a következő visszatérési értékek lehetségesek:
1 - INPUT (a fájlt bemenetként nyitja meg)
2 - OUTPUT (a fájlt kimenetként nyitja meg)
4 - RANDOM (a fájlt véletlen elérésre nyitja meg)
8 - APPEND (a fájlt hozzáfűzésre nyitja meg)
32 - BINARY (a fájlt bináris módban nyitja meg).
PĂ©lda:
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 #iNumber, "Ez egy szövegsor"
MsgBox FileAttr(#iNumber, 1 ),0,"Hozzáférési mód"
MsgBox FileAttr(#iNumber, 2 ),0,"Fájlattribútum"
Close #iNumber
End Sub