Insertar imágenes en el documento de Pages usando AppleScript

1

Estoy tratando de automatizar la construcción de un documento, y estoy buscando una forma de insertar imágenes en un documento de Pages con AppleScript. Por ejemplo:

tell application "Pages"
    make new document
    tell document 1
      tell body text    
        make new paragraph at end with data ¬
         "another paragraph" with properties {paragraph style:"Body"}

        make new image at end with properties ??? :(

      end tell
    end tell
end tell

Nada de lo que he probado hasta ahora funciona: "crear un nuevo gráfico", "crear una nueva imagen", "insertar datos de imagen", etc. No estoy descartando la posibilidad de que no sea posible en absoluto (he usado AppleScript durante el tiempo suficiente, por lo que no sería una sorpresa), pero sería bueno si pudiera persuadirlo para que funcione.

Solución

La solución de @ jackjr300 funciona muy bien. Finalmente fui con este encantamiento:

set fname to "/Users/me/Desktop/picture.png"
set thisImage to POSIX path of fname
tell application "Pages"
    tell document 1
        tell body text
            make new paragraph at end with data "another paragraph" with properties {paragraph style:"Body"}
            make new image at after last paragraph with properties {image data:thisImage}
        end tell
    end tell
end tell
cormullion
fuente

Respuestas:

1

Aquí hay un ejemplo que funciona.

set thisImage to choose file with prompt "Select an image"
tell application "Pages"
  tell (make new document)
      tell body text
          make new paragraph at end with data "another paragraph" with properties {paragraph style:"Body"}
          make new image at after last paragraph with properties {image data:thisImage}
      end tell
  end tell
end tell
jackjr300
fuente