Fileread.vbs

Const ForReading = 1, ForWriting = 2, ForAppending = 8 Dim fso, f, msg

Set fso = CreateObject("Scripting.FileSystemObject")

Set f = fso.OpenTextFile("c:\remote.txt", ForReading) msg = f.Read(5) wscript.echo msg