FileSystemObject

[Evan]

I need a way to detect the EOF with FSO

Set FSO = CreateObject("Scripting.FileSystemObject")
Set File = FSO.OpenTextFile(Filename, 1)

Do While Not File.EOF(1)
Loop

File.Close

[PRIVATE1]

Since it's streaming the files it's not EOF it's end of stream

Set FileSystemToUse = CreateObject("Scripting.FileSystemObject")
   
 Do While Not FileToRead.AtEndOfStream

try something like that .
[]Private[]