View Single Post
  #5  
Old December 11th 07, 04:48 PM posted to microsoft.public.outlook.program_vba
Sue Mosher [MVP-Outlook]
external usenet poster
 
Posts: 11,651
Default How can I create an archive od outlook msgs saved as rtf files (outside of outlook)

In that case, in your VBA macro, replace Dmitry's first two statements with this one:

Set NS = Application.Session

--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook 2007 Programming:
Jumpstart for Power Users and Administrators
http://www.outlookcode.com/article.aspx?id=54


"Maxx" wrote in message ...
Oh, I just realised NS = namespace.

I just want to run a vba routyine from inside outlook 2003 (or excel or
word). I don't have visual studio or anything.

Max


"Maxx" wrote in message
...
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.











Ads