PowerBuilder

Check if a MIME Entity is Encrypted (S/MIME)

Demonstrates the Chilkat Mime.IsEncrypted method, which returns whether the entity is a CMS/PKCS #7 encrypted S/MIME wrapper. It takes no arguments.

Note: The file path is relative to the application's current working directory. Absolute paths may also be used. Supply the path to your own file.

Background: This tells you a message is encrypted and must be decrypted before its real content is available — the trigger for supplying a recipient certificate and private key to Decrypt. Reading the body without decrypting first would just yield the opaque PKCS #7 blob.

Chilkat PowerBuilder Downloads

Download Chilkat for PowerBuilder

PowerBuilder

integer li_rc
integer li_Success
oleobject loo_Mime

li_Success = 0

//  Demonstrates the Mime.IsEncrypted method, which returns whether the entity is a CMS/PKCS #7 encrypted S/MIME wrapper.  It takes no arguments.

loo_Mime = create oleobject
li_rc = loo_Mime.ConnectToNewObject("Chilkat.Mime")
if li_rc < 0 then
    destroy loo_Mime
    MessageBox("Error","Connecting to COM object failed")
    return
end if
li_Success = loo_Mime.LoadMimeFile("qa_data/encrypted.eml")
if li_Success = 0 then
    Write-Debug loo_Mime.LastErrorText
    destroy loo_Mime
    return
end if

if loo_Mime.IsEncrypted() then
    Write-Debug "This is an encrypted S/MIME message."
else
    Write-Debug "This is not an encrypted S/MIME message."
end if



destroy loo_Mime