Accessing Outlook custom task form data
-
Hello all, I'm using Outlook 2000 and I'm trying to access data held on a customised Outlook task form held in a public folder. I'm using the following code to get at what I need, and can see certain values via objTask, but I can't see where I get at other 'fields' used on the form. One of the fields, for example, is called "CC Ref", but I can't find where I can get at it.
Dim objOutlook As Outlook._Application
objOutlook = New Outlook.Application()
Dim objNS As Outlook._NameSpace = objOutlook.Session
Dim oAllPublicFolders As Outlook.MAPIFolder
Dim oPublicFolders As Outlook.MAPIFolder
Dim objCodeChangeRequests As Outlook.MAPIFolderoPublicFolders = objNS.Folders.Item("Public Folders")
oAllPublicFolders = oPublicFolders.Folders.Item("All Public Folders")
objCodeChangeRequests = oAllPublicFolders.Folders.Item("Code Change Requests")
Dim objItems As Outlook.Items = objCodeChangeRequests.Items
Dim objTask As Outlook._TaskItem
objTask = objItems.GetFirstThanks in advance!
-
Hello all, I'm using Outlook 2000 and I'm trying to access data held on a customised Outlook task form held in a public folder. I'm using the following code to get at what I need, and can see certain values via objTask, but I can't see where I get at other 'fields' used on the form. One of the fields, for example, is called "CC Ref", but I can't find where I can get at it.
Dim objOutlook As Outlook._Application
objOutlook = New Outlook.Application()
Dim objNS As Outlook._NameSpace = objOutlook.Session
Dim oAllPublicFolders As Outlook.MAPIFolder
Dim oPublicFolders As Outlook.MAPIFolder
Dim objCodeChangeRequests As Outlook.MAPIFolderoPublicFolders = objNS.Folders.Item("Public Folders")
oAllPublicFolders = oPublicFolders.Folders.Item("All Public Folders")
objCodeChangeRequests = oAllPublicFolders.Folders.Item("Code Change Requests")
Dim objItems As Outlook.Items = objCodeChangeRequests.Items
Dim objTask As Outlook._TaskItem
objTask = objItems.GetFirstThanks in advance!
Found it ...
Dim objUP As Outlook.UserProperty
objUP = objTask.UserProperties.Item("CC Ref")