D
Dave
I need to get a list of the names of user defined fields in the Outlook
contacts folder.
These aren't the standard User1, User2 etc, fields but customer created
fields.
I can access there _values_ by creating a "Items" object and looping through
it like (very rough code):
Dim f as Outlook.MAPIFolder
Dim c as Outlook.ContactItem
Dim oItems as Outook.Items
Set oItems = f.Items
For i=1 to 10
If TypeName(oItems(i) = "ContactItem" Then
Set c=oItems(i)
Debug.Print c.UserProperties("CustomerPropertyName")
End If
Next i
What I am trying to do is loop through all the ContactItems.UserProperties
and list the names of all the user properties (in this example,
"CustomerPropertyName").
Can anyone give me some pointers on how to do this?
contacts folder.
These aren't the standard User1, User2 etc, fields but customer created
fields.
I can access there _values_ by creating a "Items" object and looping through
it like (very rough code):
Dim f as Outlook.MAPIFolder
Dim c as Outlook.ContactItem
Dim oItems as Outook.Items
Set oItems = f.Items
For i=1 to 10
If TypeName(oItems(i) = "ContactItem" Then
Set c=oItems(i)
Debug.Print c.UserProperties("CustomerPropertyName")
End If
Next i
What I am trying to do is loop through all the ContactItems.UserProperties
and list the names of all the user properties (in this example,
"CustomerPropertyName").
Can anyone give me some pointers on how to do this?