_INetSmtpMail
Sends an email without using an external email program.
#include <INet.au3>
_INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress [, $s_Subject [, $as_Body [, $s_helo [, $s_first [, $b_trace]]]]])
Параметры
| $s_SmtpServer | Smtp server the eMail is to be sent though May be either alpha or a numeric IP address. In order to fight spam, many ISPs require this to be their server. eg "smtp.ispdomain.com", "mail.ispdomain.com" or "192.168.1.1" |
| $s_FromName |
The name you wish the message to appear to be sent from. eg "Bob Smith" |
| $s_FromAddress |
The email address you wish the message to appear to be sent from. eg "[email protected]". |
| $s_ToAddress |
The email address the message is to go to. eg "[email protected]" |
| $s_Subject |
[необязательный] The subject of the email. |
| $as_Body |
[необязательный] The body of the email as a single dimensional array of strings. Each value in the array will be terminated with a @CRLF in the email. |
| $s_helo |
[необязательный] identifier for the smtp server connection (by default @ComputerName). If Smtp server require a "EHLO" string just set the string to "EHLO " & @ComputerName. |
| $s_first |
[необязательный] string sent before helo for the smtp server connection (by default {SPACE}). To not send any character this parameter must equal -1, some SMTP server required it. |
| $b_trace |
[необязательный] trace the dialog in a splash window |
Возвращаемое значение
| Успех: | Возвращает 1 |
| Ошибка: | Возвращает 0 и устанавливает @error |
| @error: | 1 - Invalid Parameters |
| 2 - Unable to start TCP | |
| 3 - Unable to resolve IP | |
| 4 - Unable to create socket | |
| 5x - Cannot open SMTP session. x indicates the index number of last command issued to the SMTP server. | |
| 50x - Cannot send body. x indicates the line number of $as_Body (first line is 0). | |
| 5000 - Cannot close SMTP session |
Примечания
This function sends an email directly through an SMTP server without the use of a third party email client. Requires AutoIt3 v 3.1.1.97 or better.См. также
_INetMailПример
#include <Inet.au3>
Local $s_SmtpServer = "mysmtpserver.com.au"
Local $s_FromName = "My Name"
Local $s_FromAddress = "From eMail Address"
Local $s_ToAddress = "To eMail Address"
Local $s_Subject = "My Test UDF"
Local $as_Body[2]
$as_Body[0] = "Testing the new email udf"
$as_Body[1] = "Second Line"
Local $Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)
Local $err = @error
If $Response = 1 Then
MsgBox(4096, "Success!", "Mail sent")
Else
MsgBox(4096, "Error!", "Mail failed with error code " & $err)
EndIf