GetPDFInfo

説明

指定したファイルの PDF 注釈フィールドをメモリに読み込みます。

注意 : GetPDFInfo は開いているすべての入力ファイルを閉じ、指定したファイルを新しい入力ファイルとして開きます。

戻り値の型

Long

構文

object.GetPDFInfo FileName

GetPDFInfo メソッドは次のパラメータから構成されています。

備考

GetPDFinfo が正常終了した場合、次のプロパティ値が取得されます。

·         Author

·         Title

·         Subject

·         Keywords

·         Creator

·         Producer

·         CreateDate

·         ModDate

·         CustomDocInfo

例

strPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"

Set TK = CreateObject("APToolkit.Object")

r = TK.OpenOutputFile("Output.pdf")

'this will open the file as input (see OpenInputFile)

r = TK.GetPDFInfo("Input.pdf")

strDate = TK.CreateDate

If strDate <> "" Then

TK.SetHeaderFont "Helvetica", 12

TK.SetHeaderText 400, 10, strDate

End If

r = TK.CopyForm(0, 0)

TK.CloseOutputFile

Set TK = Nothing