Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
Create S/MIME Detached Signature with PFXHow to use a PFX to create a signed S/MIME message. Dim mime As New ChilkatMime Dim success As Long success = mime.UnlockComponent("Anything for 30-day trial") If (success = 0) Then MsgBox "Failed to unlock component" Exit Sub End If mime.AddHeaderField "Subject","This is a test" mime.AddHeaderField "Abc","123" mime.SetBodyFromPlainText "This is the body" Dim certStore As New ChilkatCertStore Dim password As String password = "myPassword" success = certStore.LoadPfxFile("chilkat.pfx",password) If (success = 0) Then MsgBox certStore.LastErrorText Exit Sub End If Dim cert As ChilkatCert Set cert = certStore.FindCertBySubjectCN("Chilkat Software, Inc.") If (cert Is Nothing ) Then MsgBox "Failed to find certificate!" Exit Sub End If ' Display the full distinguished name of the cert. Text1.Text = Text1.Text & cert.SubjectDN & vbCrLf Text1.Refresh success = mime.AddDetachedSignature(cert) If (success = 0) Then MsgBox mime.LastErrorText Exit Sub End If Text1.Text = Text1.Text & mime.GetMime() & vbCrLf Text1.Refresh |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.