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 Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(SQL Server) Send High Priority Email (SMTP, X-Priority header)Demonstrates how to send high-priorty email (or lower priority email) by setting the X-Priority header field.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @sTmp0 nvarchar(4000) -- 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. DECLARE @mailman int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.MailMan', @mailman OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END -- Set the SMTP server (obviously, use your SMTP server, not chilkatsoft.com) EXEC sp_OASetProperty @mailman, 'SmtpHost', 'smtp.chilkatsoft.com' -- Set the SMTP login/password (if required) EXEC sp_OASetProperty @mailman, 'SmtpUsername', 'myUsername' EXEC sp_OASetProperty @mailman, 'SmtpPassword', 'myPassword' -- Create a new email object DECLARE @email int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Email', @email OUT EXEC sp_OASetProperty @email, 'Subject', 'This is a test' EXEC sp_OASetProperty @email, 'Body', 'This is a test' EXEC sp_OASetProperty @email, 'From', 'Chilkat Support <support@chilkatsoft.com>' DECLARE @success int EXEC sp_OAMethod @email, 'AddTo', @success OUT, 'Chilkat Admin', 'admin@chilkatsoft.com' -- To add more recipients, call AddTo, AddCC, or AddBcc once per recipient. -- To send high-priority email, -- add the X-Priority header field with the value "1" -- to indicate highest-priority. -- A value of "3" is normal, which is the same as not setting -- the X-Priority header at all, and "5" is the lowest. -- "2" and "4" are in-betweens. -- Microsoft Outlook might add the following headers when -- sending high-priority email. -- X-Priority: 1 (Highest) -- X-MSMail-Priority: High -- Importance: High -- The X-Priority header alone is enough to make the email high-priority. EXEC sp_OAMethod @email, 'AddHeaderField', NULL, 'X-Priority', '1' -- Call SendEmail to connect to the SMTP server and send. -- The connection (i.e. session) to the SMTP server remains -- open so that subsequent SendEmail calls may use the -- same connection. EXEC sp_OAMethod @mailman, 'SendEmail', @success OUT, @email IF @success <> 1 BEGIN EXEC sp_OAGetProperty @mailman, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @mailman EXEC @hr = sp_OADestroy @email RETURN END EXEC sp_OAMethod @mailman, 'CloseSmtpConnection', @success OUT IF @success <> 1 BEGIN PRINT 'Connection to SMTP server not closed cleanly.' END PRINT 'Mail Sent!' EXEC @hr = sp_OADestroy @mailman EXEC @hr = sp_OADestroy @email END GO |
© 2000-2019 Chilkat Software, Inc. All Rights Reserved.