Read Text File into String Variable

Reads an entire text file into a string variable.

Download Chilkat FileAccess ActiveX (freeware)

Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set outFile = fso.CreateTextFile("output.txt", True)

set fac = CreateObject("Chilkat.FileAccess")

'  Reads the entire contents of a text file into a string variable.
'  The 2nd arg specifies the character encoding used for
'  the contents of the text file.
fileText = fac.ReadEntireTextFile("hamlet.xml","utf-8")

outFile.WriteLine(fileText)
outFile.Close