Exchange Server

Blair Nygren · Guest

I need to access the Appointment Global Id at named property via CDOEX.

({6ED8DA90-450B-101B-98DA-00AA003F1305}, 0x23, PT_BINARY)

which contains the actual property tag that needs to open. Something of a
two step process. One I get the named property tag value (x8195 or something
close)

I Retrieve a property tag is simply:

http://schemas.microsoft.com/mapi/proptag/x81950102 (returned property tag)

however based on each user the actually property varies. I need a way via
CDOEX value of the named property then get the property value. Any ideas?

MAPI is one way, but is difficult to get to other exchange user profiles
stores, without adding them to the profile of the account I using to do this.
Doing this will create a host of management problems in MAPI.

Thanks

Blair

--
Blair Nygren
Client Profiles Inc.

Glen Scales [MVP] · Guest

You should be able to get the named property by using
http://schemas.microsoft.com/mapi/id/{6ED8DA90-450B-101B-98DA-00AA003F1305}/0x23
this is a binary property so your going to get binary data returned. You can
use something like this to convert it to hex

eg

set appt = createobject("CDO.Appointment")
appt.datasource.open "http://servername/exchange/mailbox/Calendar/appt.EML"
wscript.echo
Octenttohex(appt.fields("http://schemas.microsoft.com/mapi/id/{6ED8DA90-450B-101B-98DA-00AA003F1305}/0x23").value)

Function Octenttohex(OctenArry)
ReDim aOut(UBound(OctenArry))
For i = 1 to UBound(OctenArry) + 1
if len(hex(ascb(midb(OctenArry,i,1)))) = 1 then
aOut(i-1) = "0" & hex(ascb(midb(OctenArry,i,1)))
else
aOut(i-1) = hex(ascb(midb(OctenArry,i,1)))
end if
Next
Octenttohex = join(aOUt,"")
End Function

Cheers
Glen

"Blair Nygren" <BlairNygren@discussions.microsoft.com> wrote in message
news:350E3862-C9C3-471C-99B6-83DDB9C3979C@microsoft.com...

	Exchange Server Forum Index -> Development	All times are GMT
Page 1 of 1