Grava uma string especificada e um caractere de nova linha em um arquivo TextStream.
Sintaxe
object.WriteLine([string])
Argumentos
Object: Obrigatório. Sempre o nome de um objeto TextStream.
String: Obrigatório. O texto a ser gravado no arquivo.
Comentários
O exemplo a seguir ilustra o uso do método WriteLine:
Exemplo 1:
Function WriteLineToFile
Const ForWriting = 2
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("C:\testfile.txt", ForWriting, True)
f.WriteLine "Hello World!"
f.Close
End Function
Exemplo 2:
Function AppendLinesToFile
Const ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("C:\testfile.txt", ForAppending, True)
f.WriteLine "First line."
f.WriteLine "Second line."
f.WriteLine "Third line."
f.Close
End Function