I don't understand what NS means?
"Dmitry Streblechenko" wrote in message
...
Set App = CreateObject("Outlook.Application")
Set NS = App.Logon
set Inbox = NS.GetDefaulFolder(6) 'olFolderInbox
for each Msg in Inbox.Items
FileNname = "C:\Messages\" & Msg.Subject
'todo: make sure there are no invalid characters in FileName, such as
":", "*", etc
Msg.SaveAs FileName, 1 'olRtf
next
Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool
"Maxx" wrote in message
...
How can I create an archive that contains each outlook mshg from the
inbox saved as an rtf file in a folder such as "C:\Messages"?
I'm using Outlook 2003.