SignatureCreateDigitalID メソッド

デジタルIDを作成する。

Sub SignatureCreateDigitalID(IDFileName As String,
                             IDPassword As String,
                             Name As String,
                             Country As String,
                             OrganizationName As String,
                             OrganizationUnit As String,
                             Email As String,
                             KeyLength As prnSigKeyLength)

パラメータ

IDFileName

作成するデジタルIDファイルのフルパスネーム

IDPassword

デジタルIDパスワード

Name

貴方の名前

Country

2文字の国コード("US","UK",または"JP"など)

OrganizationName

組織名

OrganizationUnit

部署名

Email

E-メールアドレス

KeyLength

暗号化キーの長さ。prnSigKeyLengthで特定した値を使用してください。

戻り値

無し

注意点

このメソッドはPKCS #12 (.pfx) フォーマット内に自己署名デジタルIDを作成します。

同じファイル名が既に存在している場合、エラーが発生します。

使用例

Set oPrinter = CreateObject("easyPDF.Printer.5")
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ファイルをSetします。
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パスワードをSetします。
oPrintJob.SignatureDigitalIDPassword = "password_here"

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