Receives a specified email headers from mail server.
[Visual Basic 6.0] Public Function GetFollowUpFlag( _ info As MailInfo ) As String
[Visual C++] public: HRESULT GetFollowUpFlag( IMailInfo* info, BSTR* pVal );
Parameters
Return Value
Remarks
Example
[VB 6.0] const GetMailInfos_All = 1 const GetMailInfos_NewOnly = 2 const GetMailInfos_ReadOnly = 4 const GetMailInfos_SeqRange = 8 const GetMailInfos_UIDRange = 16 const GetMailInfos_PR_ENTRYID = 32 const GetMailInfos_DateRange = 64 const GetMailInfos_OrderByDateTime = 128 const GetMailInfos_GetCategories = 256 const GetMailInfos_ImapDeleted = 512 const GetMailInfos_ImapUndeleted = 1024 const GetMailInfos_GetFollowUpFlag = 2048 const GetMailInfos_IncludeAllFolders = 4096 ' you must use EWS or Graph API to connect the server client.Connect server ' retrieve categories and follow up flag to MailInfo client.GetMailInfosParam.Reset Dim options options = options Or GetMailInfos_GetCategories options = options Or GetMailInfos_GetFollowUpFlag client.GetMailInfosParam.GetMailInfosOptions = options Dim mailInfos Set mailInfos = client.GetMailInfoList() Debug.Print "Total " & mailInfos.Length & " email(s)" Dim i For i = 0 To mailInfos.Length - 1 Dim mailInfo Set mailInfo = mailInfos.Item(i) ' if you have set GetMailInfos_GetFollowUp Flag, you don't need to call this method ' return notFlagged, flagged, or complete Debug.Print client.GetFollowUpFlag(mailInfo) Debug.Print "Index: " & i & ", UIDL: " & mailInfo.UIDL Debug.Print "Follow up flag: " & mailInfo.FollowUpFlag Next
See Also