Using VB6 to display the Category and Folder of an email in Outlook 2007

We have a code that displays all the emails in Outlook 2007.

We want to also display the folder where its saved and also the category that is assign,

How can we incorporate this in our app?

(Included is part of the code, its in VB6)

Sub ProcessStore(olkFld As Object)
    Const olMailItem = 0
    Const olMail = 43
    Dim olkItm As Object, olkSub As Object, olkAtt As Object
    If olkFld.DefaultItemType = olMailItem Then
        For Each olkItm In olkFld.Items
            If olkItm.Class = olMail Then
                strBuffer = strBuffer & x & " - " & sp _
                          & olkItm.SentOn & sp & olkItm.ReceivedTime & sp & olkItm.SenderName & sp _
                          & olkItm.Subject & sp & olkItm.to & sp & olkItm.Body & vbCrLf
               'Display and export
                List.AddItem strBuffer
                Print #2, strBuffer
                strBuffer = ""
            End If
        Next
    End If
    
    For Each olkSub In olkFld.Folders
        ProcessStore olkSub
    Next
End Sub

Open in new window

rayluvsAsked: 2011-03-05

Who is Participating?

LVL 59

Chris BottomleySoftware Quality Lead EngineerCommented: 2011-03-06

The parent is the folder therefore:
olkItm.parent.folderpath

and for the category string
olkitm.categories

Chris

LVL 2

active_agentCommented: 2011-03-06

Just to confirm, you are looking to display the folder name and categories associated with the mail item.

- Folder Name : You are already passing the Folder object to ProcessStore, i believe there is Name property to that object.
- Category : Have you tried Categories property of mail item you were displaying.

Let me know how it goes.

Thanks

LVL 73

QlemoBatchelor, Developer and EE Topic AdvisorCommented: 2011-03-06

That is correct. If you want to display the complete path of the folder, you can use .FolderPath.
MailItem.Categories consists of a concatenated String of categories - so there can be more than one categorie in it.

rayluvsAuthor Commented: 2011-03-06

Yes , I am looking to display the folder name and categories associated with the mail item.

I tried ".FolderPath' and it gave me

Run-time error: '438'
Object doesn't support this property or method

How do I use MailItem.Categories to display the string or categories?

LVL 73

QlemoBatchelor, Developer and EE Topic AdvisorCommented: 2011-03-06

I assume that is not your code? Because we thought you have some experience already, so we haven't been much detailled in our answers.

Chris is correct. You can access the folder path either by
olkItm.Parent.FolderPath
or, since we also have the folder itself ready,
olkFld.FolderPath