here is the declaration and code


Dim entire_file_string As String
entire_file_string = CreateObject("Scripting.FileSystemObject").opentextfile(Input_pth, 1, False, 0).readall

so variable is defined as a string