IBM Lotus Symphony
|
Renvoie le mode d'accès ou le numéro d'accès à un fichier qui a été ouvert à l'aide de l'instruction Open. Le numéro d'accès au fichier dépend du système d'exploitation (OSH = Operating System Handle ou descripteur du système d'exploitation).
![]() |
Si vous utilisez un système d'exploitation 32 bits, vous ne pouvez pas utiliser la fonction FileAttr pour déterminer le numéro d'accès au fichier. |
Voir aussi : Open
FileAttr (FileNumber As Integer, Attribute As Integer)
Nombre entier
FileNumber : numéro du fichier qui a été ouvert à l'aide de l'instruction Open.
Attribut : expression de type nombre entier indiquant le type d'informations relatives au fichier que vous souhaitez retourner. Les valeurs suivantes sont possibles :
1 : la fonction FileAttr indique le mode d'accès au fichier.
2 : la fonction FileAttr renvoie le numéro d'accès au fichier du système d'exploitation.
Si vous spécifiez un attribut de paramètre avec une valeur égale à 1, les valeurs de retour suivantes s'appliquent :
1 - INPUT (fichier ouvert pour entrée)
2 - OUTPUT (fichier ouvert pour sortie)
4 - RANDOM (fichier ouvert pour accès aléatoire)
8 - APPEND (fichier ouvert pour ajout)
32 - BINARY (fichier ouvert en mode binaire).
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, "Ceci est une ligne de texte."
MsgBox FileAttr(#iNumber, 1 ),0,"Mode d'accès"
MsgBox FileAttr(#iNumber, 2 ),0,"Attribut de fichier"
Close #iNumber
End Sub