Code to read from txt file

Dim fso,f
Set fso=createobject("Scripting.filesystemobject")
set f=fso.opentextfile("C:\test.txt",1)
while f.atendofline<>true
s=f.readline()
msgbox s
wend
f.close
set f=nothing
set fso=nothing
Code to read from txt file Code to read from txt file Reviewed by Animesh Chatterjee on June 09, 2010 Rating: 5

No comments:

Powered by Blogger.