You aren't trying to run these scripts that make use of the stdOut methods by using Wscript.exe are you. In order to properly the StdIn, StdOut, and StdErr streams can be accessed while using CScript.exe only. So you must run these scripts from the command line.
See if this does anything for you but make sure you run it from a prompt using Cscript. When you type something in at the console it's going to tell you what you typed and what line you did it on.
Dim StdIn, StdOut
Set StdIn = WScript.StdIn
Set StdOut = WScript.StdOut
Do While Not StdIn.AtEndOfStream
str = StdIn.ReadLine
StdOut.WriteLine "Line " & (StdIn.Line - 1) & ": " & str
Loop
Main Topics
Browse All Topics
by: wsteegmansPosted on 2003-11-29 at 16:01:15ID: 9843890
You could use the FileSystemObject to write all your data to a textfile. I think this will help ...
Example:
' Set up Constants
Const ForWriting = 2 ' Input OutPut mode
Const Create = True
Dim MyFile
Dim FSO ' FileSystemObject
Dim TSO ' TextStreamObject
' Use MapPath function to get the Physical Path of file
MyFile = Server.MapPath("textfile.t
Set FSO = Server.CreateObject("Scrip
Set TSO = FSO.OpenTextFile(MyFile, ForWriting, Create)
TSO.Write "This is first line in this text File" & vbCrLf
' Vbcrlf is next line character
TSO.Write "This is Second line in this text file" & vbCrLf
TSO.Write "Writen by devasp visitor at " & Now()
TSO.WriteLine ""
Response.Write " Three lines are writen to textfile.txt <br>"
Response.Write " Local time at server is " & Now()
' close TextStreamObject and
' destroy local variables to relase memory
TSO.Close
Set TSO = Nothing
Set FSO = Nothing
Regards!