[Pomoc] Wysyłanie emaila bez uzycia przeglądarki

[dvsbhjdhdsdc]

#include <INet.au3>

 

$s_SmtpServer = "mysmtpserver.com.au"

$s_FromName = "My Name"

$s_FromAddress = "From eMail Address"

$s_ToAddress = "To eMail Address"

$s_Subject = "My Test UDF"

Dim $as_Body[2]

$as_Body[0] = "Testing the new email udf"

$as_Body[1] = "Second Line"

$Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)

$err = @error

If $Response = 1 Then

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

Else

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

EndIf

Jak zrobić aby wysyłało emaila na moją pocztę(problem z $s_SmtpServer mam nie wiem co wpisać jasli ma się gmaila)proszę o pomoc.To nie ma być keylogger tak dla wiadomości.

[GameOverMan]

Nie pisz taką czcionką bo razi po oczach.

 

Spróbuj gmail.com, a jak nie będzie działać to polecam o2.

[wojtek333314]

Google nie gryzie. Wklep gmail smtp i znajdziesz adres dla gmalila bez problemu.