Send Email with SMTP SSL using Port 465

Download Chilkat Email ActiveX

This VB6 examples demonstrates how to send mail over an SSL connection with an SMTP server on the default SSL SMTP port 465.

    Dim mailman As New ChilkatMailMan2
    mailman.UnlockComponent "test"
    
    mailman.SmtpHost = "smtp.comcast.net"
    mailman.SmtpPort = 465
    mailman.SmtpSsl = 1
    ' Your SMTP server may or may not require authentication.  If it does not
    ' you may omit the following two lines.
    mailman.SmtpUsername = "***"
    mailman.SmtpPassword = "***"
    
    ' Create a simple email for sending.
    Dim email As New ChilkatEmail2
    Call email.AddTo("Chilkat Support", "support@chilkatsoft.com")
    email.FromName = "Chilkat Sales"
    email.FromAddress = "sales@chilkatsoft.com"
    
    email.Subject = "Test email using an SSL connection to the SMTP server."
    email.Body = "Port 465 is the standard port for SSL SMTP"
    
    success = mailman.SendEmail(email)
    If (success = 0) Then
        MsgBox mailman.LastErrorText
    Else
        MsgBox "Success!"
    End If