SQL Server
SQL Server
Send an Email with a Digital Signature
See more Email Object Examples
Demonstrates the Chilkat Email.SendSigned property. Set it to true to have the email sent with a digital signature (the default is false). Signing also requires a certificate with access to its private key. This example loads that certificate (and its private key) from a PFX file with Cert.LoadPfxFile, supplies it via SetSigningCert, and enables signed sending.
Background: Signing is the mirror image of encrypting. To encrypt for a recipient you use their public certificate; to sign you use your own private key, and recipients verify with your public certificate. A signature does not hide the message — a signed email is still readable by anyone — but it proves who sent it and guarantees the content was not tampered with. A PFX (also called PKCS#12,
.pfx or .p12) is a password-protected file that bundles a certificate together with its private key, making it a convenient single-file source for signing credentials.Chilkat SQL Server Downloads
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
DECLARE @hr int
DECLARE @iTmp0 int
DECLARE @sTmp0 nvarchar(4000)
DECLARE @success int
SELECT @success = 0
-- Demonstrates the Email.SendSigned property with a full signing setup. Set SendSigned
-- to true to have the email sent with a digital signature. Signing requires a certificate
-- with access to its private key, which we load here from a PFX (.pfx / .p12) file.
DECLARE @email int
EXEC @hr = sp_OACreate 'Chilkat.Email', @email OUT
IF @hr <> 0
BEGIN
PRINT 'Failed to create ActiveX component'
RETURN
END
EXEC sp_OASetProperty @email, 'Subject', 'Signed email'
EXEC sp_OASetProperty @email, 'Body', 'This message will be sent with a digital signature.'
EXEC sp_OASetProperty @email, 'From', 'alice@example.com'
EXEC sp_OAMethod @email, 'AddTo', @success OUT, 'Bob', 'bob@example.com'
-- Load the signing certificate (including its private key) from a PFX file.
-- The 2nd argument is the PFX password.
DECLARE @cert int
EXEC @hr = sp_OACreate 'Chilkat.Cert', @cert OUT
EXEC sp_OAMethod @cert, 'LoadPfxFile', @success OUT, 'qa_data/certs/signer.pfx', 'pfx_password'
IF @success = 0
BEGIN
EXEC sp_OAGetProperty @cert, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @email
EXEC @hr = sp_OADestroy @cert
RETURN
END
-- Provide the signing certificate.
EXEC sp_OAMethod @email, 'SetSigningCert', @success OUT, @cert
IF @success = 0
BEGIN
EXEC sp_OAGetProperty @email, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
EXEC @hr = sp_OADestroy @email
EXEC @hr = sp_OADestroy @cert
RETURN
END
-- Request that the email be sent with a digital signature.
EXEC sp_OASetProperty @email, 'SendSigned', 1
EXEC sp_OAGetProperty @email, 'SendSigned', @iTmp0 OUT
PRINT 'SendSigned = ' + @iTmp0
-- Note: The path "qa_data/certs/signer.pfx" is a relative local filesystem path,
-- relative to the current working directory of the running application.
EXEC @hr = sp_OADestroy @email
EXEC @hr = sp_OADestroy @cert
END
GO