58 lines
2.3 KiB
VB.net
58 lines
2.3 KiB
VB.net
Imports WINDREAMLib
|
|
Imports Limilabs.Mail
|
|
Imports Limilabs.Mail.MIME
|
|
Imports Limilabs.Mail.Headers
|
|
Imports MailBox = Limilabs.Mail.Headers.MailBox
|
|
Imports Limilabs.Client.IMAP
|
|
|
|
Public Class ClassCurrent
|
|
Public Shared Property WM_DRIVE As String
|
|
|
|
Public Shared Property CURRENT_EMAIL_GUID As Integer
|
|
Public Shared Property CURRENT_PROFILE_GUID As Integer
|
|
|
|
Public Shared Property DT_POLL_PROCESS As DataTable
|
|
Public Shared Property DT_STEPS As DataTable
|
|
Public Shared Property DT_INDEXING_STEPS As DataTable
|
|
|
|
Public Shared Property CURRENToWMSession As Object
|
|
Public Shared Property CURRENToWMSession_Created As Date = Now
|
|
Public Shared Property CURRENToWMConnect As Object
|
|
Public Shared Property CURRENT_ATTMT_COUNT As Integer
|
|
Public Shared Property SUBJECT_PRAFIX As String = "EmailProfiler"
|
|
Public Shared Property CURRENT_DRIVE_CHECK As String = ""
|
|
Public Shared Property CURRENT_DRIVE_ISFULL As Boolean = False
|
|
|
|
|
|
Public Shared Property CURRENT_WORKMAIL_UID_LIST As New List(Of Long)
|
|
|
|
Public Shared Property CURRENT_ImapObject As Imap
|
|
Public Shared Property CURRENT_MAIL_UID As Long
|
|
|
|
Public Shared Property DeleteMail As Boolean = False
|
|
Public Shared Property CURRENT_POLL_TYPE As String
|
|
|
|
Public Shared Property POLL_STEP_GUID As Integer
|
|
Public Shared Property POLL_KEYWORDS As String
|
|
Public Shared Property KEYWORDS_SPLIT As String()
|
|
|
|
Public Shared Property WM_REFERENCE_INDEX As String
|
|
Public Shared Property WM_VECTOR_LOG As String
|
|
Public Shared Property WM_OBJEKTTYPE As String
|
|
Public Shared Property WM_IDX_BODY_TEXT As String
|
|
Public Shared Property WM_IDX_BODY_SUBSTR_LENGTH As String
|
|
|
|
Public Shared Property CURRENT_WM_DOC As WMObject
|
|
Public Shared Property CURRENT_DOC_ID As Integer
|
|
Public Shared Property CURRENT_DOC_PATH As String
|
|
Public Shared Property MESSAGE_ERROR As Boolean = False
|
|
Public Shared Property IS_LOCAL_TEST As Boolean = False
|
|
|
|
Public Shared Property TEMP_FILES As List(Of String) = New List(Of String)
|
|
|
|
Public Shared Property TEMP_WORK_FILES As List(Of String) = New List(Of String)
|
|
Public Shared Property GDPictureLicense As String = "None"
|
|
|
|
Public Shared Property EmailAttachments As List(Of EmailAttachment) = New List(Of EmailAttachment)
|
|
End Class
|