Please do not multipost. Place each group you want copied on one post into
the To field of your post.
You need to delete a host of undocumented properties, and you have to do it
using a low level API such as CDO 1.21, Extended MAPI or Redemption. I'm not
sure if you can do it with PropertyAccessor in Outlook 2007,
PropertyAccessor restricts you from deleting any properties MS decided are
necessary for Outlook's business logic but hasn't released a list of those
properties.
Using Redemption code and VB this is what you'd have to do. This code
snippet doesn't show all the declarations and code to get to every message
in the folder, objMessage is an Redemption.RDOMail item:
Const strPropsetGUID As String = "{00062008-0000-0000-C000-000000000046}"
With objMessage
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8540) Or
PT_BINARY
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8541) Or
PT_BINARY
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8542) Or PT_LONG
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H850F) Or
PT_BINARY
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H851B) Or
PT_BINARY
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8510) Or PT_LONG
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8513) Or
PT_BINARY
.Fields(lngTag) = Empty
lngTag = objFolder.GetIDsFromNames(strPropsetGUID, &H8514) Or
PT_BOOLEAN
.Fields(lngTag) = Empty
' save the changes
.Save
End With