Lit toute une ligne (caractère de nouvelle ligne exclus) d'un fichier TextStream et renvoie la chaîne résultante.
object.ReadLine
L'argument object correspond toujours au nom d'un objet TextStream.
L'exemple ci-dessous utilise la méthode ReadLine pour lire une ligne dans un fichier TextStream et renvoyer une chaîne :
Function ReadLineTextFile
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
MyFile.WriteLine "Bonjour!"
MyFile.WriteLine "Le petit renard roux et vif"
MyFile.Close
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForReading)
ReadLineTextFile = MyFile.ReadLine ' Renvoie "Bonjour!"
End Function
Close, méthode | Read, méthode | ReadAll, méthode | Skip, méthode | SkipLine, méthode | Write, méthode | WriteLine, méthode | WriteBlankLines, méthode
Application: TextStream, objet