FileAttr, fonction

Important :  Cet article a été traduit automatiquement, voir l’avertissement. Vous pouvez consulter la version en anglais de cet article ici.

Remarque : Si le Service Microsoft Jet Expression s’exécute en mode sandbox, qui empêche l’évaluation des expressions potentiellement dangereuses de la fonction, une méthode, un objet ou une propriété décrites dans cette rubrique est désactivée. Pour plus d’informations sur le mode sandbox, recherchez « mode sandbox » dans l’aide.

Renvoie un Long qui représente le mode de fichier pour les fichiers ouverts à l’aide de l’instruction Open .

Syntaxe

FileAttr ( filenumber , returntype )

La syntaxe de la fonction FileAttr comprend les arguments suivants :

Argument

Description

FileNumber

Obligatoire. Nombre entier. N’importe quel valide numéro de fichier.

ReturnType

Obligatoire. Nombre entier. Nombre indiquant le type d’informations à renvoyer. Indiquez la valeur 1 pour renvoyer une valeur indiquant le mode de fichier. Sur les systèmes 16 bits uniquement, spécifiez 2 pour un système d’exploitation avec ces derniers. returntype 2 n’est pas pris en charge dans les systèmes 32 bits et génère une erreur.

Renvoyer des valeurs

Lorsque la returntypeargument est 1, les valeurs renvoyées suivantes indiquent le mode d’accès au fichier :

Mode

Valeur

Entrée

1

Sortie

2

Aléatoire

4

Ajout

8

Binaire

32

Exemple

Remarque : Exemples suivants illustrent l’utilisation de cette fonction dans une Visual Basic pour le module d’Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de recherche et entrez un ou plusieurs termes dans la zone de recherche.

Cet exemple utilise la fonction FileAttr pour renvoyer la poignée de recopie mode et le fichier d’un fichier ouvert. La poignée de recopie est renvoyée uniquement sur les systèmes 16 bits ; sur les systèmes 32 bits, en passant 2 comme un 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.

Remarque : Avertissement traduction automatique : cet article a été traduit par un ordinateur, sans intervention humaine. Microsoft propose cette traduction automatique pour offrir aux personnes ne maîtrisant pas l’anglais l’accès au contenu relatif aux produits, services et technologies Microsoft. Comme cet article a été traduit automatiquement, il risque de contenir des erreurs de grammaire, de syntaxe ou de terminologie.

Développez vos compétences
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×