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 |
function screenshot($path) { $b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height) $g=[System.Drawing.Graphics]::FromImage($b) $g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size) $g.Dispose() $b.Save($path,'Bmp') } Start-Process chrome "https://www.google.es/maps/dir/Estadio+Santiago+Bernab%C3%A9u,+Av.+de+Concha+Espina,+1,+28036+Madrid/M%C3%B3stoles,+Madrid" Start-Sleep -Seconds 15 screenshot trafico.jpg $Subject = "Tráfico" $Body = "Tráfico" $SMTPServer = "smtp.outlook.com" $filenameAndPath = "C:\Users\adminfp\trafico.bmp" $SMTPMessage = New-Object System.Net.Mail.MailMessage($EmailFrom,$EmailTo,$Subject,$Body) $attachment = New-Object System.Net.Mail.Attachment($filenameAndPath) $SMTPMessage.Attachments.Add($attachment) $SMTPClient = New-Object Net.Mail.SmtpClient($SmtpServer, 587) $SMTPClient.EnableSsl = $true $pass = Read-Host "Introduce contraseña" -AsSecureString $SMTPClient.Send($SMTPMessage) |