I have a loop that loops though each message in a Outlook folder... Outlook 2003/ VB.Net 2003/ XP operating system.
Dim myOlapp As Outlook.Application
Dim myoMsg As Outlook.MailItem
Dim myOFolder As Outlook.MAPIFolder
myOlapp = CreateObject("Outlook.Application")
myoMsg = myOlapp.CreateItem(Outlook.OlItemType.olMailItem)
myOFolder = GetFolder(sInboxMailFolder)
for each myomsg in myOfolder.items
If myoMsg.Attachments.Count > 0 Then
My probem is that sometimes there are other types of messages in there (Hidden, contacts etc).
I would like to see the type first then do something with it.
What is the best way to do this.