如何使用SCHTASK/QUERY并使用VBScript和cmd将输出放入文本文件

以下是我目前拥有的代码：

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "SCHTASKS /QUERY > winning.txt"

在我看来，这应该可以正常工作，并且运行时没有错误，但是文本文件没有更新

文本文件已经创建，因此我不必担心创建WScript变量

编辑：

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd /c SCHTASKS /QUERY > winning.txt"

谢谢你，大卫！我看了那两行好几个小时了

在命令前面添加“cmd/c”

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd /c SCHTASKS /QUERY > winning.txt"

将“cmd/c”添加到命令的前面

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "cmd /c SCHTASKS /QUERY > winning.txt"

---

考虑一下这个代码与原来的问题发生了什么变化，以使你的答案更具信息性。这是另一个人回答的，然后答案被删除了，我编辑了原来的帖子来保持答案。我将其作为进一步澄清的答案，但我不能提供为什么这项工作的描述。请考虑对这个代码与原始问题发生了什么变化进行评论，以使您的答案更具信息性。这是另一个人回答的，然后答案被删除，我编辑了原来的帖子来保持答案。为了进一步澄清，我重新发布了答案，但我无法说明为什么这样做有效。