Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Email über Outlook
Autor: Patrickb
Datum: 03.10.03 14:09
wenn ich folgenden Code ausführe, kommt eine Meldung, dass outlook im Hintergrund ein Mail versendet. Nun muss man ja oder nein klicken. Dim myattachments As Variant Dim Mail As Object Dim Outlook As Object On Error GoTo Fehler Set Outlook = GetObject(, "Outlook.Application") On Error GoTo Fehler2 Set Mail = Outlook.CreateItem(olMailItem) Set myattachments = Mail.Attachments 'myattachments.Add "C:\Infodateien\Infodatei-" & Date & " " + Left(filename, Len(filename) - (i + 1)) + ".txt" Mail.To = "test@test.ch" Mail.Subject = "Test" Mail.Body = "Te" & vbCrLf & "Te2" Mail.Send Set Mail = Nothing Exit Sub Fehler: Set Outlook = CreateObject("Outlook.Application") Resume Next Fehler2: MsgBox Err.Description Ist es möglich, anstelle das Mail direkt zu versenden, die Eingabe Maske eines neuen Emails kommt, wo alles schon eingefüllt ist? Damit man nur noch auf senden klicken muss?

Email über Outlook	833	Patrickb	03.10.03 14:09
Re: Email über Outlook	466	Patrickb	03.10.03 14:10
Re: Email über Outlook	492	Prian0815	06.10.03 14:35
Re: Email über Outlook	492	Patrickb	06.10.03 18:56
Re: Email über Outlook	469	Prian0815	07.10.03 15:10
Re: Email über Outlook	443	xxWilliebaldWus...	08.10.03 21:48
Re: Email über Outlook	467	Patrickb	13.10.03 16:01
Re: Email über Outlook	416	xxWilliebaldWus...	13.10.03 17:05
Re: Email über Outlook	440	Patrickb	15.10.03 09:53
Re: Email über Outlook	435	Patrickb	15.10.03 09:55
Re: Email über Outlook	449	xxWilliebaldWus...	15.10.03 17:09

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen