SendMail geht nicht

[marcelx]

Hallo,

es gibt viele Beispiel für SendMail .
Warum funktioniert mein Code nicht.
Ist der Port richtig?
Gruß MarcelX

Code: Alles auswählen

  InitNetwork()
  
  If CreateMail(0, "XXXX@freenet.de", "Test")
    SetMailBody(0, "Test")
    
    AddMailRecipient(0, "XXXX@freenet.de", #PB_Mail_To)
  
    Result = SendMail(0, "mx.freenet.de", 993, 1, "XXXXX", "XXXX")
    
    Repeat
      Progress = MailProgress(0)
      Delay(10)
    Until Progress = #PB_Mail_Finished Or Progress = #PB_Mail_Error
    
    If Progress = #PB_Mail_Finished
      MessageRequester("Info", "OK")
    Else
      MessageRequester("Info", "Fehler")
    EndIf
    
  EndIf

[Bisonte]

vermutlich weil du den IMAP Port benutzt. Du musst den SMTP Port nehmen. Meistens 465 oder 587.. allerdings ist auch meist die Hostadresse anders. Dazu musst du nochmal bei Freenet selbst nachschauen was dort bei SMTP bzw. Postausgang steht

[marcelx]

Danke Bisonte

Hier: https://kundenservice.freenet.de/artikel/1869
"mx.freenet.de" (SMTP und IMAP) 587 ist richtig - trotzdem geht es nicht

[marcelx]

mit web.de funktioniert auch nicht
https://hilfe.web.de/pop-imap/imap/imap ... daten.html
server: smpt.web.de
port: 587

[mk-soft]

Nachmal liegt es auch an der Sicherheitseinstellung vom Mail-Provider.

Die Server akzeptieren dann nur zertifizierte Mail Programme. Kann man aber Online in den Sicherheitseinstellung dieses ändern.
Ausserdem wird immer SSL verwendet

Code: Alles auswählen

Result = SendMail(0, "mx.freenet.de", 465 oder 587, #PB_Mail_Asynchronous | #PB_Mail_UseSSL, "XXXXX", "XXXX")

[marcelx]

#PB_Mail_Asynchronous und #PB_Mail_UseSSL gibt es nicht bei PB 5.31

[marcelx]

Nach eine lange Pause habe ich sendmail mit PB5.60 ausprobiert und so funktioniert.
Nun, ich verwende COMatePLUS.pbi Version 2.1 aus http://www.rsbasic.de/backups/ und mit PB5.6 bekomme ich die Meldung:
...
[09:31:20] [ERROR] COMatePLUS.pbi (Line: 1383)
[09:31:20] [ERROR] Procedure stack has been corrupted.
[09:38:14] Execution continued.
[09:38:14] [ERROR] COMatePLUS.pbi (Line: 1383)
[09:38:14] [ERROR] Procedure stack has been corrupted.

Die Excel-Datei wird korrekt erzeugt.
Wenn ich mein Programm als exe verwende, ist alles korrekt.

Eigenartig!