OpenTextFile, méthode

Article
04/07/2023

Ouvre un fichier spécifié et retourne un objet TextStream qui peut être utilisé pour lire, écrire ou ajouter au fichier.

Syntaxe

objet . OpenTextFile (filename, [ iomode, [ create, [ format ]]])

La syntaxe de la méthode OpenTextFile comprend les éléments suivants :

Élément	Description
object	Obligatoire. Toujours le nom d’un FileSystemObject.
Fichier	Obligatoire. Expression de chaîne identifiant le fichier à ouvrir.
iomode	Facultatif. Indique le mode d’entrées/sorties. Peut être l’une des trois constantes suivantes : ForReading, ForWriting ou ForAppending.
créer	Facultatif. Valeur de type Boolean indiquant si un nouveau fichier peut être créé au cas où le nom filename spécifié n’existe pas. La valeur est True si un nouveau fichier est créé, False dans le cas contraire. La valeur par défaut est False.
format	Facultatif. L’ une des trois valeurs Tristate servant à indiquer le format du fichier ouvert. Si elle n’est pas précisée, le fichier est ouvert au format ASCII.

Paramètres

L’argument modeES peut prendre l’un des paramètres suivants :

Constante	Valeur	Description
ForReading	1	Ouvre un fichier en lecture seule. Il est impossible d'écrire dans ce fichier.
ForWriting	2	Ouvrez un fichier à des fins d’écriture uniquement. Utilisez ce mode pour remplacer un fichier existant par de nouvelles données. Vous ne pouvez pas lire à partir de ce fichier.
ForAppending	8	Ouvre un fichier et écrit à la fin de celui-ci. Vous ne pouvez pas lire à partir de ce fichier.

L’ argument format peut prendre l’un des paramètres suivants :

Constante	Valeur	Description
TristateUseDefault	-2	Ouvre le fichier à l’aide de la valeur système par défaut.
TristateTrue	-1	Ouvre le fichier au format Unicode.
TristateFalse	0	Ouvre le fichier au format ASCII.

Remarques

Le code suivant illustre l’emploi de la méthode OpenTextFile pour ouvrir un fichier et y ajouter du texte :

Sub OpenTextFileTest
    Const ForReading = 1, ForWriting = 2, ForAppending = 8
    Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
    Dim fs, f
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending, True, TristateFalse)
    f.Write "Hello world!"
    f.Close
End Sub

Voir aussi

Objets (Visual Basic pour Applications)

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via