http://www.purebasic.com
https://www.purebasic.fr/english/
I downloaded the new version; looks nice; it doesn't show any errors, but .. it keeps saying "failed: Timeout was reached"infratec wrote:Sorry, was the wrong link.
In this file I did not update libcurl.pbi
This is the right link:
https://www.von-der-salierburg.de/downl ... ibcurl.zip
But I also added the new file in the other zip file.
It works with PB 5.73! Look at page 4..Johanson wrote:I tried
I remind you: I have version 5.73
Configuration is OK (everything works in the example below, also in Thunderbird it's ok)infratec wrote:Then your configuration of the smtp server is wrong or it is not allowed.
Check the allowed ports, check if it is smtps or smtp ...
Code: Select all
InitNetwork()
If CreateMail(0, "sender@xxxxxx.xx", "Subject - Hello !")
SetMailBody(0, "Hello !" + #CRLF$ + "This is a multi-" + #CRLF$ + "line mail !")
AddMailRecipient(0, "mailto@xxxxxxxxxx.xx", #PB_Mail_To)
Result = SendMail(0, "smtp.xxx.xx", 587, #PB_Mail_Asynchronous, "sender@xxxxxx.xx", "SerwiS#000")
Repeat
Progress = MailProgress(0)
Delay(300)
Until Progress = #PB_Mail_Finished Or Progress = #PB_Mail_Error
If Progress = #PB_Mail_Finished
MessageRequester("Information", "Mail correctly sent !")
Else
MessageRequester("Error", "Can't sent the mail !")
EndIf
EndIfDo You mean code posted: Wed Aug 29, 2018 3:49 am (normeus)?dige wrote:It works with PB 5.73! Look at page 4..Johanson wrote:I tried
I remind you: I have version 5.73
Code: Select all
Base64EncoderBuffer(*B64EncodeBufferA,
MemorySize(*B64EncodeBufferA)-1,
*B64EncodeBufferB,
MemorySize(*B64EncodeBufferB)-1)Code: Select all
Result$ = Base64Encoder(*InputBuffer, InputSize [, Flags])
Code: Select all
#MailServer = "smtps://smtp.xxx.xx:587"
#SMTP_User = "sender@xxxxxx.xx"
#SMTP_Password = "SerwiS#000"
YES!!! YES!!! YES!!!infratec wrote:Does your constants look like this?Code: Select all
#MailServer = "smtps://smtp.xxx.xx:587" #SMTP_User = "sender@xxxxxx.xx" #SMTP_Password = "SerwiS#000"
Code: Select all
#MailServer = "smtp.xxx.xx:587"