B4J Question SMTP - Connection closed / Access denied - Invalid HELO name

#AdditionalJar: javax.mail-1.6.2.jar. ' file from: https://maven.java.net/content/repositories/releases/com/sun/mail/javax.mail/1.6.2/javax.mail-1.6.2.jar


Sub SendEmailMessage
    Dim jo As JavaObject = Me
    jo.RunMethod("sendemail", Null)
End Sub

#if Java
import java.util.Properties;

import javax.mail.Message;
import javax.mail.MessagingException;
import javax.mail.PasswordAuthentication;
import javax.mail.Session;
import javax.mail.Transport;
import javax.mail.internet.InternetAddress;
import javax.mail.internet.MimeMessage;

   public static void sendemail() {
      // Recipient's email ID needs to be mentioned.
      String to = "email@tosend.to";

      // Sender's email ID needs to be mentioned
      String from = "email@from.here";
      final String username = "me@myemail.here"; //change accordingly
      final String password = "password_here"; //change accordingly

      // SMTP Address
      String host = "mail.my.site";

      Properties props = new Properties();
      props.put("mail.smtp.auth", "true");
      props.put("mail.smtp.starttls.enable", "true");
      props.put("mail.smtp.host", host);
      props.put("mail.smtp.port", "587");

      // Get the Session object.
      Session session = Session.getInstance(props,
         new javax.mail.Authenticator() {
            protected PasswordAuthentication getPasswordAuthentication() {
               return new PasswordAuthentication(username, password);
       }
         });

      try {
       // Create a default MimeMessage object.
       Message message = new MimeMessage(session);
   
       // Set From: header field of the header.
       message.setFrom(new InternetAddress(from));
   
       // Set To: header field of the header.
       message.setRecipients(Message.RecipientType.TO,
               InternetAddress.parse(to));
   
       // Set Subject: header field
       message.setSubject("Testing Subject");
   
       // Now set the actual message
       message.setText("Hello, this is sample for to check send email using JavaMailAPI");

       // Send message
       Transport.send(message);

       System.out.println("Sent message successfully....");
   
      } catch (MessagingException e) {
         throw new RuntimeException(e);
      }
   }

#end if

Sub RunSMTPTest

    Dim smtpServer As String = "mail.xxxxxxxxxx.xxx"
    Dim smtpPort As Int = 587
    Dim user As String = "xxxxx@xxxxxxxxxx.xxx"
    Dim email_password As String = "xxxxxxxxxxxx"

    smtp.Initialize(smtpServer, smtpPort, user, email_password, "smtp")
    smtp.StartTLSMode = True
    smtp.UseSSL = False

    Log("SMTP Initialize Done")

    SendEmail("xxxxx@xxxxxx.xxx", user, "subject test1", "body test 1")

End Sub

Public Sub SendEmail(ToEmail As String, from As String, Subject As String, body As String)
    Log("SendEmail")
    Try
        smtp.To.Add(ToEmail)
        smtp.Sender = from
        smtp.Body = body
        smtp.Subject = Subject
        smtp.Send
    Catch
        Log("Error: SendEmail To - " & ToEmail & " Subject: " & Subject)
        Log(LastException.Message)
    End Try

    wait for SMTP_MessageSent(Success As Boolean)
    ' this is triggered once the email has been sent or failed to be sent
    If Success Then
        Log("eMail Sent OK - To: " & ToEmail & " Subject: " & Subject)
    Else
        Log("eMail Failed to send - To: " & ToEmail & " Subject: " & Subject)
        Log(LastException.Message)
    End If
End Sub