AcroExch.PDDoc： GetInfo メソッド

TOP > AcroExch.PDDoc > GetInfo [...]

説明

PDFドキュメントのInfo情報の指定されたキーの値を得ます。

最大512バイトは返されます。

文書プロパティの概要タブにある「タイトル」、「作成者」、「サブタイトル」、「キーワード」、「アプリケーション」、「PDF変換」、「作成日」、「更新日」の項目もこれで取得できます。

形式

BSTR GetInfo(BSTR szInfoKey);

引数

第１引数(BSTR szInfoKey) ：
キーワード

戻り値

文字列があったなら、成功。
キーが存在しないか、何らかの理由で値を読むことができないなら、空の文字を返します。

動作するバージョン

Version	Adobe Acrobat	備考
4	-	Acrobat 4.0 ※Windows 98SE + Excel 2000
5	-	Acrobat 5.0.5
6	-	Acrobat 6.0.3 Pro
7	-	Acrobat 7.0.9 Pro Acrobat 7.1.4 Pro
8	OK	Acrobat 8.3.1 Pro
9	-	Acrobat 9.3.2 Extended
10	-	Acrobat X (10.1.8) Extended
11	OK	Acrobat XI (11.0.14) Pro

OK = 動作する。
NO = 動作しない。戻り値が0を返す。
- = 未確認。

サンプル：ExcelのVBA

説明：PDFドキュメントから文書プロパティの概要と詳細内容の値を得ます。

F8キーでステップ実行しながら動作確認する。
事前に参照設定をする。

001 Option Explicit
002  
003 Sub AcroExch_PDDoc_GetInfo()
004  
005     Dim objAcrobatPDDoc As New Acrobat.AcroPDDoc 
006     Dim lRet            As Long 
007     Dim strGetInfo      As String 
008     Const CON_FILE   As String = "I:\Adobe PDF\execMenuItem.pdf"
009  
010     'PDFオブジェクトをオープンする。 
011     '注意）Acrobatは画面に表示されない。 
012     lRet = objAcrobatPDDoc.Open(CON_FILE)
013  
014     '文書プロパティのタイトル 
015     strGetInfo = objAcrobatPDDoc.GetInfo("Title") 
016     Debug.Print "GetInfo(""Title"")=" & strGetInfo 
017     '文書プロパティの作成者 
018     strGetInfo = objAcrobatPDDoc.GetInfo("Author") 
019     Debug.Print "GetInfo(""Author"")=" & strGetInfo 
020     '文書プロパティのサブタイトル 
021     strGetInfo = objAcrobatPDDoc.GetInfo("Subject") 
022     Debug.Print "GetInfo(""Subject"")=" & strGetInfo 
023     '文書プロパティのキーワード 
024     strGetInfo = objAcrobatPDDoc.GetInfo("Keywords") 
025     Debug.Print "GetInfo(""Keywords"")=" & strGetInfo 
026     '文書プロパティのアプリケーション 
027     strGetInfo = objAcrobatPDDoc.GetInfo("Creator") 
028     Debug.Print "GetInfo(""Creator"")=" & strGetInfo 
029     '文書プロパティのPDF変換 
030     strGetInfo = objAcrobatPDDoc.GetInfo("Producer") 
031     Debug.Print "GetInfo(""Producer"")=" & strGetInfo 
032     '文書プロパティの作成日 
033     strGetInfo = objAcrobatPDDoc.GetInfo("CreationDate") 
034     Debug.Print "GetInfo(""CreationDate"")=" & strGetInfo 
035     '文書プロパティの更新日 
036     strGetInfo = objAcrobatPDDoc.GetInfo("ModDate") 
037     Debug.Print "GetInfo(""ModDate"")=" & strGetInfo 
038     '文書プロパティの 
039     strGetInfo = objAcrobatPDDoc.GetInfo("Trapped") 
040     Debug.Print "GetInfo(""Trapped"")=" & strGetInfo
041  
042     'PDFオブジェクトを解放する。 
043     objAcrobatPDDoc.Close 
044     Set objAcrobatPDDoc = Nothing
045  
046 End Sub

　Highlight：プログラミング言語のソースコードを構文で色分け (GUI編)
　

実行結果

AcroExch.PDDoc：GetInfo メソッド　で文書プロパティの内容を表示

GetInfo("Title")=app.execMenuItem()
GetInfo("Author")=dareka
GetInfo("Subject")=app.execMenuItem("code");
GetInfo("Keywords")=app,execMenuItem,code
GetInfo("Creator")=Word 用 Acrobat PDFMaker 5.0
GetInfo("Producer")=Acrobat Distiller 5.0 (Windows)
GetInfo("CreationDate")=D:20011224105558+09'00'
GetInfo("ModDate")=D:20140423193007+09'00'
GetInfo("Trapped")=

補足

最初に「AcroExch.PDDoc：SetInfo メソッド」にあるExcel VBAサンプルを実行しておいて下さい。
サンプル「Excel：PDFの文書プロパティを表示する」も参照
文書プロパティの開き方・タブの更新はココを参照。

参照

動作確認環境

WindowsXP Pro(+ SP3) +
Acrobat 8.1.2 Pro + Office 2003 + フルMicrosoftUpdate
Windows 7 64bit(+ SP1) +
Acrobat 8.3.1 Pro + Office 2007 + WindowsUpdate
Windows 10 64bit +
Acrobat XI Pro + Office 2007 + WindowsUpdate

＜戻る＞

メソッド「GetInfo(“Modified”)」は使えない

Acrobat 7.0.5 SDK （注：既にこのバージョンは未公開？）からダウンロード＆インストールした Visual Basic.NET 2003 のサンプルコードを見ると

Label10.Text = AcroPDDoc.GetInfo(“Created“)
Label11.Text = AcroPDDoc.GetInfo(“Modified“)

とGetInfoメソッドの検索キーワードに「Created」と「Modified」がある。

これは間違いみたい。

キーワード「Modified」は間違いで「ModDate」が正解です。

strGetInfo = objAcrobatPDDoc.GetInfo(“ModDate“)

と使うのが正解です。

英語のＰＤＦ解説書にはこの記載は今のところ見つかりませんでした。

見つけた場所は、Acrobatメニューの[ファイル(F)]->[文書のプロパティ(D)]->文書のプロパティ画面の[概要]タブ->[その他のメタデータ(M)..]ボタンを押す。

上記の部分に入っています。

自分で入れたPSキーワードの内容も表示されています。

GetInfoメソッドはココにある内容をキーワードで値として拾ってきます。