Web app not sending emails after server upgrade

I have my web app send myself and sometimes the user an email. All has been working well prior to the server upgrade which happened yesterday. Now the app does not send the emails. The code below is what I have been using. Do I need to change something with this?

dim fwp As New XojoCloud.FirewallPort(465, XojoCloud.FirewallPort.Direction.Outgoing)
fwp.Open()
If fwp.isOpen() Then
  
  dim mail as EmailMessage
  dim strMessage as String
  
  Dim MailSocket As New SMTPSecureSocket
  MailSocket.Address = "smtp.gmail.com"
  MailSocket.Port = 465
  MailSocket.ConnectionType = SMTPSecureSocket.TLSv1
  
  MailSocket.SMTPConnectionMode = SMTPSecureSocket.ModeSSLTLS
  MailSocket.Secure = True
  MailSocket.UserName = app.kMailUN
  MailSocket.Password = app.kMailPW
  
  mail = new EmailMessage
  mail.fromAddress = "myemail@xxx.com"
  
  mail.subject = "some email subject"
  
  strMessage = "some email message"
  
  mail.bodyPlainText = strMessage
  
  mail.AddRecipient("myemail@xxx.com")
  
  MailSocket.Messages.Add mail
  MailSocket.SendMail
  
  fwp.Close() // Close port when done
End If

4 posts - 2 participants

Read full topic