FileSystemObject

I need a way to detect the EOF with FSO

Code:

---

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

Do While Not File.EOF(1)
Loop

File.Close

---

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

Code:

---

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

---

try something like that .
[]Private[]