CreateTextFile, méthode

Crée un nom de fichier spécifié et renvoie un objet TextStream pouvant être utilisé pour lire ou y écrire.

object.CreateTextFile(filename[, overwrite[, unicode]])

Arguments

object

Correspond toujours au nom d'un objet FileSystemObject ou Folder.

filename

Expression de chaîne identifiant le fichier à créer.

overwrite

Facultatif. Valeur de type Boolean indiquant si un fichier existant peut être remplacé. La valeur est True si le fichier peut être écrasé, False dans le cas contraire. Si cette valeur est omise, les fichiers existants ne peuvent pas être écrasés.

unicode

Facultatif. Valeur de type Boolean qui indique si le fichier est créé sous forme de fichier Unicode ou ASCII. La valeur est True si le fichier est créé sous forme de fichier Unicode, False s'il est créé sous forme de fichier ASCII. Si cette valeur est omise, un fichier ASCII est pris par défaut.

Notes

Le code suivant illustre l'emploi de la méthode CreateTextFile pour créer et ouvrir un fichier texte :

Sub CreateAfile
   Dim fso, MyFile
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
   MyFile.WriteLine("Ceci est un test.")
   MyFile.Close
End Sub

Si l'argument overwrite vaut False, ou est absent, pour un filename déjà existant, une erreur se produit.

Voir aussi

CreateFolder, méthode | OpenAsTextStream, méthode | OpenTextFile, méthode

Application: FileSystemObject, objet | Folder, objet