2010-12-10 4 views

Antwort

-1

Dies funktioniert in Office 97 und was Austausch hatten wir damals:

Dim oOApp As Outlook.Application 
    Dim newMail As Outlook.MailItem 
    Set oOApp = CreateObject("Outlook.Application") 
    Set newMail = oOApp.CreateItem(olMailItem) 

With newMail 
    .Display 
    .Body = whatever 
    .Subject = whatever 
    .Attachments.Add whatever 
    .Recipients.Add (whomever) 
    .Send 
End With 
Set newMail = Nothing 
Set oOApp = Nothing 
+1

das ist nicht CDO! –

4

Sie können mehrere Empfänger auf der .Um Linie, indem Sie diese mit Trennung „“ zum Beispiel:

Set m = Server.CreateObject("CDO.Message") 
m.Subject="subject..." 
m.From="[email protected]" 
m.To="[email protected];[email protected];[email protected]" 
m.TextBody="Message" 
m.Send 
+0

Sei sehr, sehr vorsichtig hier. Wenn Sie CDOSYS verwenden (wie 'CDO.Message' impliziert): *> Hinweis ** Mehrere Adressaten für eine Nachricht werden durch Kommata getrennt (im Gegensatz zu Semikolons **, die mit der Messaging Application Programming Interface (MAPI) verwendet werden) Clients wie Microsoft® Outlook®). * => https://msdn.microsoft.com/en-us/library/ms527025(v=exchg.10).aspx – Bob

Verwandte Themen