Something likethefollowing (off the tp of my head):
strQuery = "[ReceivedTime] > ""10-01-2009"" and [ReceivedTime] <
""10-31-2009"" "
set InboxItems =
Application.Session.GetDefaultFolder(olFolderInbox).Items
set Msg = InboxItems.Find(strQuery)
While Not (Msg Is Nothing)
Debug.Print Msg.Subject
set Msg = InboxItems.FindNext
Wend
--
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
-
IpcTrain said:
Dmitry,
What would the script look like. Assume 30 day from receive date or
last
review date.
--
Hope You can help.
Thank You,
IpcTrain
:
Youy would have to create your own script that decides which messages
exactly satisfy your criteria (30 days in the inbox?) and performs teh
appropriate action.
There is no built-in rule for that.
--
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
-
How to create a rule in Outlook XP or 2003; after 30 days in the
inbox
send
to a folder?
--
Hope You can help.
Thank You,
IpcTrain
.
.