Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(Excel) Send email using smtp.gmail.com with SSL (port 465).Send email using smtp.gmail.com with SSL (port 465).
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' The mailman object is used for sending and receiving email. Dim mailman As Chilkat.MailMan Set mailman = Chilkat.NewMailMan ' Set the SMTP server. mailman.SmtpHost = "smtp.gmail.com" mailman.SmtpUsername = "mySmtpLogin" mailman.SmtpPassword = "myPassword" mailman.SmtpSsl = True mailman.SmtpPort = 465 ' Create a new email object Dim email As Chilkat.Email Set email = Chilkat.NewEmail email.Subject = "This is a test" email.Body = "This is a test" email.From = "Chilkat Support <chilkat.support@gmail.com>" success = email.AddTo("Chilkat Admin","admin@chilkatsoft.com") success = mailman.SendEmail(email) If (success <> True) Then Debug.Print mailman.LastErrorText Exit Sub End If success = mailman.CloseSmtpConnection() If (success <> True) Then Debug.Print "Connection to SMTP server not closed cleanly." End If Debug.Print "Mail Sent!" |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.