I want to have a Folder automatically delete any posts to
it that are not Microsoft Word documents.
So far, what I've done is have the following in an Agent
Public Sub Folder_OnMessageCreated
Dim CDOSession, oMsgTarget
Set CDOSession = EventDetails.Session
Set oMsgTarget = CDOSession.GetMessage
' if oMsgTarget.Type <> "Microsoft Word" then
' end if
This is supposed to delete the message (which it doesn't).
I have commented out the lines I want to put in with the
logic to say, if this isn't a Microsoft Word document,
then delete it from the folder.
How can this be done? How can the type of post be checked?
Also, on a more general note, is it possible to allow
Files of other types besides Office documents to be posted
to a Public Folder?