CryptoSys PKI Toolkit Manual

Example: Cms.MakeSigData  Cms.Options 

[VB6 equivalent: CMS_MakeSigData]

Dim nRet As Integer
Dim strOutputFile As String
Dim strCertList As String

' Make a list of certs separated by semi-colons (,)
strCertList = "CarlRSASelf.cer;" & "AliceRSASignByCarl.cer"
Console.WriteLine("CertList=" & strCertList)
strOutputFile = "SigDataCertsOnly.p7c"

' Create a certs-only .p7c chain
nRet = Cms.MakeSigData(strOutputFile, "", strCertList, "", Cms.Options.CertsOnly)
Console.WriteLine("CMS_MakeSigData returns " & nRet)
If nRet <> 0 Then Console.WriteLine(General.LastError())

See Also:
Cms.MakeSigData Method ( String, String, String, String, Cms.Options )
Cms.MakeSigData Method ( String, String, String, String, HashAlgorithm, Cms.SigDataOptions )

[Contents] [Index]

[HOME]   [NEXT: Example: Cms.MakeSigDataFromSigValue ...]

Copyright © 2004-12 D.I. Management Services Pty Ltd. All rights reserved.