VBScript Code | Writing text to File

Write the below written QTP code inside a notepad and save it as a .vbs file. You can either run it from command prompt or run it by double-clicking on it.

VBScript Code - The following code reads first line from a text file.

Const ForReading = 1, ForWriting = 2, ForAppending = 8

Set FSO = CreateObject("Scripting.FilesystemObject")

Set QTPfile = FSO.OpenTextFile("c:\myfile.txt", ForWriting, False)

QTPfile.WriteLine(" This is my demo text")

QTPfile.Close