Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(SQL Server) SMTP Login SecureDemonstrates how to set the SMTP password using a secure string. This example requires Chilkat v9.5.0.71 or greater.
// Important: See this note about string length limitations for strings returned by sp_OAMethod calls. // 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. 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 DECLARE @success int -- Imagine we've previously saved our encrypted login and password within a JSON config file -- that contains this: -- { -- "smtp_login": "D7lnlWY291LKMeChlvQq7N/Tg7ieuSB15a+9Ekyd0R4=", -- "smtp_password": "5neIq9Jmn0E3p71N6Yc8TA==" -- } DECLARE @json int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.JsonObject', @json OUT EXEC sp_OAMethod @json, 'LoadFile', @success OUT, 'qa_data/passwords/smtp.json' DECLARE @crypt int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Crypt2', @crypt OUT -- These are the encryption settings we previously used to encrypt the credentials within the JSON config file. EXEC sp_OASetProperty @crypt, 'CryptAlgorithm', 'aes' EXEC sp_OASetProperty @crypt, 'CipherMode', 'cbc' EXEC sp_OASetProperty @crypt, 'KeyLength', 128 EXEC sp_OAMethod @crypt, 'SetEncodedKey', NULL, '000102030405060708090A0B0C0D0E0F', 'hex' EXEC sp_OAMethod @crypt, 'SetEncodedIV', NULL, '000102030405060708090A0B0C0D0E0F', 'hex' EXEC sp_OASetProperty @crypt, 'EncodingMode', 'base64' DECLARE @ssLogin int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.SecureString', @ssLogin OUT DECLARE @ssPassword int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.SecureString', @ssPassword OUT -- Decrypt to the secure string. (the strings will still held in memory encrypted, but are now encrypted using -- a randomly generated session key.) EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'smtp_login' EXEC sp_OAMethod @crypt, 'DecryptSecureENC', @success OUT, @sTmp0, @ssLogin EXEC sp_OAMethod @json, 'StringOf', @sTmp0 OUT, 'smtp_password' EXEC sp_OAMethod @crypt, 'DecryptSecureENC', @success OUT, @sTmp0, @ssPassword -- Set the SMTP domain, login, and password EXEC sp_OASetProperty @mailman, 'SmtpHost', 'smtp.gmail.com' EXEC sp_OASetProperty @mailman, 'SmtpSsl', 1 EXEC sp_OASetProperty @mailman, 'SmtpPort', 465 EXEC sp_OAMethod @ssLogin, 'Access', @sTmp0 OUT EXEC sp_OASetProperty @mailman, 'SmtpUsername', @sTmp0 -- Set the SmtpPassword property via the SetPassword method using the secure string. EXEC sp_OAMethod @mailman, 'SetPassword', @success OUT, 'smtp', @ssPassword -- Connect and authenticate.. EXEC sp_OAMethod @mailman, 'SmtpConnect', @success OUT IF @success <> 1 BEGIN EXEC sp_OAGetProperty @mailman, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @mailman EXEC @hr = sp_OADestroy @json EXEC @hr = sp_OADestroy @crypt EXEC @hr = sp_OADestroy @ssLogin EXEC @hr = sp_OADestroy @ssPassword RETURN END EXEC sp_OAMethod @mailman, 'SmtpAuthenticate', @success OUT IF @success <> 1 BEGIN EXEC sp_OAGetProperty @mailman, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @mailman EXEC @hr = sp_OADestroy @json EXEC @hr = sp_OADestroy @crypt EXEC @hr = sp_OADestroy @ssLogin EXEC @hr = sp_OADestroy @ssPassword RETURN END PRINT 'SMTP login successful.' -- ... EXEC sp_OAMethod @mailman, 'CloseSmtpConnection', @success OUT EXEC @hr = sp_OADestroy @mailman EXEC @hr = sp_OADestroy @json EXEC @hr = sp_OADestroy @crypt EXEC @hr = sp_OADestroy @ssLogin EXEC @hr = sp_OADestroy @ssPassword END GO |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.