Set oShell = CreateObject("WScript.Shell")
oShell.Run "cmd /c c:"
此行执行完全正常。现在我需要输入一个文本。
例如:c:\users> "abcd"
如何在已打开的cmd提示符中进行此操作。
答案 0 :(得分:6)
您必须在每个命令后添加& ,并将 cmd / c 更改为 cmd / k
试试这样:
Set oShell = CreateObject("WScript.Shell")
Command = "cmd /K cd /d c:\ & Dir & ping 127.0.0.1"
oShell.Run Command,1,True