【Acrobat】PDFフォームの値を取得して集計まで（その３）

【Acrobat】PDFフォームの値を取得して集計まで（その２）
https://force4u.cocolog-nifty.com/skywalker/2021/09/post-c64e63.html
こちらで
『フォームの名前』は取得しました
この時に『フォームの数』も取得していますので
ひとつずつ
this.getField（フォームの名前）.value;　を繰り返します。

-----------------------------------------------------------------

(*

サンプル

フォームの名前を取得して

から

各フォームの名前の値を取得します。

*)

set theFldNUM to "" as text

set theFldCntNUM to 0 as integer

set theTitleText to "" as text

tell application "Adobe Acrobat"

----activate

--////////////////テンプレートファイルを開く

---do script "app.openDoc(\"" & theTemFilePath & "\");"

--////////////////開いたファイルを処理

tell window 1

do script "console.show();"

do script "console.clear();"

do script "var theFildNo = this.numFields"

set theFldNUM to (do script "theFildNo") as text

repeat theFldNUM times

do script "var theFildTitle = this.getNthFieldName(" & theFldCntNUM & ")"

set theFildTitleText to (do script "theFildTitle") as text

set theTitleText to ("" & theTitleText & theFildTitleText & "\t") as text

set theFldCntNUM to (theFldCntNUM + 1)

end repeat

set theTitleText to ("" & theTitleText & "\n") as text

set theFldCntNUM to 1 as integer

set AppleScript's text item delimiters to {"\t"}

set listTitleText to (every text item of theTitleText) as list

set AppleScript's text item delimiters to {""}

repeat theFldNUM times

set theFormValue to (item theFldCntNUM of listTitleText) as text

log theFormValue

do script "var theFormValeText = this.getField(\"" & theFormValue & "\").value;"

set theFildValeTText to (do script "theFormValeText") as text

set theTitleText to ("" & theTitleText & theFildValeTText & "\t") as text

set theFldCntNUM to (theFldCntNUM + 1)

end repeat

set theTitleText to ("" & theTitleText & "\n") as text

theTitleText

---////////////////ファイルを閉じる

----do script "closeDoc();"

end tell

end tell