我有这个将SDK信息导出到txt文件。我还想将正在运行的进程导出到同一文本文件。
Dim sdkCommand As String
sdkCommand = "C:\Windows\System32\Java.exe -version 2> C:\Users\JavaSDKInfo.txt"
Shell("cmd.exe /c" & sdkCommand)
End Sub
如果我尝试将其添加到它,我只能看到sdkCommand的输出,但没有看到正在运行的任务。我假设我需要结合shell语句?
Sub Main()
Dim sdkCommand As String
Dim proCommand As String
sdkCommand = "C:\Windows\System32\Java.exe -version 2> C:\Users\Desktop\JavaSDKInfo.txt"
proCommand = "C:\Windows\System32\tasklist.exe > C:\Users\Desktop\JavaSDKInfo.txt"
Shell("cmd.exe /c" & sdkCommand)
Shell("cmd.exe /c" & proCommand)
End Sub
答案 0 :(得分:0)
使用&&amp ;;将所有命令合并为一个长的命令实际上使这项工作变得更容易。这允许我添加更多命令提示符命令。
Sub Main()
Dim sdkcommand as String
'COmbine using && in command prompt
sdkCommand = "java.exe >>C:\text.txt && tasklist.exe >>C:\text.txt"
Shell("cmd.exe /c" and sdkCommand)
End Sub