从另一个vbs脚本运行vbs脚本，并立即将输出重定向到文件

Question

从另一个vbscript运行vbscript，是否可能立即得到像这样的文件的输出:

  dim shell
  set shell=createobject("wscript.shell")
  strCMD =replace("'myvbs.vbs' '"&a_parameter&"' ","'","""")
  shell.Run strCMD >output.txt

提前致谢

Answer 1

可以。试试这个例子。

'script1.vbs -----------------
Dim oShell, strCMD
Set oShell = CreateObject("WScript.Shell")
strCMD = Replace("CMD /C CScript.exe 'script2.vbs' " & 3, "'", """")
oShell.Run strCMD & " //NoLogo >output.txt", 0, True
'script2.vbs -----------------
result = WScript.Arguments(0) ^ 2
WScript.StdOut.Write result

也来看看这个答案