Outlook per Script Mail versenden
per VBScript ein Mail Versenden
Const olByValue = 1
Const olMailItem = 0
Dim oOApp
Dim oOMail
Set oOApp = CreateObject("Outlook.Application")
Set oOMail = oOApp.CreateItem(olMailItem)
With oOMail
.To = "meinemailadresse.meine"
.Subject = "Hier der Betreff"
.Body = "was will ich schreiben "
.Attachments.Add "c:\einetestdatei.txt", olByValue, 1
.Send
End With
um den Zugriff für Skripts zu gewähren muss im Outlook: "Bei verdächtigen Aktivitäten nie Warnhinweis anzeigen (nicht empfohlen)" ausgewählt werden.(Outlook 2007): 
bei Outlook 2003 ist das etwas komplizierter:
siehe
www.outlookcode.com/article.aspx?ID=52
({{pro_count}})
{{percentage}} % positiv
({{con_count}})
DANKE für deine Bewertung!
Fragen / Kommentare
(sortiert nach Bewertung / Datum) [alle Kommentare(neueste zuerst)]
User: zween Danke für die schnelle Antwort. Diese Script habe ich auch schon benutz, ist aber nicht das was ich benötige. Problem nochmal neu: In meiner Abteilung benutzen wir Outlook-Exchange-Server. Darin enthalten ist ein Ordner "Öffentlicher Ordner" der mehrere Untergliederungen hat. Dieser "Öff. Ordner" kann von allen Benutzern meiner Abteilung eingesehen werden. In einer dieser Untergliederungen möchte ich nun per VBS einen Beitrag erstellen und nicht einfach nur eine "Neue Email" erstellen.
User: zween Wie kann man per VBS in Outlook in den Öffentlichen Ordner einen "Neuen Beitrag" inclusive Anhang erstellen?
User: User Hallo, ich möchte in der email das aktuelle Datum mit einfügen. Wie muss ich dabei vorgehen, wenn ich die oben angegebene Vorlage nutzen möchte. Gruss und Vielen Dank im vorraus für die Hilfe
User: Olinux bin normalerweise auf der bash zu Hause und habe kaum Ahnung von wscript. Wie bekomme ich denn einen langen Text aus der commandline in die .Body? Also so etwas wie set /P "variable=" in einer cmd... Dankeschön