用官方的控制台插件有些不爽,所以自己写了个
可以获取命行程序的输入输出 用法
Call Plugin.PipePlugin.Open("cmd.exe")
Delay 1000
Plugin.PipePlugin.WriteLine("dir")
Delay 1000
For 20
Delay 100
TracePrint Plugin.PipePlugin.ReadLine
Next
Call Plugin.PipePlugin.Open("ping 127.0.0.1")
Delay 1000
For 10
Delay 1000
TracePrint Plugin.PipePlugin.ReadLine
Next
Set Pipe = CreateObject("PipePlugin.Pipe")
Call Pipe.Open("ping 127.0.0.1")
Delay 1000
For 20
Delay 1000
TracePrint Pipe.ReadLine
Next
Sub OnScriptExit()
Pipe.Close
Plugin.PipePlugin.Close
End Sub