Ouvre un fichier spécifié et renvoie un objet TextStream pouvant être utilisé pour lire le fichier, écrire ou insérer un élément dans le fichier.
object.OpenTextFile(filename[, iomode[, create[, format]]])
object
Correspond toujours au nom d'un objet FileSystemObject.
filename
Expression de chaîne identifiant le fichier à ouvrir.
iomode
Facultatif. Indique le mode entrée/sortie. Cet argument peut être une des trois constantes : ForReading, ForWriting ou ForAppending.
create
Facultatif. Valeur de type Boolean qui indique si un nouveau fichier peut être créé si 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 3-états permettant d'indiquer le format du fichier ouvert. Si cette valeur est omise, le fichier est ouvert en mode ASCII.
L'argument iomode peut prendre les valeurs suivantes :
| Constante | Valeur | Description |
|---|---|---|
| ForReading | 1 | Ouvre un fichier en lecture seule. Vous ne pouvez pas écrire dans ce fichier. |
| ForWriting | 2 | Ouvre un fichier en écriture seule. Vous ne pouvez pas lire à partir de ce fichier. |
| ForAppending | 8 | Ouvre un fichier et écrit à la fin du fichier. |
L'argument format peut prendre l'une des valeurs suivantes :
| Constante | Valeur | Description |
|---|---|---|
| TristateUseDefault | -2 | Ouvre le fichier avec la valeur par défaut du système. |
| TristateTrue | -1 | Ouvre le fichier comme de l'Unicode. |
| TristateFalse | 0 | Ouvre le fichier comme de l'ASCII. |
Le code suivant illustre l'utilisation de la méthode OpenTextFile pour ouvrir un fichier et y écrire du texte :
Sub OpenTextFileTest
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
f.Write "Bonjour!"
f.Close
End SubOpenAsTextStream, méthode | CreateTextFile, méthode
Application: FileSystemObject, objet