FileAttr, fonction
Mise à jour : novembre 2007
Retourne une énumération représentant le mode d'ouverture des fichiers avec la fonction FileOpen.
L'objet My.Computer.FileSystem (voir My.Computer.FileSystem, objet) permet une meilleure productivité et de meilleures performances dans les opérations d'E/S sur fichier que la fonction FileAttr. Pour plus d'informations, consultez My.Computer.FileSystem.GetFileInfo, méthode.
Public Function FileAttr(ByVal FileNumber As Integer) As OpenMode
Paramètres
- FileNumber
Requis. Integer Tout numéro de fichier valide.
Exceptions
Type d'exception |
Numéro de l'erreur |
Condition |
|---|---|---|
FileNumber n'existe pas. |
||
Le mode de fichier est non valide. |
Consultez la colonne « Numéro d'erreur » si vous mettez à niveau des applications Visual Basic 6.0 qui utilisent la gestion non structurée des erreurs. (Vous pouvez comparer le numéro d'erreur par rapport à Number, propriété (objet Err).) Toutefois, lorsque cela est possible, vous devez envisager de remplacer un tel contrôle d'erreurs par Vue d'ensemble de la gestion structurée des exceptions pour Visual Basic.
Valeur de retour
Les valeurs d'énumération suivantes indiquent le mode d'accès au fichier :
Valeur |
Mode |
|---|---|
1 |
OpenMode.Input |
2 |
OpenMode.Output |
4 |
OpenMode.Random |
8 |
OpenMode.Append |
32 |
OpenMode.Binary |
Notes
Cette fonction retourne une énumération représentant le mode d'ouverture des fichiers à l'aide de la fonction FileOpen.
Exemple
Cet exemple utilise la fonction FileAttr pour retourner le mode d'accès d'un fichier ouvert.
Dim mode As OpenMode
FileOpen(1, "c:\TESTFILE.TXT", OpenMode.Input)
mode = FileAttr(1)
MsgBox("The file mode is " & mode.ToString())
FileClose(1)
Notes du développeur sur Smart Device
Cette fonction n'est pas prise en charge.
Configuration requise
Espace de noms :Microsoft.VisualBasic
**Module :**FileSystem
**Assembly :**bibliothèque Visual Basic Runtime (dans Microsoft.VisualBasic.dll)
Voir aussi
Référence
Autres ressources
Propriétés des fichiers, répertoires et lecteurs dans Visual Basic