[技术讨论] VBS脚本exec的stdout怎么移动光标？

set w=createobject("wscript.shell")
set t=w.exec("cscript /nologo 2.vbs")
set f=createobject("scripting.filesystemobject")
set ff=f.opentextfile("1.txt",2,true)
wscript.sleep 100
do
ff.write t.stdout.read(1)
loop
复制代码

wscript.stdout.write string(70,"*")&"="
for i=0 to 69
wscript.stdout.write chr(8)
wscript.stdout.write chr(8)
wscript.stdout.write "-"
next
wscript.stdin.readline
复制代码

set w=createobject("wscript.shell")
set t=w.exec("cscript /nologo 2.vbs")
wscript.sleep 100
do
msgbox t.stdout.read(1)
loop
复制代码

for i=65 to 90
wscript.stdout.write chr(i)
next
do
wscript.stdout.write chr(8)
wscript.sleep 1000
loop
wscript.stdin.readline
复制代码