Reading Data character by character from a Flat File in QTP

This is a set of codes where we will be reading single char from a textfile

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.OpenTextFile("D:\qtp.txt", 1)
Do Until objFile.AtEndOfStream
strCharacters = objFile.Read(1)
msgbox strCharacters
Loop
Reading Data character by character from a Flat File in QTP Reading Data character by character from a Flat File in QTP Reviewed by Animesh Chatterjee on March 24, 2010 Rating: 5

No comments:

Powered by Blogger.