Test if property of an Outlook item exists

[water]

Hi,

I try to acces the properties of an Outlook item (contact, address ...) by name.

$Result = $oItem.ItemProperties.Item("FirstName").value

If the property doesn't exist I get

H:\tools\AutoIt3\Outlook\OutlookGetItems.au3 (197) : ==> Object referenced outside a "With" statement.:
$Result = $oItem.ItemProperties.Item("xy").value
$Result = $oItem.ItemProperties.Item("xy").^ EROR

How can I check if a property exists?

Thanks in advance!

[PsaltyDS]

Maybe get the collection of .ItemProperties then walk the collection checking for $oProperty.name:

$oItemProperties = $oItem.ItemProperties
$f_Found = False
For $oProperty In $oItemProperties
    If $oProperty.name & "" = "firstName" Then
        $f_Found = True
        ExitLoop
    EndIf
Next

If $f_Found Then
    MsgBox(64, "Found", "Item property 'FirstName' = " & $oItem.ItemProperties.Item("FirstName" ).value)
Else
    MsgBox(16, "Not Found", "Item does not have 'FirstName' property.")
EndIf

(Not tested.)

[water]

Hi PsaltyDS,

thanks for the fast reply!

I had something similar in mind (and have already implemented it). But I was dreaming of a "one-liner" to test for existance or at least a way to catch the error if a property that doesn't exist is accessed.

Thanks and greetings from snowy Austria!

[PsaltyDS]

Well, if you have a COM error handler implemented (and I KNOW you do) this should work in two lines without crashing the script on error:

$oTarget = $oItem.ItemProperties.Item("xy")
If IsObj($oTarget) Then $Result = $oTarget.value

[water]

Hi PsaltyDS,

thanks for your suggestion. I will give it a try.