eMails senden:

 

#include <Inet.au3>

 

Local $s_SmtpServer = "smtp-Server.com"

Local $s_FromName = "Sender"

Local $s_FromAddress = "postmaster@localhost.de"

Local $s_ToAddress = "george@mail.com"

Local $s_helo = ""

Local $s_Subject = "Das ist ein Test"

Local $as_Body[3]

$as_Body[0] = "AD Email Text"

$as_Body[1] = "Zeile 2"

$as_Body[2] = "Zeile 3"

Local $Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_helo, -1,1)

Local $err = @error

If $Response = 1 Then

       MsgBox(0, "Success!", "Mail sent")

Else

       MsgBox(0, "Error!", "Mail failed with error code " & $err)

EndIf