Projektdateien hinzufügen.

ECM.JobRunner.Windows/Scheduler/Jobs/DebugJob.vb

@@ -0,0 +1,25 @@
+Imports DigitalData.Modules.Logging
+Imports Quartz
+
+Namespace Scheduler.Jobs
+    Public Class DebugJob
+        Inherits BaseJob
+        Implements IJob
+
+        Private Function IJob_Execute(context As IJobExecutionContext) As Task Implements IJob.Execute
+            Dim oArgs = MyBase.InitializeJob(context)
+            Dim oArg1 = oArgs.Item("Arg1")
+
+            Logger.Info("I'm a debug Job!")
+            Logger.Info("Arg1: [{0}]", oArg1)
+
+            Dim oResult = New JobResult() With {
+                .Description = $"I'm a debug job and my result was [{Guid.NewGuid}]."
+            }
+
+            context.Result = oResult
+
+            Return Task.FromResult(True)
+        End Function
+    End Class
+End Namespace