;Set sender address
$Sender = "email@@yourdomain.com"
;Set a recipient address.
$Recipient = "someaddress@mail.no"
;Set the subject.
$Subject = "E-mail subject goes here"
;SMTP server to be used for sending the message.
$smtpserver = "New user " + $aOut3[2] + ", " + $aOut3[1] + " has to bee created in our XXX-system"
;Create the body text.
$Body = "This is an automated mail ." + @crlf + @crlf + "User " + $aOut3[2] + ", " + $aOut3[1] + " has been created in our system in department " + $aOut3[6] + @crlf + @crlf
$Body = $Body + "The user har been created with this information: " + @crlf + @crlf
$Body = $Body + Left("Sirname ", 12) + $aOut3[2] + @crlf + Left("Givenname: ", 12) + $aOut3[1] + @crlf + Left("Department ", 12) + $aOut3[6] + ", " + $aOut3[5] + @crlf
;Send the message.
$Send = BlatMailerNoAttachment($Recipients, $Sender, $Subject, $Body, $smtpserver)
Function BlatMailerNoAttachment($Recipient, $Sender, $Subject, $Body, $smtpserver)
Dim $MailerLine
$MailerLine = 'ENTERPATHTOBLATHERE\blat.exe -' + ' -to ' + $recipient + ' -f ' + $sender + ' -subject ' + $subject + ' -body ' + $body + ' -server ' + $smtpserver + ' -q '
Shell $MailerLine
EndFunction