FormNumbering

説明

出力ファイルのフォーム フィールドにフォーム番号を割り当てます。

注意 : この関数を使用する場合は、CopyForm より前に呼び出す必要があります。

戻り値の型

Short

説明

指定したフィールドに割り当てるフォーム番号

構文

object.FormNumbering = value

FormNumbering プロパティは次のパラメータから構成されています。

パラメータ

値の型

説明

Object

 

Toolkit オブジェクト

Value

Short

FormNumbering = 1、またはその他の数値 (> 0) を設定すると、Toolkit は最初のコピーのフィールドを、NAME__1 (アンダースコア 2 つ) ADDRESS__1、また、2 番目のコピーを NAME__2 (アンダースコア 2 つ) ADDRESS__2、 などの名称に変更します。

備考

Toolkit を使用して、同じフォームを複数回コピーできます。これにより、単純にデータを移動することで PDF の容量を内部的に節約できます。フィールドが "読取専用" に指定されていない、かつ、異なる値がフォーム フィールドに設定されている場合、同じ名称の出力フィールドは、名前を付けられた最初のインスタンスにユーザがデータを入力するときに上書きされます。これを防ぐためには FormNumbering プロパティを使用します。 

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

Set TK = CreateObject("APToolkit.Object")

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

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

TK.FormNumbering = 1

'Prevents overwriting of data by assigning unique form names

For i = 1 To 10

'Generates 10 pages from the Template

TK.SetFormFieldData "bag", "infoFromDataBase" & i, 0

TK.SetFormFieldData "name", "moreinfoFromDataBase" & i, 0

TK.SetFormFieldData "type", "evenmoreinfoFromDataBase" & i, 0

r = TK.CopyForm(0, 0)

'Implements the changes for the current page

TK.ResetFormFields

'Resets the form fields to be written in again

Next

TK.CloseOutputFile

Set TK = Nothing