L
Lester
I am trying to automatically save an incoming e-mail as html when it
arrives. No rule will do that. The following code works fine:
Sub canslim()
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.ActiveInspector.CurrentItem
myItem.SaveAs "U:\Auxiliaries\" & "CSToday.htm", olHTML
End Sub
But I have to manually open the e-mail and then call the macro.
Any ideas?
arrives. No rule will do that. The following code works fine:
Sub canslim()
Set myOlApp = CreateObject("Outlook.Application")
Set myItem = myOlApp.ActiveInspector.CurrentItem
myItem.SaveAs "U:\Auxiliaries\" & "CSToday.htm", olHTML
End Sub
But I have to manually open the e-mail and then call the macro.
Any ideas?