Solved

Need a Powershell VBScript solution to send email to all members of a DL including nested DL's for Exchange 2010

Posted on 2013-11-01
8
722 Views
Last Modified: 2013-11-15
Hi,

I need an automated script to send emails (regularly) to members of a DL. If the DL has a nested DL inside, it also has to send email to those members as well.

The solution could include Powershell script and/or VBScript.

The script(s) and procedure(s) will be executed by someone periodically.

Thank you
0
Comment
Question by:emelnik
  • 4
  • 3
8 Comments
 
LVL 37

Expert Comment

by:Neil Russell
ID: 39617894
As it is a DL  why are you not just emailing to the DL??
0
 

Author Comment

by:emelnik
ID: 39618088
Yes, need the script to mail to a particular DL and make sure all members get it. The issue here is that the scripts I found don't work for nested DL's.
0
 
LVL 40

Expert Comment

by:Subsun
ID: 39621518
Ideally when you send mail to a DL email address, the exchange server will expand the Dl's including nested Dl's and send the message to all recipients.. Are you saying it’s not working for you? Or Are you saying, you don’t want to send email to the distribution group email address?
0
Problems using Powershell and Active Directory?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

 

Author Comment

by:emelnik
ID: 39623242
Let me share with you the script I have so far. This script was created to send test emails between two Exchange users. From what you are saying, this should also work with DL's and nested DL's?

Const ADS_PROPERTY_CLEAR = 1
Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile _
("C:\TOOLS\OrchE2K7-PolicyTest\Emea\ht-servers.txt", ForReading)
Const cdoSendUsingPickup = 1
Const cdoSendUsingPort = 2 'Must use this to use Delivery Notification
Const cdoAnonymous = 0
Const cdoNTLM = 2 'None
'Delivery Status Notifications
Const cdoDSNDefault = 0 'None
Const cdoDSNNever = 1 'None
Const cdoDSNFailure = 2 'Failure
Const cdoDSNSuccess = 4 'Success
Const cdoDSNDelay = 8 'Delay
Const cdoDSNSuccessFailOrDelay = 14 'Success, failure or delay

Const UserAddressDL1 = "ldnctisvcorres@contoso.com"
Const UserAddressDL2 = "ldnctisvcorres@contoso.com"

set objMsg = CreateObject("CDO.Message")
set objConf = CreateObject("CDO.Configuration")

Do Until objTextFile.AtEndOfStream
strComputer = objTextFile.ReadLine
Wscript.Echo strComputer

Set objFlds = objConf.Fields
With objFlds
  .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strComputer
  .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoNTLM
  .Update
End With

strBody = "This email was sent via E2K7 hub " & strComputer & vbCRLF
'strBody = strBody & "THIS IS A TEST: PLEASE IGNORE. "  & vbCRLF
strBody = strBody & vbCRLF
strBody = strBody & "This message should be blocked. If you received this message, then the Policy is broken." & vbCRLF
strBody = strBody & UserAddressDL1 + "Test users able to send restricted messages to " +  UserAddressDL2 +" -Blocking" & vbCRLF
strBody = strBody & vbCRLF
strBody = strBody & "Please research issue" & vbCRLF
With objMsg
  Set .Configuration = objConf
  .To = UserAddressDL1
  .From = UserAddressDL2
  .Subject = "Active Policy Phase 3 Blocking:"
  .TextBody = strBody
   'use .HTMLBody to send HTML email."
  .DSNOptions = cdoDSNSuccessFailOrDelay
  .Fields.update
  .Send
End With

Loop
objTextFile.Close
0
 
LVL 40

Expert Comment

by:Subsun
ID: 39623258
Yes.. If you send a mail to the group email address, then the mail will be delivered to all members in that group..
0
 

Author Comment

by:emelnik
ID: 39634290
OK, thanks. One final question, if I use the Send-MailMessage cmdlet in powershell to send email to Distribution Groups, then all members of the distribution group and nested distribution groups should get the message, correct?
0
 
LVL 40

Accepted Solution

by:
Subsun earned 500 total points
ID: 39634689
Yes..
0
 

Author Closing Comment

by:emelnik
ID: 39651966
Worked as the expert said.
0

Featured Post

Does Powershell have you tied up in knots?

Managing Active Directory does not always have to be complicated.  If you are spending more time trying instead of doing, then it's time to look at something else. For nearly 20 years, AD admins around the world have used one tool for day-to-day AD management: Hyena. Discover why

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The following article is intended as a guide to using PowerShell as a more versatile and reliable form of application detection in SCCM.
A project that enables an administrator to perform actions within a user session context not just at the time of login but any time later on day(s) or week(s) later.
In this video we show how to create an email address policy in Exchange 2013. We show this process by using the Exchange Admin Center. Log into Exchange Admin Center.:  First we need to log into the Exchange Admin Center. Navigate to the Mail Flow…
To add imagery to an HTML email signature, you have two options available to you. You can either add a logo/image by embedding it directly into the signature or hosting it externally and linking to it. The vast majority of email clients display l…

685 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question