Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.run "cmd /q/c for %a in (""test"") do echo %a>_%a.txt",0复制代码