Chilkat HOME Android™ ASP Visual Basic VB.NET C# iOS (IPhone) Objective-C C++ C Unicode C++ Unicode C MFC Delphi DLL Delphi ActiveX FoxPro Java Perl PHP Extension PHP ActiveX Python PowerShell Ruby SQL Server VBScript
GMail SMTP port 587
Send email using GMail's SMTP server on port 587 (SSL via STARTTLS). Dim mailman As New ChilkatMailMan2 ' Any string argument automatically begins the 30-day trial. Dim success As Long success = mailman.UnlockComponent("30-day trial") If (success <> 1) Then MsgBox "Component unlock failed" Exit Sub End If ' Use the GMail SMTP server mailman.SmtpHost = "smtp.gmail.com" mailman.SmtpPort = 587 mailman.StartTLS = 1 ' Set the SMTP login/password. mailman.SmtpUsername = "chilkat.support" mailman.SmtpPassword = "myPassword" ' Create a new email object Dim email As New ChilkatEmail2 email.Subject = "This is a test" email.Body = "This is a test" email.From = "Chilkat Support <chilkat.support@gmail.com>" email.AddTo "Chilkat","support@chilkatsoft.com" success = mailman.SendEmail(email) If (success <> 1) Then MsgBox mailman.LastErrorText Exit Sub End If MsgBox "Mail Sent!" |
© 2000-2013 Chilkat Software, Inc. All Rights Reserved.