File Security-Group-Members.csv
2. Import-Csv C:\temp\Security-Group-Members.csv | ForEach {Add-DistributionGroupMember -Identity "AllStaffTest1@unicons.vn" -Member $_.Name}
Sub SetOfflineMode()
Dim appOutlook
Dim blnIsOffline
On Error Resume Next
Set appOutlook = CreateObject("Outlook.Application")
If Err.Number = 0 Then
blnIsOffline = appOutlook.Session.Offline
If Not blnIsOffline Then
appOutlook.ActiveExplorer.CommandBars.ExecuteMso ("ToggleOnline")
End If
Else
End If
If Not (appOutlook Is Nothing) Then Set appOutlook = Nothing
End Sub