VBs日誌（.txt）telnet輸出

Question

一個非常簡單的腳本，以節省時間我（重複）需要檢查@工作;

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

只是產生一個空白的txt的代碼;沒有字符串在裏面。