VB для записи (.txt) вывода telnet

Question

Очень простой скрипт, чтобы сэкономить время на то, что мне (неоднократно) нужно проверять @ work;

Set cloner = CreateObject("WScript.Shell")  
cloner.SendKeys"telnet 0.0.0.0"  
cloner.SendKeys("{Enter}")  
WScript.Sleep 1000  
cloner.SendKeys("whatever")  

И я хотел бы, чтобы это вывело в .txt.

Answer 1

попробуйте это

Set cloner = CreateObject("WScript.Shell")
 cloner.Run "cmd.exe"
 WScript.Sleep 1000
 cloner.SendKeys"telnet 0.0.0.0 -f out.txt"
 cloner.SendKeys("{Enter}")
 WScript.Sleep 1000
 cloner.SendKeys("whatever") 

Answer 2

код, просто выдающий пустой текст;в нём нет строки.