Chilkat HOME ASP Visual Basic VB.NET C# Visual C++ Delphi FoxPro Java Perl Python Ruby SQL Server VBScript
|
GMail SMTP port 465Send email using GMail's SMTP server on port 465 (SSL).
uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, CHILKATMAILLib2_TLB, OleCtrls; ... procedure TForm1.Button1Click(Sender: TObject); var mailman: TChilkatMailMan2; success: Integer; email: CHILKATMAILLib2_TLB.IChilkatEmail2; begin mailman := TChilkatMailMan2.Create(Self); // Any string argument automatically begins the 30-day trial. success := mailman.UnlockComponent('30-day trial'); if (success <> 1) then begin ShowMessage('Component unlock failed'); end; // Use the GMail SMTP server mailman.SmtpHost := 'smtp.gmail.com'; mailman.SmtpPort := 465; mailman.SmtpSsl := 1; // Set the SMTP login/password. mailman.SmtpUsername := 'chilkat.support'; mailman.SmtpPassword := 'myPassword'; // Create a new email object email := CoChilkatEmail2.Create(); 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 begin ShowMessage(mailman.LastErrorText); end; ShowMessage('Mail Sent!'); end; |
Need a specific example? Send a request to support@chilkatsoft.com
© 2000-2007 Chilkat Software, Inc. All Rights Reserved.