:AS
tell application "Adobe Photoshop CS4"
	make new document
	do javascript (alias a path to the JavaScript shown above) with arguments {1, "test text", (fileApplications:Scripts:JSFile.jsx),current document}
end tell

:VBS
Dim appRef
Set appRef = CreateObject("Photoshop.Application")
appRef.DoJavaScriptFile "C:¥¥Applications¥Scripts¥JSFile.jsx", _
Array(1, "test text", appRef.ActiveDocument)


参照渡しで引数を読み込むよりもライブラリをロードして引き数つきのエージェント関数を呼んだ方が早いか?

