GetAttr, 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 nombre entier représentant les attributs d’un fichier, répertoire ou dossier.

Syntaxe

GetAttr ()chemin d’accès)

Le chemin d’accèsde requisargument est une expression de chaîne qui spécifie un nom de fichier. Le chemin d’accès peut inclure le répertoire ou dossier et le lecteur.

Renvoyer des valeurs

La valeur renvoyée par GetAttr est la somme des valeurs d’attributs suivantes :

Constante

Valeur

Description

vbNormal

0

Mode normal.

vbReadOnly

1

En lecture seule.

vbHidden

2

Masqué.

vbSystem

4

Fichier système. Non disponible sur Macintosh.

vbDirectory

16

Répertoire ou dossier.

vbArchive

32

Fichier a changé depuis la dernière sauvegarde. Non disponible sur Macintosh.

vbAlias

64

Nom de fichier spécifié est un alias. Disponible uniquement sur Macintosh.


Remarque : Ces constantes sont spécifiées par Visual Basic pour Applications. Les noms peuvent être utilisés n’importe où dans votre code à la place des valeurs réelles.

Remarques

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.

Pour déterminer les attributs définis, utilisez l’opérateur And pour effectuer une comparaison de bits de la valeur renvoyée par la fonction GetAttr et la valeur de l’attribut de fichier souhaité. Si le résultat n’est pas zéro, cet attribut est défini pour le fichier nommé. Par exemple, la valeur de retour de l’expression And suivante est zéro si l’attribut Archive n’est pas défini :

Result = GetAttr(FName) And vbArchive

Une valeur non nulle est renvoyée si l’attribut Archive est défini.

Exemple

Cet exemple utilise la fonction GetAttr pour déterminer les attributs d’un fichier et le répertoire ou le dossier. Sur Macintosh, seules les constantes vbNormal, vbReadOnly, vbHidden et vbAlias sont disponibles.

Dim MyAttr
' Assume file TESTFILE has hidden attribute set.
MyAttr = GetAttr("TESTFILE") ' Returns 2.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And vbHidden
' Assume file TESTFILE has hidden and
' read-only attributes set.
MyAttr = GetAttr("TESTFILE") ' Returns 3.
' Returns nonzero if hidden attribute is
' set on TESTFILE.
Debug.Print MyAttr And (vbHidden + vbReadOnly)
' Assume MYDIR is a directory or folder.
MyAttr = GetAttr("MYDIR") ' Returns 16.

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.

×