|
' IMAP Client ActiveX Control Sample program
' (C) Copyright 1998 by Distinct Corporation
' All rights reserved
'flags
Global Const IMAP_MSG_DELETED = 1
Global Const IMAP_MSG_SEEN = 2
Global Const IMAP_MSG_ANSWERED = 4
Global Const IMAP_MSG_FLAGGED = 8
Global Const IMAP_MSG_DRAFT = 16
Global Const IMAP_NUM_MESSAGES = 32
Global Const IMAP_NUM_RECENT = 64
Global Const IMAP_UIDNEXT = 128
Global Const IMAP_UIDVALID = 256
Global Const IMAP_MSG_UNSEEN = 512
Global Const IMAP_MSG_RECENT = 1024
'flags for the smtp_header
Global Const IMAP_FROM_VALID = 1
Global Const IMAP_TO_VALID = 2
Global Const IMAP_DATE_VALID = 4
Global Const
IMAP_CC_VALID = 8
Global Const IMAP_BCC_VALID = 16
Global Const IMAP_SUB_VALID = 32
Global Const IMAP_REPLYTO_VALID = 64
Global Const
IMAP_INREPLYTO_VALID = 128
Global Const IMAP_SENDER_VALID = 256
Global Const IMAP_ATTR_VALID = 512
Global Const IMAP_MSGID_VALID = 1024
'valid flags for Imap header
Global Const IMAP_SIZE_VALID = 8
Global Const IMAP_UID_VALID = 16
Global Const IMAP_FLAGS_VALID = 32
'flags for the mime_header structure
Global Const IMAP_TYPE_VALID = 1
Global Const IMAP_SUBTYPE_VALID = 2
Global Const IMAP_CHARSET_VALID = 4
Global Const IMAP_ID_VALID = 16
Global Const IMAP_BOUNDARY_VALID = 32
Global Const IMAP_BODYLANG_VALID = 64
Global Const IMAP_ENCODE_VALID = 128
Global Const IMAP_SERVER_VALID = 256
Global Const IMAP_DIRECTORY_VALID = 512
Global Const IMAP_SITE_VALID = 1024
Global Const IMAP_FILENAME_VALID =
2048
Global Const IMAP_LINES_VALID = 4096
Global Const IMAP_PARTNUM_VALID = 8192
Global Const IMAP_DESP_VALID = 16384
Global Const IMAP_MD_VALID =
32768
Global Const IMAP_ACCESS_VALID = 65536
'mailbox permissions
Global Const IMAP_READ_WRITE = 6
Global Const IMAP_READ_ONLY = 7
' mailbox attributes
Global Const IMAP_NOSELECT = 8
Global Const IMAP_NOINFERIORS = 9
Global Const IMAP_MARKED = 10
Global Const IMAP_UNMARKED = 11
'add, remove or append attributes
Global Const IMAP_ADD = 12
Global Const IMAP_REMOVE = 13
Global Const IMAP_APPEND = 14
' fetch data items
Global Const IMAP_UID = 1
Global Const IMAP_FLAGS = 2
Global Const IMAP_SIZE = 4
Global Const IMAP_DATE = 8
Global
Const IMAP_RFC822_TEXT = 16
Global Const IMAP_RFC822 = 32
Global Const IMAP_RFC822_HEADER = 64
Global Const IMAP_BODYSTRUCT = 128
Global Const
IMAP_BODY = 256
Global Const IMAP_ENVELOPE = 512
Global Const IMAP_BODY_PEEK = 1024
Global Const IMAP_BODYSTRUCT_EXT = 2048
' flags for IMAP_BODY
Global Const IMAP_ENTIRE_MESSAGE = 1
Global Const IMAP_HEADER = 2
Global Const IMAP_HEADER_FIELDS = 4
Global Const
IMAP_HEADER_FIELDS_NOT = 8
Global Const IMAP_MIME_PART_HEADER = 16
Global Const IMAP_MIME_PART_BODY = 32
'errors
Global Const ERR_IMAP_IN_ACTION = 1
Global Const ERR_IMAP_CANNOT_PERFORM_ACTION = 2
Global Const ERR_IMAP_CANNOT_CONNECT = 3
Global Const
ERR_IMAP_INVALID_TIMEOUT = 4
Global Const ERR_IMAP_FAILURE = 5
Global Const ERR_IMAP_INVALID_HANDLE = 6
Global Const ERR_IMAP_ABORTED = 7
Global
Const ERR_IMAP_CANNOT_INIT_WINSOCK = 8
Global Const ERR_IMAP_TIMED_OUT = 9
Global Const ERR_IMAP_NOSELECTED_MAILBOX = 10
Global Const ERR_IMAP_FILE_ERROR = 11
Global Const ERR_IMAP_INSUFFICIENT_LENGTH = 12
Global Const ERR_IMAP_CANNOT_SEND_COMMAND = 13
Global Const ERR_IMAP_INVALID_MAILBOX = 14
Global
Const ERR_IMAP_INVALID_OPTION = 15
Global Const ERR_IMAP_INVALID_ARGUMENT = 16
Global Const ERR_IMAP_IN_APPEND = 17
Global Const ERR_IMAP_ABORT_FAILED = 18
Global Const ERR_IMAP_INVALID_BUFSIZE = 19
Global Const ERR_IMAP_SOCKET_ERROR = 20
Global Const ERR_IMAP_CONNECTION_CLOSED = 21
'return value
Global Const IMAP_SUCCESS = 1001
' flags for firewall server version
Global Const FW_VERSION5 = 2
Global Const FW_VERSION4 = 4
' flags for remote host address type
Global Const FW_ADDR_IP4= 1
Global Const FW_ADDR_DNS= 3
Global Const FW_ADDR_IP6= 4
| 
