Facebook

For any corporate training requirements Please mail To sudhakar@qtpsudhakar.com
Course Name Date Time Duration Type Location
Selenium Framework Development 22nd July 2019 6.30 AM IST to 8:30 AM IST 15 Days WeekDays Online

A book "Cracking the QTP interview" authored by Sudhakar.Read More. Buy From FlipKart

Wednesday, June 10, 2009

How to update a particulare line in a text file?

'**************************************************************
txtFilePath= "C:\abc.txt"
txtRowNumber=3 ' Row number to update
TextToAdd="three"

Set fso= CreateObject( "scripting. FilesystemObject ")
Set f=fso.OpenTextFile( txtFilePath, 1)
txtData=f.readall
f.close

Set f=fso.OpenTextFile( txtFilePath, 2)

strTxtData=split( txtData,vbnewlin e)

For cnt=0 to ubound(strTxtData)


If cnt<>txtRowNumber- 1 Then
    f.writeline( strTxtData( cnt))
else
    f.writeline( TextToAdd )
End If

Next

f.close
'**************************************************************

No comments :

Post a Comment