Outlook - HTML/RTF nach TXT konvertieren

[fritzo 10]

Hi,

 

hier etwas für alle viren/spam/trojanergeplagten Outlook-Benutzer. Das unten ist ein VBA-Modul, mit dem Mails nach TXT konvertiert werden:

 

Sub ConvertHTMLToDefault(objMsg As MailItem)

Select Case objMsg.BodyFormat

Case olFormatHTML, olFormatUnspecified

objMsg.BodyFormat = olFormatPlain

objMsg.Save

Case Else

' RTF or plain text are OK

End Select

Set objMsg = Nothing

End Sub

 

Lässt sich zB mit einer Regel antriggern, die auf alle eingehenden Mails angewendet wird, ich hab es auf winmag.com gefunden.

 

Ansonsten kann man aber auch einfach den ReadAsPlain-Regkey mit folgendem Befehl setzen (Outlook 2003) :

 

"reg add HKCU\Software\Microsoft\office\11.0\outlook\options\mail /v ReadAsPlain /t REG_DWORD /d 1"

 

Dürfte auch mit den Vorgängerversionen gehen, dann ist nur "11.0" durch die entsprechende Versionsnummer zu ersetzen.

 

Grüße,

Fritz