_INetSmtpMail Buggy?

    Hallo Ihr,

    Ich habe vor, in mein Programm eine automatische Mail-Versandfunktion einzubauen.
    Nun habe ich auf der Hilfeseite den Code einfach kopiert, um ihn zu testen.
    Habe dort dann meine Daten eingefügt, doch er gibt mir immer ErrorCode 50 aus, was ja heißt, dass er keine Session Session aufbauen kann.

    Ich weiß nicht, woran es liegt. der SMTP is richtig.


    Mein Code:

    [autoit]


    $s_SmtpServer = "mail.gmx.net"
    $s_FromName = "Tim"
    $s_FromAddress = "lol@rofl.com"
    $s_ToAddress = "schrubber@uwcrew.eu"
    $s_Subject = "Meine Test UDF"
    $s_Body = "Mein Text"
    $Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $s_Body)
    $err = @error
    If $Response = 1 Then
    MsgBox(0, "Erfolg!", "Die E-Mail wurde versandt")
    Else
    MsgBox(0, "Fehler!", "Das versenden der E-Mail schlug fehl. Fehlercode: " & $err)
    EndIf

    [/autoit]

    Könnt ihr mir vll sagen, warum? :/


    Rubberducky

    Den letzten Parameter auf True setzen:

    [autoit]

    _INetSmtpMail($aServer, $sFromName, $sFromAddress, $sToAddress, $sSubject, $asBody, @ComputerName, " ", True)

    [/autoit]


    dann wird die Kommunikation mit dem Server in einem Fenster ausgegeben.

    SMTP After POP könntest Du so lösen:

    Spoiler anzeigen
    [autoit]

    #Region Includes
    #include <Inet.au3>
    #include<_pop3.au3>
    #EndRegion Includes

    [/autoit] [autoit][/autoit] [autoit]

    Main()

    [/autoit] [autoit][/autoit] [autoit]

    Func Main()

    [/autoit] [autoit][/autoit] [autoit]

    Local $asServer[2] = ["mail.gmx.net", "pop.gmx.net"]
    Local $sUserName = "WerAuchImmer@gmx.de"
    Local $sPassWord = "0815"
    Local $sFromName = "Wer Auch Immer"
    Local $sFromAddress = "WerAuchImmer@gmx.de"
    Local $sToAddress = "DerEmpfaenger@googlemail.com"
    Local $sSubject = "Meine Test UDF"
    Local $asBody[1] = ["Mein Text"]

    [/autoit] [autoit][/autoit] [autoit]

    If _SMTPMail($asServer, $sUserName, $sPassWord, $sFromName, $sFromAddress, $sToAddress, $sSubject, $asBody) Then
    MsgBox(0,"","Erfolgreich gesendet")
    Else
    MsgBox(0,"","Versand fehlgeschlagen")
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    EndFunc ;==>Main

    [/autoit] [autoit][/autoit] [autoit]

    ;===============================================================================

    [/autoit] [autoit][/autoit] [autoit]

    Func _SMTPMail($asServer, $sUserName, $sPassWord, $sFromName, $sFromAddress, $sToAddress, $sSubject, $asBody)
    _pop3Connect($asServer[1], $sUserName, $sPassWord)
    If Not @error Then
    _Pop3Quit()
    _pop3Disconnect()
    $ret = _INetSmtpMail($asServer[0], $sFromName, $sFromAddress, $sToAddress, $sSubject, $asBody)
    Return SetError(@error,@extended,$ret)
    Else
    Return SetError(@error,0,0)
    EndIf
    EndFunc

    [/autoit]

    muß bei gmx allerdings auch aktiviert sein.

    Die _pop3.au3 gibts dort:
    http://www.autoitscript.com/forum/index.php?showtopic=22838