Remarque : La fonction, la méthode, l’objet ou la propriété décrits dans cette rubrique est désactivée si le service d’expressions de Microsoft Jet s’exécute en mode sandbox, ce qui empêche l’évaluation d’expressions potentiellement non sûres. Pour plus d’informations sur le mode sandbox, recherchez « mode sandbox » dans l’Aide.

Renvoie une longue représentation du mode de fichier pour les fichiers ouverts à l’aide de l’instruction Open.

Syntaxe

FileAttr (filenumber, returntype)

La syntaxe de la fonction FileAttr présente les arguments suivantes :

Argument

Description

filenumber

Obligatoire. Integer. Tout numéro de fichier valide.

type de retour

Obligatoire. Integer. Nombre indiquant le type d’informations à renvoyer. Spécifiez 1 pour renvoyer une valeur indiquant le mode fichier. Sur les systèmes 16 bits uniquement, spécifiez 2 pour récupérer une poignée de fichier du système d’exploitation. Returntype 2 n’est pas pris en charge dans les systèmes 32 bits et provoque une erreur.

Renvoyer des valeurs

Lorsque la valeur de retourargument est 1, les valeurs de retour suivantes indiquent le mode d’accès au fichier :

Mode

Valeur

Input

1

Sortie

2

Aléatoire

4

Ajout

8

Binaire

32

Exemple

Remarque : Les exemples qui suivent illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’travail avec VBA, sélectionnez Référence du développeur dans la liste de listes en regard de Rechercher, puis entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction FileAttr pour renvoyer le mode fichier et la poignée de fichier d’un fichier ouvert. La poignée de fichier est renvoyée uniquement sur les systèmes 16 bits. sur les systèmes 32 bits, la transmission de 2 comme deuxième argument génère une erreur.

Dim FileNum, Mode, Handle
FileNum = 1 ' Assign file number.
Open "TESTFILE" For Append As FileNum ' Open file.
Mode = FileAttr(FileNum, 1) ' Returns 8 (Append file mode).
Handle = FileAttr(FileNum, 2) ' Returns file handle.
Close FileNum ' Close file.

Besoin d’aide ?

Développez vos compétences
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoindre Microsoft Insider

Ces informations vous ont-elles été utiles ?

Dans quelle mesure êtes-vous satisfait(e) de la qualité de la traduction ?

Qu’est-ce qui a affecté votre expérience ?

Avez-vous d’autres commentaires ? (Facultatif)

Nous vous remercions pour vos commentaires.

×