如何通过vb6.0代码在任务计划程序中启用或禁用或启用任务

Question

我想通过vb6.0代码在Windows操作系统的任务计划程序中启用或禁用任务。我在任务计划程序中完成了一项任务。现在我想从vb6.0代码启用或禁用此任务。

任何解决方案都将是非常有用的帮助。

Answer 1

以下假设您的目标是Windows Vista / 2008 Server及更高版本。

首先需要添加对taskschd.dll库的引用：

在下面的代码中，GetTask（）帮助器函数使用文件夹（顶级文件夹为vbNullString）和实际＆＃34; task_name＆＃34;。

然后，您可以使用返回任务的Enabled属性来启用/禁用它。

Private Sub Command1_Click()

    Dim oTask           As TaskScheduler.IRegisteredTask

    Set oTask = GetTask(vbNullString, "task_name")

    oTask.Enabled = False

End Sub

Private Function GetTask(ByRef in_sFolderName As String, ByRef in_sTaskName As String) As TaskScheduler.IRegisteredTask

    Dim oTaskScheduler  As TaskScheduler.TaskScheduler
    Dim oFolder         As TaskScheduler.ITaskFolder

    Set oTaskScheduler = New TaskScheduler.TaskScheduler
    oTaskScheduler.Connect

    Set oFolder = oTaskScheduler.GetFolder(in_sFolderName)

    Set GetTask = oFolder.GetTask(in_sTaskName)

End Function