tweaking, graphql job, add graphql test gui
This commit is contained in:
25
Service.JobRunner/Jobs/GraphQLJob.vb
Normal file
25
Service.JobRunner/Jobs/GraphQLJob.vb
Normal file
@@ -0,0 +1,25 @@
|
||||
Imports DigitalData.Modules.Database
|
||||
Imports DigitalData.Modules.Jobs
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports Quartz
|
||||
|
||||
Public Class GraphQLJob
|
||||
Implements Quartz.IJob
|
||||
|
||||
Public Function Execute(context As IJobExecutionContext) As Task Implements Quartz.IJob.Execute
|
||||
Dim oJobData = context.MergedJobDataMap
|
||||
Dim oLogConfig As LogConfig = oJobData.Item("LogConfig")
|
||||
Dim oArgs As Dictionary(Of String, String) = oJobData.Item("Args")
|
||||
Dim oJobArgs = New GraphQLArgs With {
|
||||
.CertificateFile = oArgs.Item("CertFile"),
|
||||
.CertificatePassword = oArgs.Item("CertPass"),
|
||||
.Email = oArgs.Item("Username"),
|
||||
.Password = oArgs.Item("Password")
|
||||
}
|
||||
|
||||
Dim oGraphQLJob As New Modules.Jobs.GraphQLJob(oLogConfig)
|
||||
oGraphQLJob.Start(oJobArgs)
|
||||
|
||||
Return Task.FromResult(True)
|
||||
End Function
|
||||
End Class
|
||||
Reference in New Issue
Block a user