How to get art file names and path name from quark file

Scripting Forums AppleScript | Classic Mac OS
#1

Hi,

We have bunch of qurak files. From that files we need to extract Art file names and its path name.

Can I get help to write applescript for this actions.

Thanks,
Gopal

#2

Hi,

I’m not sure what the “Art file” is that you’re talking about. Are you talking about the images or a .art file type that each image box contains?

Here’s a piece to extract all images and their image names from a page. Hope I understood your question correctly and this helps get you in the right direction.

set myImgList to {}

Tell app "QuarkXPress"
tell page 1 of front document
set boxlist to every picture box as list
repeat with thisbox in boxlist
set templist to {}
set thepath to file path of image 1 of thisbox
if thepath is not equal to null then
set end of templist to thepath as unicode text
set applescript's text item delimiters to ":"
set thefilename to text item -1 of  thepath as text
set applescript's text item delimiters to ""
set end of templist to thefilename
set end of myImglist to  items of templist
end if
end repeat
end tell
end tell

Let me know if that’s what you were looking for…

Joe