Signatuer verschwindet bei .Body fso.OpenTextFile("email.txt",1).ReadAll (mailto:)
Hi Leute,
habe folgendes .vbs Script
Wenn ich dieses Script ausführe, ist im body der Text aus email.txt. Soweit so gut.
Problem: Die Signatur, welche in Outlook erstellt wurde, verschwindet.
Wenn ich im Outlook auf "neu Mail" klicke, ist sie jedoch da.
LG
pdiddo
habe folgendes .vbs Script
Set objOutlook = CreateObject("Outlook.Application")
Set fso = CreateObject("Scripting.FileSystemObject")
With objOutlook.CreateItem(0)
.Subject = "Betreff"
.Body = fso.OpenTextFile("email.txt",1).ReadAll
.Display
End With
Wenn ich dieses Script ausführe, ist im body der Text aus email.txt. Soweit so gut.
Problem: Die Signatur, welche in Outlook erstellt wurde, verschwindet.
Wenn ich im Outlook auf "neu Mail" klicke, ist sie jedoch da.
LG
pdiddo
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 333870
Url: https://administrator.de/contentid/333870
Ausgedruckt am: 22.11.2024 um 17:11 Uhr
9 Kommentare
Neuester Kommentar
Wenn die Signatur aus einem reinenTextbody besteht
oder wenn es ein HTML-Body ist
Gruß p.
.Body = fso.OpenTextFile("email.txt",1).ReadAll & vbNewline & .Body
.HTMLBody = fso.OpenTextFile("email.txt",1).ReadAll & vbnewline & .HTMLBody
Gruß p.
Hi,
ist doch logisch, wenn Du den Body ersetzt. Die Signatur gehört zum Body.
Also so versuchen:
E.
ist doch logisch, wenn Du den Body ersetzt. Die Signatur gehört zum Body.
Also so versuchen:
Set objOutlook = CreateObject("Outlook.Application")
Set fso = CreateObject("Scripting.FileSystemObject")
With objOutlook.CreateItem(0)
.Subject = "Betreff"
.Body = fso.OpenTextFile("email.txt",1).ReadAll & vbnewline & .Body
.Display
End With
E.
Doch, wurde hier einwandfrei getestet!
Du kannst aber auch eine oft Vorlage erstellen und dann in Zeile 3 schreiben
das geht ebenfalls 100%, ansonsten hast du die Signatur nicht richtig als Standard eingestellt oder unsere Codes falsch angewendet!
Du kannst aber auch eine oft Vorlage erstellen und dann in Zeile 3 schreiben
With objOutlook.CreateItemFromTemplate("c:\pfad\vorlage.oft")
Dito.
Na wenn es mit der Vorlage gaht, dann mach es doch so?
Ich weis nicht wieso aber bei mir geht es einfach nicht.!!!!
"geht nicht" ist einer der am häufigsten auftretenden Fehler auf der Welt. Da hilft nichts gegen. Außer vielleicht, man macht sich die Mühe "geht nicht" mit Quellen zu hinterlegen, z.B. Zitate von Fehler- und/oder sonstiegen Meldungen, Screenshots, Logfiles, o.ä. Dann könnte es passieren, dass jemand dazu was genaueres sagen kann.