qtp script to read first few characters of a text file-vb script to read first few characters of a text file

qtp script to read first few characters of a text file



Dim a,b

Const ForReading = 1

Set a=CreateObject( "Scripting.FileSystemObject" )

Set b=a.OpenTextFile( "C:\qtp.txt",1)

Msgbox b.Read(5)