-
Notifications
You must be signed in to change notification settings - Fork 1
/
Send-LunchEmail.ps1
429 lines (370 loc) · 16.4 KB
/
Send-LunchEmail.ps1
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
<#
.NOTES
File Name : Send-LunchEmail.ps1
Author : Emanuel Palm
Last Edited : 2018-10-24
.Synopsis
Sends an email with restaurants, with an optional poll.
.DESCRIPTION
Sends an email with a list of restaurants to use as a base for what to eat for lunch.
Two optional polls with the restaurants are available, either through API at https://www.strawpoll.me/ or through Outlook.
The script looks for the image .\Resources\LunchTime.png to include in the page.
.PARAMETER Text
Text that will be shown as the body of the email.
Adding HTML as part of this parameter is fine.
.PARAMETER PostText
This text will show as a smaller text at the end of the email.
Adding HTML as part of this parameter is fine.
.PARAMETER SMTPServer
The mailaddress to send the email from.
.PARAMETER From
The mailaddress to send the email from.
.PARAMETER To
The mailaddresses to send the email to.
.PARAMETER Subject
The subject of the email.
.PARAMETER Restaurants
A list of restaurants with properties Name, Rating, Website, Distance and Time where all should be strings.
.PARAMETER OutlookPoll
Whether or not to send the email through the ComObject Outlook.Application and include a poll with the restaurants as options.
.PARAMETER StrawPoll
Whether or not to create a poll through StrawPoll to include in the email with the restaurants as options.
.PARAMETER StrawPollText
The text of the StrawPoll button.
.PARAMETER StrawPollTitle
The title of the StrawPoll.
.PARAMETER Credential
The credential used, for uses such as O365 SMTP.
.PARAMETER Port
The port to use for Send-MailMessage.
.PARAMETER UseSsl
Whether or not to use SSL when sending the email.
.EXAMPLE
.\Send-LunchEmail.ps1 -SMTPServer 'example.smtp.se' -To '[email protected]' -From '[email protected]' -Text 'The lunch has been chosen!' -Subject 'Lunch!' -PostText 'Talk to Emanuel Palm if you want to unsubscribe.' -Restaurants $RestaurantList
Sends an email with a list of restaurants from [email protected] to [email protected] with the subject "Lunch!", using the smtp server example.smtp.se.
The body of the email is "The lunch has been chosen" with text at the end saying "Talk to Emanuel Palm if you want to unsubscribe."
.EXAMPLE
.\Send-LunchEmail.ps1 -SMTPServer 'example.smtp.se' -To '[email protected]' -From '[email protected]' -Text 'The lunch has been chosen!' -Subject 'Lunch!' -PostText 'Talk to Emanuel Palm if you want to unsubscribe.' -Restaurants $RestaurantList -Poll -PollTitle 'Lunch!','Food time!' -PollText 'Vote here!'
Sends an email with a list of restaurants from [email protected] to [email protected] with the subject "Lunch!", using the smtp server example.smtp.se.
The body of the email is "The lunch has been chosen" with text at the end saying "Talk to Emanuel Palm if you want to unsubscribe."
A poll is included in the email with a button saying "Vote here!", linking to a poll with the restaurants as options.
#>
[CmdletBinding(DefaultParameterSetName='Default')]
param(
[Parameter(Mandatory=$true)]
[ValidateNotNullOrEmpty()]
[String]$Text,
[Parameter()]
[String]$PostText = '',
[Parameter(Mandatory=$true)]
[ValidateNotNullOrEmpty()]
[String]$SMTPServer,
[Parameter(Mandatory=$true)]
[ValidateScript({
if ((@(New-Object System.Net.Mail.MailAddress($_) -ErrorAction SilentlyContinue).Count -gt 0))
{
return $_
}
})]
[String]$From,
[Parameter(Mandatory=$true)]
[ValidateScript({
if ((@(New-Object System.Net.Mail.MailAddress($_) -ErrorAction SilentlyContinue).Count -gt 0))
{
return $_
}
})]
[String[]]$To,
[Parameter(Mandatory=$true)]
[ValidateNotNullOrEmpty()]
[PSObject[]]$Restaurants,
[Parameter(Mandatory=$true)]
[ValidateNotNullOrEmpty()]
[String]$Subject,
[Parameter(Mandatory=$true,ParameterSetName='StrawPoll')]
[Switch]$StrawPoll,
[Parameter(Mandatory=$true,ParameterSetName='StrawPoll')]
[ValidateNotNullOrEmpty()]
[String]$PollText,
[Parameter(Mandatory=$true,ParameterSetName='StrawPoll')]
[ValidateNotNullOrEmpty()]
[String]$PollTitle,
[Parameter(Mandatory=$true,ParameterSetName='OutlookPoll')]
[Switch]$OutlookPoll,
[Parameter(Mandatory=$false,ParameterSetName='StrawPoll')]
[Parameter(Mandatory=$true,ParameterSetName='O365')]
[System.Management.Automation.PSCredential]$Credential,
[Parameter(Mandatory=$false,ParameterSetName='StrawPoll')]
[Parameter(Mandatory=$true,ParameterSetName='O365')]
[int]$Port,
[Parameter(Mandatory=$false,ParameterSetName='StrawPoll')]
[Parameter(Mandatory=$true,ParameterSetName='O365')]
[switch]$UseSsl
)
try
{
# Dot source the Send-MailMessage script with InlineAttachments found at https://gallery.technet.microsoft.com/scriptcenter/Send-MailMessage-3a920a6d
Test-Path "$PSScriptRoot\Dependencies\Send-MailMessage\Send-MailMessage.ps1" -ErrorAction Stop | Out-Null
. "$PSScriptRoot\Dependencies\Send-MailMessage\Send-MailMessage.ps1"
}
catch
{
Write-Error "Could not import dependency $PSScriptroot\Dependencies\Send-MailMessage\Send-MailMessage.ps1. Make sure the folder is created and the script is added to the folder. https://gallery.technet.microsoft.com/scriptcenter/Send-MailMessage-3a920a6d"
exit
}
# Get random color between 0 and 255
$RGB = @()
for ($i = 0; $i -le 3-1; $i++)
{
$RGB += Get-Random -Maximum 256
}
# Make sure it's not too bright or dark, for white and black text to work
if ((($RGB[0] -gt 200) -and ($RGB[1] -gt 200) -and ($RGB[2] -gt 200)))
{
$RGB[(Get-Random -Maximum $RGB.Count)] -= 50
}
elseif ((($RGB[0] -lt 80) -and ($RGB[1] -lt 80) -and ($RGB[2] -lt 80)))
{
$RGB[(Get-Random -Maximum $RGB.Count)] += 50
}
# Get Hex colors for HTML
# Loop through each RGB value, convert it to hex and then join the list and prepend a # to the result
$BackgroundColor = $(($RGB | ForEach-Object { $_.ToString('X2').ToUpper() }) -join '')
Write-Verbose "Background color: $BackgroundColor"
# Loop through each RGB value, invert it, convert it to hex and then join the list and prepend a # to the result
$InvertedColor = $(($RGB | ForEach-Object { (255 - $_) } | ForEach-Object { $_.ToString('X2').ToUpper() }) -join '')
Write-Verbose "Inverted Color: $TextColor"
# The default color for the text in the email, used for the body text for example.
$TextColor = 'FFFFFF'
if ($StrawPoll)
{
# Create strawpoll through API with disabled duplication checking to be able to vote several times from the same public IP
$StrawPollURL = "https://www.strawpoll.me"
try
{
$PollRequest = @{
"title" = $($PollTitle)
"options" = $Restaurants.Name
"dupcheck" = 'disabled'
}
$PollResponse = Invoke-RestMethod -Uri "$StrawPollURL/api/v2/polls" -Method Post -Body ($PollRequest | ConvertTo-Json) -ContentType "application/json; charset=utf-8" -UseDefaultCredentials -ErrorAction Stop
# The response from the API call will include an ID that corresponds to our poll, we use this as link for the button.
$PollLink = "$StrawPollURL/$($PollResponse.id)"
}
catch
{
Write-Error "Error: $($Error[0].Exception.Message)"
}
# The HTML for the poll "button", with text linking to the poll.
$PollHTML = ''
if ($PollResponse)
{
$PollHTML = @"
<td align="center" valignt="top">
<div>
<!--[if mso]>
<v:roundrect xmlns:v="urn:schemas-microsoft-com:vml" xmlns:w="urn:schemas-microsoft-com:office:word" href="$($PollLink)" style="height:36px;v-text-anchor:middle;width:150px;" arcsize="5%" strokecolor="#$($InvertedColor)" fillcolor="#$($InvertedColor)">
<w:anchorlock/>
<center style="color:#$($TextColor);font-family:Helvetica, Arial,sans-serif;font-size:16px;">$($PollText)</center>
</v:roundrect>
<![endif]-->
<a href="$($PollLink)" style="background-color:#$($InvertedColor);border:1px solid #$($InvertedColor);border-radius:3px;color:#$($TextColor);display:inline-block;font-family:sans-serif;font-size:16px;line-height:44px;text-align:center;text-decoration:none;width:150px;-webkit-text-size-adjust:none;mso-hide:all;">$($PollText)</a>
</div>
</td>
"@
}
}
# Create HTML for the list of restaurants
# Start the HTML part by defining the amount of restaurants
$ListHTML = @"
<TH COLSPAN=$($Restaurants.Count)><hr>
"@
# Go through each restaurant and populate HTML variable
foreach ($Item in $Restaurants)
{
# If there's a website included in the restaurant object in the list, make the text link to it
if ($Item.Website)
{
$InfoHTML = @"
<td align="center" valign="middle" width="50%"><a href="$($Item.Website)"><span style="color: #$($TextColor)">$($Item.Name) ★$($Item.Rating)★</span></a></td>
<td align="center" valign="middle" width="50%"><span style="color: #$($TextColor); text-decoration-line: underline;">$($Item.Time) ($($Item.Distance))</span></td>
"@
}
else
{
$InfoHTML = @"
<td align="center" valign="middle" width="50%"><span style="color: #$($TextColor)">$($Item.Name) ★$($Item.Rating)★</span></td>
<td align="center" valign="middle" width="50%"><span style="color: #$($TextColor)">$($Item.Time) ($($Item.Distance))</span></td>
"@
}
$ListHTML += @"
<tr style="font-size: 18px; font-family: Helvetica, Arial, sans-serif; color:#$($TextColor)">
$InfoHTML
</tr>
<TH COLSPAN=$($Restaurants.Count)><hr>
"@
}
# HTML Body of email
$HTML = @"
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="viewport" content="width=device-width, initial-scale=1" />
<meta name="apple-mobile-web-app-capable" content="yes" />
<meta content="yes" name="apple-touch-fullscreen" />
<meta name="apple-mobile-web-app-status-bar-style" content="black" />
<meta name="format-detection" content="telephone=no" />
<meta http-equiv="X-UA-Compatible" content="IE=edge" />
<title>Lunch</title>
<style type="text/css">
a {color:#$($TextColor); padding:0; text-decoration-line: underline}
a:link {color:#$($TextColor); text-decoration-line: underline}
a:visited {color:#$($TextColor); text-decoration-line: underline}
a:hover {color:#$($TextColor); text-decoration-line: underline}
a:active {text-align: center; color:#000000; text-decoration-line: underline}
body { width:100% !important; -webkit-text; size-adjust:100%; -ms-text-size-adjust:100%; margin:0; padding:0; background-color: #CCCCCC; }
.ReadMsgBody { width: 100%; }
.backgroundTable {margin:0 auto; padding:0; width:100%;!important;}
table td {border-collapse: collapse;}
/* Hotmail background & line height fixes */ .ExternalClass {width:100% !important;} .ExternalClass, .ExternalClass p, .ExternalClass span, .ExternalClass font, .ExternalClass td, .ExternalClass div {line-height: 100%;}
/* Image borders & formatting */ img { outline:none; -ms-interpolation-mode: bicubic;}
a img {border:none;} /* Re-style iPhone automatic links (eg. phone numbers) */
.applelinks a { color:#$($TextColor); }
/* Hotmail symbol fix for mobile devices */ .ExternalClass img[class^=Emoji] { width: 10px !important; height: 10px !important; display: inline !important;}
</style>
</head>
<body style="Margin:0;padding-top:0;padding-bottom:0;padding-right:0;padding-left:0;">
<center class="wrapper" style="width:100%;table-layout:fixed;-webkit-text-size-adjust:100%;-ms-text-size-adjust:100%;">
<div align="center">
<table width="100%" height="100%" align="center" cellpadding="0" border="0" cellspacing="0" style="Margin:0 auto;width:100%;">
<tr>
<td bgcolor="#CCCCCC" valign="top" align="center" style="background-position: top center">
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="40"></td>
</tr>
</table>
<table width="600" border="0" align="center" bgcolor="#$($TextColor)" cellpadding="0" cellspacing="0">
<tr>
<td height="30" align="center" valign="top"></td>
</tr>
<tr>
<td>
<table width="540" bgcolor="#$($BackgroundColor)" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="50" align="center" valign="top"></td>
</tr>
<tr>
<td height="90" align="center" valign="top">
<img src="cid:LunchTime.png" border="0" />
</a>
</td>
</tr>
<tr>
<td height="100" align="center" valign="middle" style="font-size: 18px; font-family: Helvetica, Arial, sans-serif; color:#$($TextColor); padding-left: 10px; padding-right: 10px">
<span style="font-weight: bold; font-size: 22px color:#$($TextColor);">$($Text)</span>
<td height="20" align="center" valign="top"></td>
</td>
</tr>
</table>
<table width="540" bgcolor="#$($BackgroundColor)" border="0" align="center" cellpadding="0" cellspacing="0">
<div width="400 align="center" valign="middle">
$($ListHTML)
</div>
</table>
<table width="540" bgcolor="#$($BackgroundColor)" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="30" align="center" valign="top"></td>
</tr>
<tr>
$($PollHTML)
</tr>
<td height="30" align="center" valign="top"></td>
</table>
</td>
</tr>
<tr>
<td height="30" align="center" valign="top"></td>
</tr>
</table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="27" align="center" style="font-family: Arial, Helvetica, sans-serif; color: #333333; font-weight: bold; font-size: 10px; padding: 15px">$($PostText)</td>
</tr>
<tr>
<td height="60"></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</body>
</html>
"@
$MailParameters = @{
SMTPServer = $SMTPServer
To = $To
From = $From
Subject = $Subject
BodyAsHTML = $true
Body = $HTML
InlineAttachments = @{
LunchTime = "$PSScriptRoot\Resources\LunchTime.png"
}
}
if ($Credential)
{
$MailParameters['Credential'] = $Credential
$MailParameters['UseSsl'] = $UseSsl
$MailParameters['Port'] = $Port
}
# If the user chose to create a poll through Outlook
if ($OutlookPoll)
{
try
{
$Outlook = New-Object -ComObject Outlook.Application
}
catch
{
Write-Error "Problem Creating ComObject Outlook.Application!"
}
try
{
# Create email
$Mail = $Outlook.CreateItem(0)
# Add recipients of the email from parameter
$MailParameters.To | ForEach-Object { $Mail.Recipients.Add($($_)) | Out-Null }
$Mail.Subject = $MailParameters.Subject
$Mail.HTMLBody = $MailParameters.Body
# Add lunch picture as attachment to be able to have the picture in the HTML
$Mail.Attachments.Add($($MailParameters.InlineAttachments.LunchTime),0,0) | Out-Null
# Add the restaurants as poll options
$Mail.VotingOptions = $Restaurants.Name -join ';'
$Mail.Send()
}
catch
{
Write-Error "Problem creating and sending email through Outlook!"
}
finally
{
try
{
# Stop Outlook and clean up the process
$Outlook.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($Outlook) | Out-Null
}
catch
{
Write-Error "Problem quitting Outlook!"
}
}
}
else
{
# The inline attachment name has a different format depending on if the mail is sent through Outlook or not.
$MailParameters.Body = ($HTML -replace 'LunchTime.png','LunchTime')
Send-MailMessage @MailParameters
}