Das Archiv des Excel-Forums

Email bodytext aus Datei

Bild

Betrifft: Email bodytext aus Datei
von: Sascha

Geschrieben am: 06.10.2003 23:20:52

Hab mich jetzt ne ganze weile durch gekämpft, aber das was ich suche hab ich nicht gefunden.

Ich möchte eine Email mit Anhang versenden, diese soll im Body-Teil den Inhalt der Datei body.txt stehen haben.

Folgendes verwende ich:



Sub Mailversand()
Dim object
Dim mail
Set object = CreateObject("Outlook.Application")
Set mail = object.CreateItem(0)
mail.To = "'Empfänger'"
mail.Subject = "'Betreff'"
mail.Body = "?????" 'genau hier liegt das Problem
mail.Attachments.Add "c:\test.pdf"
mail.Display
mail.Send
End Sub


bei m.body = ... soll dann der Inhalt der Datei Body.txt stehen


Im Voraus besten Dank
Bild


Betrifft: AW: Email bodytext aus Datei
von: Hans W. Herber
Geschrieben am: 07.10.2003 04:15:10

Hallo Sascha,

die Textdatei muss eingelesen werden. Ein Beispiel fürs Einlesen findest Du hier:
https://www.herber.de/bbs/texte/12readtext.xls

gruss hans


Bild


Betrifft: AW: Email bodytext aus Datei
von: Sascha
Geschrieben am: 07.10.2003 08:46:02

Danke für die schnelle Antwort.

Ich wusste, dass sie eingelesen werden muss. Da ich aber erst angefangen habe mich in die Materie einzuarbeiten, ist es scher das alleine hin zu bekommen.

mfG


Sascha


 Bild