#INCLUDE "windows.inc"
#INCLUDE "scrrun.inc"
DIM fso AS IFileSystem3
DIM pStm AS ITextStream
' Create an instance of the FileSystemObject
fso = NEWCOM "Scripting.FileSystemObject"
' Get the standard input stream
pStm = fso.GetStandardStream(%StreamType_StdIn, %FALSE)