Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
OLE and Outlook
 |
- Add Attachment to Journal Item
- Adding Contact Information into Outlook
- Compiled EXE Keeps Running Under Task Manager
- Copy Contacts Folder to Subfolder in Outlook
- Create a Folder under Personal Folders in Outlook
- Create Outlook Distribution List
- Creating Address Book XML File
- Current Contact Folder Items
- Delete Mail from Outlook using OLE
- Delete Outlook Contact
- Email Forwarder
- Embed an Image into an Outlook Email
- Empty Folder in Outlook
- Encrypt Message in Outlook
- Find Contacts in Outlook
- Find Folder with the String Mailbox
- Get Internet headers Field from Outlook Message
- Get Contact data form Contact Item Currently Selected in Outlook
- Get Contact Information In Outlook
- Get Internet headers Field from Outlook Message
- Get list of appointments
- Get member of Outlook Distribution List
- Get Outlook Contact information
- How to Send Mail from Outlook using OLE
- Identify Outlook Folder Type or Contents
- Import Excel Data into Outlook Contact Folder
- Launch Outlook and Make Visible
- List Subfolders
- Mark Messages as Read in Outlook using OLE
- ObjectEventAdd To Capture ItemSend Event
- OLE and OUTLOOK check mail
- OLE and OUTLOOK read mail other than inbox
- OLE and OUTLOOK read mail
- OLE MAPI Choose Folder
- OLE_Outlook- add Entry to Address book
- Outlook - Get Oldest Email Message
- Outlook constants
- Outlook Contacts to XML
- Outlook PST to MSG Export
- Outlook Quit Event
- Outlook Received Date
- Outlook Reply-To in OLE
- Outlook Sendmail OLE Example
- Outlook Version
- Read Open Active Outlook Message
- Recurse Outlook folders
- Redemption Causes WinBatch Studio to Crash
- Rename Personal Folder in Oulook
- Save file attachments in Outlook
- Save outlook attachments
- Send to Multiple Recipients
- Sort Email by Received Time
- TypeOf Equivalent
- Use Existing Instance Or Create a New One If Necessary
- Using OLE to resolve name in Outlook
- WinBatch and Redemption Issue
- Writing Appointments to Outlook
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Identify Outlook Folder Type or Contents
Question:
Is it possible to easily identify the type or contents of an Outlook folder from Outlooks folder list? Possibly using the Class Property of an item. For example if it was required to identify a folder which contained Outlook contacts this has items with olContact = 40.It is possible to list the Outlook folder list using the following code but how can any folder containing contacts be identified?
objOutLook = ObjectOpen ("Outlook.Application")
objNameSpace = objOutLook.GetNamespace("MAPI")
;Get all folders
objNSFolders = objNameSpace.Folders('Personal Folders')
objFolders = objNSFolders.Folders
count = objFolders.Count
list = ""
for xx = 1 to count
objItem = objFolders.Item(xx)
name = objItem.name
list = strCat(list,@tab,name)
ObjectClose(objItem)
next
folderchosen = AskItemList("folderlist",strtrim(list),@tab,@unsorted,@single)
Message("folder chosen",folderchosen)
Answer:
Maybe check out the DefaultItemType Property...
objOutLook = ObjectOpen ("Outlook.Application")
objNameSpace = objOutLook.GetNamespace("MAPI")
;Get all folders
objNSFolders = objNameSpace.Folders('Personal Folders')
objFolders = objNSFolders.Folders
count = objFolders.Count
for xx = 1 to count
objItem = objFolders.Item(xx)
type = objItem.DefaultItemType
Switch type
case 0 ;olMailItem
typename = "Mail Item"
break
case 1 ;olAppointmentItem
typename = "Appointment Item"
break
case 2 ;olContactItem
typename = "Contact Item"
break
case 3 ;olTaskItem
typename = "Task Item"
break
case 4 ;olJournalItem
typename = "Journal Item"
break
case 5 ;olNoteItem
typename = "Note Item"
break
case 6 ;olPostItem
typename = "Post Item"
break
case 7 ;olDistributionListItem
typename = "Distribution List Item"
break
case type
typename = "UNKNOWN"
break
EndSwitch
name = objItem.name
Message(name,typename)
ObjectClose(objItem)
ObjectClose(objFolders)
ObjectClose(objNSFolders)
ObjectClose(objNameSpace)
ObjectClose(objOutLook)
next
Article ID: W16092
File Created: 2004:03:30:15:42:48
Last Updated: 2004:03:30:15:42:48