SMTPClient error -11 Operation timeout
- New
- Advice
-
Brage Mogstad
- PowerBuilder
- Wednesday, 14 May 2025 11:21 AM UTC
Hello,
We're currently using PB2019 and OLE to send emails from our app. However, we'd really like to offer our customers the option of using the new MS Outlook email client instead of the old one, as it is way faster and less resource-demanding on client PCs.
I'm looking into the "new" Appeon 2022R3 Build 3397 IDE/Runtime and the SMTPClient object for SMTP over OLE, using a simple mail setup at an account at one.com. For some reason, this results in an error: -11 Operation timeout.
The one.com account I'm testing is verified and works flawlessly with the same setup on my Outlook mail client, which resides on the same PC.
Could this be a bug? Am I missing something important in the setup?
Any advice is greatly appreciated.
Regards
Brage
string ls_server, ls_userid, ls_password, ls_authmethod, ls_characterset, ls_errmsg
long ll_port, ll_conntype, ll_row, ll_authmethod
Integer li_rc
SMTPClient lnv_SmtpClient
lnv_SmtpClient = CREATE SMTPClient
dw_smtp.Accepttext()
ll_row = dw_smtp.GetRow()
ls_server = dw_smtp.GetItemString(ll_row, "server")
ls_userid = dw_smtp.GetItemString(ll_row, "userid")
ls_password = dw_smtp.GetItemString(ll_row, "password")
ll_authmethod = dw_smtp.GetItemNumber(ll_row, "authmethod")
ls_characterset = dw_smtp.GetItemString(ll_row, "characterset")
ll_port = dw_smtp.GetItemNumber(ll_row, "port")
ll_conntype = dw_smtp.GetItemNumber(ll_row, "conntype")
//set the email account information
lnv_SmtpClient.Host = ls_server
lnv_SmtpClient.Username = ls_userid
lnv_SmtpClient.Password = ls_password
lnv_SmtpClient.Port = ll_port
choose case ll_conntype
case 0
//NONE
lnv_SmtpClient.EnableTLS = False
case 1
lnv_SmtpClient.EnableTLS = True
case 2
case 3
end choose
choose case ll_authmethod
case 6
//OAUTH2
end choose
//Sets the email message
lnv_SmtpClient.Message.Reset(0)
lnv_SmtpClient.Message.SetSender("brage@evolveit.no","Brage Mogstad")
lnv_SmtpClient.Message.Encoding = 'windows-1252'
lnv_SmtpClient.Message.AddRecipient("bmogstad@maritech.no", "Brage Mogstad")
lnv_SmtpClient.Message.Subject = "SMTPClient Test Message"
lnv_SmtpClient.Message.TextBody = "SMTPClient example message body"
//Priority
lnv_SmtpClient.Message.Priority = 0
//Timeout
lnv_SmtpClient.timeout = 10
// Enable the logging feature.
lnv_SmtpClient.LogFile("e:\temp\msmtp\mail.log", false)
//Model Authentication
//lnv_SmtpClient.XOAuth2AccessToken = "ya29.a0AVvZVsrZY8ra_fyIw3EyVSYUQIXYbWcz4_mYqlqtxFE-4t_hzLyV_BaZbaxhM3nC10Nr5Qm6hmHPBQvd5BfaH7kXN5KxS-XR0dnV-1EHltUJmcgBSZIHbPEkR6qLf_CEaEozOESSyebgAWv5SGynKfyCzsvR6QaCgYKAeMSARASFQGbdwaIy4ayfJPAa23BKltg4-AJjg0165"
//Sends the email
li_rc = lnv_SmtpClient.Send()
IF li_rc = 1 THEN
MessageBox("SMTPClient", "EMail sent.")
ELSE
choose case li_rc
case -1
ls_errmsg = "A general error occurred."
case -2
ls_errmsg = "Unable to connect to service through proxy."
case -3
ls_errmsg = "The given proxy host could not be resolved."
case -4
ls_errmsg = "The given remote host could not be resolved."
case -5
ls_errmsg = "Failed to connect to host."
case -6
ls_errmsg = "Host is of bad/illegal format or is missing."
case -7
ls_errmsg = "Protocol is not supported."
case -8
ls_errmsg = "Error in SSL connection."
case -9
ls_errmsg = "Server certificate is revoked."
case -10
ls_errmsg = " Service certificate authentication failed."
case -11
ls_errmsg = "Operation timeout."
case -12
ls_errmsg = "The remote server denied curl to login."
case -13
ls_errmsg = "Failed sending network data."
case -14
ls_errmsg = "Failure in receiving network data."
case -15
ls_errmsg = "Incorrect username or password."
case -16
ls_errmsg = "Error reading local file."
case -17
ls_errmsg = "No sender has been specified."
case -18
ls_errmsg = "No recipients have been specified."
end choose
MessageBox("SMTPClient Error", String(li_rc) + ' - ' + ls_errmsg, stopsign!, ok!)
END IF
DESTROY lnv_SmtpClient
Find Questions by Tag
Helpful?
If a reply or comment is helpful for you, please don’t hesitate to click the Helpful button. This action is further confirmation of their invaluable contribution to the Appeon Community.