SignatureExportCertificate メソッド

デジタルID から証明書をエクスポートする。

Sub SignatureExportCertificate(CertificateFileName As String,
                               IDFileName As String,
                               IDPassword As String)

パラメータ

戻り値

なし

注意点

デジタルID から証明ファイルを取得することが出来ます。そして署名済み文書を確認するために、その証明ファイルを他の人が使用することが可能です。

使用例


Set oPrinter = CreateObject("easyPDF.Printer.7")

Set oPrintJob = oPrinter.PrintJob

Set oPDFSetting = oPrintJob.PDFSetting



' デジタルIDを作成します (デジタルIDを持っていない場合のみ、この作業を実行してください)

oPDFSetting.SignatureCreateDigitalID "C:\my_digital_id.pfx",  _

                                     "password_here", _

                                     "John Smith", _

                                     "US", _

                                     "Organization Name", _

                                     "Organization Unit", _

                                     "My Email Address", _

                                     PRN_SIG_KEYLEN_1024



' デジタルIDから証明ファイルを取得することができます

' そして、あなたの署名済み文書を確認するために、証明ファイルを他の人が使用することが可能です

oPDFSetting.SignatureExportCertificate "C:\my_certificate.cer", _

                                       "C:\my_digital_id.pfx", _

                                       "password_here"



' 電子署名を有効にします

oPDFSetting.Signature = True



' デジタルIDファイルを設定します

oPDFSetting.SignatureDigitalIDFileName = "C:\my_digital_id.pfx"



' 署名の画像ファイルを挿入します

oPDFSetting.SignatureImage = True

oPDFSetting.SignatureImageFile = "C:\signature.bmp"

oPDFSetting.SignatureImagePosLeft = 1.0 ' 1.0 inch from left

oPDFSetting.SignatureImagePosTop = 1.0 ' 1.0 inch from top

oPDFSetting.SignatureImageZoom = 100 ' percent

oPDFSetting.SignatureInfoContact = "Contact info"

oPDFSetting.SignatureInfoLocation = "Location info"

oPDFSetting.SignatureInfoPurpose = "Purpose info"



' PDF変換前にデジタルIDパスワードを設定します

oPrintJob.SignatureDigitalIDPassword = "password_here"



oPrintJob.PrintOut "C:\input.doc", "C:\output.pdf"