Haftalık Tetikleyici Örneği (Betik Oluşturma)

Bu betik örneği, her haftanın Pazartesi günü saat 08:00'de Not Defteri çalıştıran bir görevin nasıl oluşturulacağını gösterir. Görev, görevin ne zaman çalıştırıldığını belirten günlük bir tetikleyici ve Not Defteri'ni çalıştıran yürütülebilir bir eylem içerir.

Aşağıdaki yordamda, her haftanın Pazartesi günü 08:00'de yürütülebilir dosya başlatmak için bir görevin nasıl zamanlandığı açıklanmaktadır.

Not Defteri'ni her haftanın Pazartesi günü saat 08:00'de başlayacak şekilde zamanlamak için

1. TaskService nesnesi oluşturun. Bu nesne, görevi belirtilen klasörde oluşturmanıza olanak tanır.

2. Bir görev klasörü alın ve bir görev oluşturun. Görevin depolandığı klasörü almak için TaskService.GetFolder yöntemini ve görevi temsil eden TaskDefinition nesnesini oluşturmak için TaskService.NewTask yöntemini kullanın.

3. TaskDefinition nesnesini kullanarak görevle ilgili bilgileri tanımlayın. Görev Zamanlayıcı hizmetinin görevi nasıl gerçekleştirdiğini belirleyen ayarları tanımlamak için TaskDefinition.Settings özelliğini ve görevi açıklayan bilgileri tanımlamak için TaskDefinition.RegistrationInfoözelliğinikullanın.

4. TaskDefinition.Triggers özelliğini kullanarak haftalık bir tetikleyici oluşturun. Bu özellik, tetikleyiciyi oluşturmak için kullanılan TriggerCollection nesnesine erişim sağlar.

   Haftalık tetikleyici oluşturmak için TriggerCollection.Create yöntemini (oluşturmak istediğiniz tetikleyici türünü belirterek) kullanın.

   Tetikleyicinin ne zaman etkinleştirileceğini ve görevin çalıştırıldığında günün saatini belirtmek için WeeklyTrigger.StartBoundary özelliğini ayarlayın. Bu örnekte tetikleyici 1 Ocak 2005'te etkinleştirilir ve görev 08:00'de çalışır.

   Tetikleyicinin ne zaman devre dışı bırakılacağını belirtmek için WeeklyTrigger.EndBoundaryözelliğini ayarlayın. Bu örnekte tetikleyici 1 Ocak 2015'te devre dışı bırakılır.

   Görevin çalıştırıldığı haftanın günlerini belirtmek için WeeklyTrigger.DaysOfWeeközelliğini ayarlayın. Bu örnekte görev Pazartesi günü çalıştırılır.

   Zamanlamadaki haftalar arasındaki aralığı belirtmek için WeeklyTrigger.WeeksIntervalözelliğini ayarlayın. Bu örnekte görev her hafta çalışır.

5. TaskDefinition.Actions özelliğini kullanarak görevin yürütülmesi için bir eylem oluşturun. Bu özellik, eylemi oluşturmak için kullanılan ActionCollection nesnesine erişim sağlar. Oluşturmak istediğiniz eylem türünü belirtmek için ActionCollection.Create yöntemini kullanın. Bu örnekte, komut satırı işlemini yürüten bir eylemi temsil eden ExecAction nesnesi kullanılır.

6. TaskFolder.RegisterTaskDefinition yöntemini kullanarak görevi kaydedin. Bu örnekte görev, Not Defteri'ni her haftanın Pazartesi günü saat 08:00'de başlatır.

Aşağıdaki VBScript örneğinde, Not Defteri'ni her gün saat 08:00'de yürütmek üzere bir görevin nasıl zamanlandığı gösterilmektedir.

'------------------------------------------------------------------
' 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."

İlgili konular

Görev Zamanlayıcı Kullanarak