Contoh Pemicu Mingguan (Pembuatan Skrip)
Contoh pembuatan skrip ini menunjukkan cara membuat tugas yang menjalankan Notepad pada pukul 08.00 pada hari Senin setiap minggu. Tugas berisi pemicu harian yang menentukan kapan tugas berjalan dan tindakan yang dapat dieksekusi yang menjalankan Notepad.
Prosedur berikut menjelaskan cara menjadwalkan tugas untuk memulai executable pada pukul 08.00 pada hari Senin setiap minggu.
Untuk menjadwalkan Notepad mulai pukul 08.00 pada hari Senin setiap minggu
Buat objek TaskService . Obyek ini memungkinkan Anda membuat tugas dalam folder yang ditentukan.
Dapatkan folder tugas dan buat tugas. Gunakan metode TaskService.GetFolder untuk mendapatkan folder tempat tugas disimpan dan metode TaskService.NewTask untuk membuat objek TaskDefinition yang mewakili tugas.
Tentukan informasi tentang tugas menggunakan objek TaskDefinition . Gunakan properti TaskDefinition.Settings untuk menentukan pengaturan yang menentukan bagaimana layanan Penjadwal Tugas melakukan tugas dan properti TaskDefinition.RegistrationInfo untuk menentukan informasi yang menjelaskan tugas.
Buat pemicu mingguan menggunakan properti TaskDefinition.Triggers . Properti ini menyediakan akses ke objek TriggerCollection yang digunakan untuk membuat pemicu.
Gunakan metode TriggerCollection.Create (menentukan jenis pemicu yang ingin Anda buat) untuk membuat pemicu mingguan.
Atur properti WeeklyTrigger.StartBoundary untuk menentukan kapan pemicu diaktifkan dan waktu saat tugas dijalankan. Dalam contoh ini pemicu diaktifkan pada 1 Januari 2005 dan tugas berjalan pada pukul 08.00.
Atur properti WeeklyTrigger.EndBoundaryuntuk menentukan kapan pemicu dinonaktifkan. Dalam contoh ini pemicu dinonaktifkan pada 1 Januari 2015.
Atur properti WeeklyTrigger.DaysOfWeek untuk menentukan hari dalam seminggu di mana tugas berjalan. Dalam contoh ini, tugas dijalankan pada hari Senin.
Atur properti WeeklyTrigger.WeeksIntervaluntuk menentukan interval antara minggu dalam jadwal. Dalam contoh ini tugas berjalan setiap minggu.
Buat tindakan untuk tugas yang akan dijalankan dengan menggunakan properti TaskDefinition.Actions . Properti ini menyediakan akses ke objek ActionCollection yang digunakan untuk membuat tindakan. Gunakan metode ActionCollection.Create untuk menentukan jenis tindakan yang ingin Anda buat. Contoh ini menggunakan objek ExecAction , yang mewakili tindakan yang menjalankan operasi baris perintah.
Daftarkan tugas menggunakan metode TaskFolder.RegisterTaskDefinition . Untuk contoh ini, tugas akan memulai Notepad pada pukul 08.00 pada hari Senin setiap minggu.
Contoh VBScript berikut menunjukkan cara menjadwalkan tugas untuk menjalankan Notepad setiap hari pada pukul 08.00.
'------------------------------------------------------------------
' This sample schedules a task to start on a weekly basis.
'------------------------------------------------------------------
' A constant that specifies a weekly trigger.
const TriggerTypeWeekly = 3
' A constant that specifies an executable action.
const ActionTypeExec = 0
'********************************************************
' Create the TaskService object.
Set service = CreateObject("Schedule.Service")
call service.Connect()
'********************************************************
' Get a folder to create a task definition in.
Dim rootFolder
Set rootFolder = service.GetFolder("\")
' The taskDefinition variable is the TaskDefinition object.
Dim taskDefinition
' The flags parameter is 0 because it is not supported.
Set taskDefinition = service.NewTask(0)
'********************************************************
' Define information about the task.
' Set the registration info for the task by
' creating the RegistrationInfo object.
Dim regInfo
Set regInfo = taskDefinition.RegistrationInfo
regInfo.Description = "Start Notepad weekly."
regInfo.Author = "Administrator"
' Set the task setting info for the Task Scheduler by
' creating a TaskSettings object.
Dim settings
Set settings = taskDefinition.Settings
settings.Enabled = True
settings.StartWhenAvailable = True
settings.Hidden = False
'********************************************************
' Create a weekly trigger. Note that the start boundary
' specifies the time of day that the task starts, the
' day-of-week specfies on what day of the week the task
' runs, and the interval specifies what weeks the task runs.
Dim triggers
Set triggers = taskDefinition.Triggers
Dim trigger
Set trigger = triggers.Create(TriggerTypeWeekly)
' Trigger variables that define when the trigger is active
' and the time of day that the task is run. The format of
' this tims is YYYY-MM-DDTHH:MM:SS
Dim startTime, endTime
Dim time
startTime = "2006-05-02T08:00:00" 'Task runs at 8:00 AM
endTime = "2015-05-02T08:00:00"
WScript.Echo "startTime :" & startTime
WScript.Echo "endTime :" & endTime
trigger.StartBoundary = startTime
trigger.EndBoundary = endTime
trigger.DaysOfWeek = 1
trigger.WeeksInterval = 1 'Task runs every week.
trigger.Id = "WeeklyTriggerId"
trigger.Enabled = True
'***********************************************************
' Create the action for the task to execute.
' Add an action to the task to run notepad.exe.
Dim Action
Set Action = taskDefinition.Actions.Create( ActionTypeExec )
Action.Path = "C:\Windows\System32\notepad.exe"
WScript.Echo "Task definition created. About to submit the task..."
'***********************************************************
' Register (create) the task.
call rootFolder.RegisterTaskDefinition( _
"Test Weekly Trigger", taskDefinition, 6, , , 3)
WScript.Echo "Task submitted."
Topik terkait