activePDF Toolkit 2011 API リファレンス
ExportComments
テクニカル リファレンス > Toolkit オブジェクト > Toolkit メソッド > ExportComments

Glossary Item Box

説明:

指定したページから注釈を書き出します。注釈は文字列として返されます。

注意: このメソッドは、Toolkit Pro でのみ機能します。
戻り値: 値の型 説明 & 設定
String 注釈のデータを含む XML 文字列。この文字列は、AddComment メソッドと併用できます。
構文: object.ExportComments PgNum
引数: 引数 値の型 説明 & 設定
object N/A オブジェクトのインスタンスを設定します。
PgNum Long 書き出す注釈が含まれるページ番号。

0 を設定すると、すべてのページの注釈を返します。
備考: すべてのページの注釈を返すために 0 を指定した場合は、単一の文字列として取得します。注釈にページ番号が必要な場合、次の例に示す処理を行ないます。
例:
strPath = CreateObject ("Scripting.FileSystemObject").GetAbsolutePathName(".") & "\"
Set TK = CreateObject("APToolkit.Object")
numPgs = TK.Numpages("output.pdf")
Dim filesys, testfile
Set filesys = CreateObject("Scripting.FileSystemObject")
Set testfile = filesys.CreateTextFile(strPath & "comments.txt", True)
For I = 1 to numPgs
r = TK.ExportComments(I)
testfile.WriteLine "Comments From Page " & I
testfile.WriteLine ""
testfile.WriteLine r
testfile.WriteLine ""
Next
testfile.Close
TK.CloseInputFile
Set TK = Nothing