IBM Lotus Symphony
|
Returnerer tilgangsmodusen eller filtilgangsnummeret til en fil som ble åpnet med Open-setningen. Filtilgangsnummeret er avhengig av operativsystemet (OSH = Operating System Handle).
![]() |
Hvis du bruker et 32-biters operativsystem, kan du ikke bruke FileAttr-funksjonen til å bestemme filtilgangsnummeret. |
Se også: Open
FileAttr (Filnummer som heltall, Attributt som heltall)
Heltall
Filnummer: Nummeret til filen som ble åpnet med Open-setningen.
Attributt: Heltallsuttrykk som angir typen filinformasjon du vil returnere. Disse verdiene er mulige:
1: FileAttr-funksjonen angir tilgangsmodusen for filen.
2: FileAttr-funksjonen returnerer filtilgangsnummeret for operativsystemet.
Hvis du angir et parameterattributt med verdien 1, gjelder følgende returverdier:
1 - INPUT (fil åpen for inndata)
2 - OUTPUT (fil åpen for utdata)
4 - RANDOM (fil åpen for tilfeldig tilgang)
8 - APPEND (fil åpen for tilføying)
32 - BINARY (fil åpen i binær modus).
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, "Dette er en linje med tekst"
MsgBox FileAttr(#iNumber, 1 ),0,"Access mode"
MsgBox FileAttr(#iNumber, 2 ),0,"File attribute"
Close #iNumber
End Sub