Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
312to316
312to316
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

sendmail

sendmail
26.09.2003 12:39:41
jhaustein
hallo gemeinschaft

habe zwar schon viel gestöbert aber nichts richtiges gefunden- ich möchte mit sendmail eine mail versenden - leider geht das nur, dass ich das workbook versende - will ich aber nicht sondern nur einen text der nicht als anhang versendet wird, sondern direkt in der mail ist (body) geht das überhaupt ?

gruss
jörg

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: sendmail
26.09.2003 14:46:16
Kobra
Hallo das geht ungefär so

'Versuch eine Email an einen bestimmten Adressaten zu versenden
Dim EmailEmpfänger As String, EmailBetreff As String
Dim EmailMsg As String
Dim ZeileNr As Integer
'Outlook wird geöffnet
Set myOlApp = CreateObject("Outlook.Application")
'Fenster für neue Mail wird geöffnet
Set MailItem = myOlApp.CreateItem(olMailItem) ' opens new email
On Error GoTo ErrorHandler
'Emailadresse
EmailEmpfänger = "Name@web.de"
'Betreff der Nachricht
EmailBetreff = "Änderung Datei"
'Aufbau der Nachricht
EmailMsg = "Hallo Markus," & vbCrLf
EmailMsg = EmailMsg & "Achtung folgender Tag war nicht vorhanden:" & vbCrLf
'Namen hinzufügen
EmailMsg = EmailMsg & "Gruss Excel"
'Empfänger der Mail wird in das Adressfeld "An:" geschrieben
Set myRecipient = MailItem.Recipients.Add(EmailEmpfänger)
'Betreff der Mail wird in das Feld "Betreff:" geschrieben
MailItem.Subject = EmailBetreff
'Der Text der Nachricht wird übertragen
MailItem.Body = EmailMsg
'Wenn Anlage angehängt werden soll, in nächster Zeile
'das Apostroph entfernen.
'Set myAttachments = MailItem.Attachments.Add("Pfad&Dateiname")
MailItem.Send 'Email wird gesendet



Gruss
Markus
Anzeige
leider suche ich etwas anderes
26.09.2003 14:56:50
jhaustein
hi leider geht das nur mit outlook und nicht mit outlook express

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige