17 lines
497 B
VB.net
17 lines
497 B
VB.net
Imports DigitalData.Modules.Jobs
|
|
Imports DigitalData.Modules.Logging
|
|
|
|
Public Class Form1
|
|
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
|
Dim oLogConfig As New LogConfig(LogConfig.PathType.Temp)
|
|
Dim oJob As New GraphQLJob(oLogConfig)
|
|
|
|
Dim oArgs As New GraphQLArgs() With {
|
|
.Enabled = True,
|
|
.Interval = 999,
|
|
.QueryConfigPath = "E:\GraphQL"
|
|
}
|
|
oJob.Start(oArgs)
|
|
End Sub
|
|
End Class
|