Demon

对你来说最简单的方法是用Run来运行批处理命令

Dim WshShell
Set WshShell = CreateObject("wscript.Shell")
WshShell.Run "cmd.exe /c echo\ >c:\hello.txt", 0
WshShell.Run "cmd.exe /c copy c:\hello.txt d:\hello.txt", 0
'以下省略
复制代码