我正在尝试创建一个 VBScript,它创建一个批处理文件,然后创建一个计划任务来运行该批处理文件。到目前为止,我尝试过的所有操作都创建了批处理文件,但没有创建计划任务,并且我没有收到任何错误。这是我到目前为止所拥有的:
Option Explicit
Dim objFSO, outFile, wShell
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set outFile = objFSO.CreateTextFile("C:\test.bat", True)
outFile.WriteLine "Start www.google.com"
outFile.Close
Set wShell = CreateObject ("Wscript.Shell")
wShell.Run "cmd SchTasks /Create /SC WEEKLY /D MON,TUE,WED,THU,FRI /TN 'Test Task' /TR 'C:\test.bat' /ST 16:30", 0
我试过了""Test Task""
and ""C:\test.bat""
,并得到相同的结果。但是当我在命令提示符下运行以下命令时:
SchTasks /Create /SC WEEKLY /D MON,TUE,WED,THU,FRI /TN "Test Task" /TR "C:\test.bat" /ST 16:30
任务创建成功。
我尝试的另一种方法是创建 2 个批处理文件:一个用于打开网页的批处理文件,一个用于创建计划任务的批处理文件。然后我结束了运行task.bat
文件在最后。这就是我为此所做的:
Option Explicit
Dim objFSO, outFile, wShell
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set outFile = objFSO.CreateTextFile("C:\test.bat", True)
outFile.WriteLine "Start www.google.com"
outFile.Close
Set outFile = objFSO.CreateTextFile("C:\task.bat", True)
outFile.WriteLine "SchTasks /Create /SC WEEKLY /D MON,TUE,WED,THU,FRI /TN ""Test Task"" /TR ""C:\test.bat"" /ST 16:30"
Set wShell = CreateObject ("Wscript.Shell")
wShell.Run "cmd start ""C:\task.bat"""
这创建了批处理文件,但刚刚打开cmd
最后什么也没做。
我的猜测是问题出在wShell.Run
部分,但我的经验不够,不知道问题出在哪里。
我不知道从这里去哪里所以任何建议都会很棒。