Mój vbscript wysyła wiadomość e-mail automatycznie do adresata, ale czy ktoś wie, jak dodać więcej niż jednego odbiorcę?Wysyłanie wiadomości e-mail do wielu odbiorców za pomocą vbscript
...
Dim ToAddress
Dim FromAddress
Dim MessageSubject
Dim MyTime
Dim MessageBody
Dim MessageAttachment
Dim ol, ns, newMail
MyTime = Now
ToAddress = "[email protected]"
MessageSubject = "It works!."
MessageBody = "Good job on that script."
MessageAttachment = some attachment
Set ol = WScript.CreateObject("Outlook.Application")
Set ns = ol.getNamespace("MAPI")
Set newMail = ol.CreateItem(olMailItem)
newMail.Subject = MessageSubject
newMail.Body = MessageBody & vbCrLf & MyTime
newMail.RecipIents.Add(ToAddress)
newMail.Attachments.Add(MessageAttachment)
newMail.Send
Oto, co mam teraz. I działa dobrze. Ale chciałbym mieć więcej niż jednego odbiorcę. Z góry dziękuję.
newMail.CC = "[email protected];[email protected];[email protected]"
Powyższa linia działała!
Działa to tak samo z .BCC, na wypadek gdyby ktoś nie chciał wyświetlać listy kontaktów.
Użyj BCC zamiast CC. – JimmyPena
@ JP. Dzięki za pomoc. – duper