#Clear Screen
cls Write-Host "Sending Email"

#Creacion del Objeto del Correo
$msg = new-object Net.Mail.MailMessage
$msg.IsBodyHtml = $True

#Estructura del Correo
$smtpServer = "smtp.mail.yahoo.com"
$msg.From = "jrosh.01@yahoo.com"
$msg.To.Add("jrsanchez@marzam.com.mx")
$msg.subject = "Notificacion de: $($env:computername)"

#Evento del Servicio
$msg.Body =@()
$msg.Body += Get-WinEvent –FilterHashTable @{logname="Microsoft-Windows-
TerminalServices-RemoteConnectionManager/Operational"} -MaxEvents 1 |
ConvertTo-Html -Property Message,TimeCreated,MachineName,Id,LogName -
PreContent "<H1>Inicio de Sesion</H1>" -PostContent "<H5><i>$(get-date)</i>
</H5>" -CssUri C:ScripCss.txt

#Creacion del Objeto SMTP
$smtp = new-object Net.Mail.SmtpClient($smtpServer)
$smtp.EnableSsl = 1
$smtp.Port = 587
$cred = New-Object Net.NetworkCredential("jrosh.01@yahoo.com","Rosh1981**")
$smtp.Credentials = $cred

#Envia Correo
$smtp.Send($msg)
Write-Host "Correo Enviado..."

body { background-color:#E5E4E2;
font-family:Monospace;
font-size:10pt; }
td, th { border:0px solid black;
border-collapse:collapse;
white-space:pre; }
th { color:white;
background-color:black; }
table, tr, td, th { padding: 0px; margin: 0px ;white-space:pre; }
table { margin-left:25px; }
h2 {
font-family:Tahoma;
color:#6D7B8D;
}
.footer
{ color:green;
margin-left:25px;
font-family:Tahoma;
font-size:8pt;
}

$emailSmtpServer = "smtp.mail.yahoo.com"
$emailSmtpServerPort = "587"
$emailSmtpUser = "jrosh.01@yahoo.com"
$emailSmtpPass = "Rosh1981**"

$emailMessage = New-Object System.Net.Mail.MailMessage
$emailMessage.From = "ROSH <jrosh.01@yahoo.com>"
$emailMessage.To.Add( "jrsanchez@marzam.com.mx" )
$emailMessage."Notificacion de: $($env:computername)"
$emailMessage.IsBodyHtml = $true
$emailMessage.Body = @"
<H1>Inicio de Sesion RDP</H1>
<p>Evento a revisar en: <strong>$($evento.MachineName)</strong>.</p>
<p>Identificador: <strong>$($evento.Id)</strong>.</p>
<p>Fecha / Hora: <strong>$($evento.TimeCreated)</strong>.</p>
<p>Texto: <strong>$($evento.Message)</strong>.</p>
<br>
"<H5><i>$(get-date)</i></H5>"
"@

$SMTPClient = New-Object System.Net.Mail.SmtpClient( $emailSmtpServer ,
$emailSmtpServerPort )
$SMTPClient.EnableSsl = $true
$SMTPClient.Credentials = New-Object System.Net.NetworkCredential(
$emailSmtpUser , $emailSmtpPass );

$SMTPClient.Send( $emailMessage )

$emailMessage = Get-WinEvent –FilterHashTable @{logname="Microsoft-Windows-
TerminalServices-RemoteConnectionManager/Operational"} -MaxEvents 1