saving AW file as PDF
saving AW file as PDF
- Subject: saving AW file as PDF
- From: Kok Ooi Kong <email@hidden>
- Date: Mon, 21 Jul 2003 15:22:41 +0800
2 suggestions:
A: (this is from Apple Website)
on open
tell application "Finder"
activate
display dialog "Selected folder must contain only Appleworks
Documents!"
set foldar to selection as text
set foldr to (characters 1 thru -2 of foldar) as text
open folder foldr
set wndw to front window
set filez to count every file of wndw
end tell
set counter to 0
repeat while counter is less than filez
set counter to counter + 1
tell application "AppleWorks 6"
activate
open file counter of wndw
end tell
tell application "System Events"
tell process "AppleWorks 6"
set frontmost to true
keystroke "p" with command down
delay 1
tell application "System Events"
if title of window 1 of process "appleworks 6" is not "Print" then
set frontmost of process "appleworks 6" to true
keystroke return
end if
end tell
tell UI element 6 of window "Print"
click button "Save As PDF?"
end tell
delay 1
tell window "Save to File"
click button "Save"
delay 1
end tell
end tell
end tell
tell application "AppleWorks 6" to close front document
end repeat
tell application "Finder"
activate
close wndw
display dialog "Conversion complete!"
end tell
end open
B:
tell application "AppleWorks 6"
activate
tell application "System Events"
tell process "AppleWorks 6"
click menu item "Print..." of menu "File" of menu bar 1
delay 1
tell window "Print"
tell pop up button 1
click
tell menu 1
click menu item "Output Options"
delay 1
end tell
end tell
click check box "Save as File" of UI element 1 of UI element 4
delay 1
keystroke return
delay 3
keystroke return
end tell
end tell
end tell
quit
end tell
[demime 0.98b removed an attachment of type application/pgp-signature which had a name of PGP.sig]
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.