25 lines
877 B
VB.net
25 lines
877 B
VB.net
Imports System.Collections.Generic
|
|
|
|
Public Class WorkerArgs
|
|
Public WatchDirectories As List(Of String)
|
|
Public SuccessDirectory As String
|
|
Public ErrorDirectory As String
|
|
Public OriginalEmailDirectory As String
|
|
Public RejectedEmailDirectory As String
|
|
Public AttachmentsSubDirectory As String
|
|
Public PropertyMap As Dictionary(Of String, XmlItemProperty)
|
|
Public InsertIntoSQLServer As Boolean
|
|
Public GDPictureKey As String
|
|
|
|
Public Sub New()
|
|
WatchDirectories = New List(Of String)
|
|
SuccessDirectory = Nothing
|
|
ErrorDirectory = Nothing
|
|
OriginalEmailDirectory = Nothing
|
|
RejectedEmailDirectory = Nothing
|
|
AttachmentsSubDirectory = Nothing
|
|
PropertyMap = New Dictionary(Of String, XmlItemProperty)
|
|
InsertIntoSQLServer = False
|
|
GDPictureKey = String.Empty
|
|
End Sub
|
|
End Class |