HOW TO SAVE MESSAGES

  • Thread starter Thread starter black.marlin
  • Start date Start date
B

black.marlin

Hallo
Sorry for my english!
I want to save message (like Save As) and then register in a database
where i saved it.
I tried

Dim MyOlApp As New Outllok.Application
Dim MyOlExp As Outlook.Esplorer
Set MyOlExp=MyOlApp.ActiveExplorer
MyOlExp.Selection.Item(1).SaveAs Pathname , olMSG
follows MS Access application call

It seems to run but the first time i launch Outlook the saved message
is correct but the selection shifts on another message. I normally use
Win XP Pro and MS Office 2003 and i tried on some PC. Sometimes no
problem, sometimes happenes what i wrote.

Some help ?
Thanks
 
Back
Top