μετατροπη πολλων αρχειων pages σε doc ή pdf

[djmike]

επειδή στη δουλειά δουλεύουμε με pages αλλά δυστυχώς οι πελάτες δεν έχουν mac.... εψαχνα να βρω πως μπορώ να μετατρέπω πολλά αρχεία μαζικά σε word ή σε pdf και γίνεται με 2 applescript τα δίνω για όποιον ενδιαφέρεται για το ίδιο

1) pages σε word

>
on open theDocuments

repeat with aDocument in theDocuments
	
	tell application "Pages"
		open aDocument
		set thePath to the path of the front document
		set theWordPath to thePath & ".doc"
		
		save the front document as {"doc", "SLDocumentTypeMSWord"} in theWordPath
		
		close the front document saving no
	end tell
	
end repeat

end open

 

2) pages σε pdf

>
on open filist
repeat with lvar in filist
	tell application "Finder"
		set thename to name of lvar
	end tell
	set nuname to text 1 thru text item -5 of thename
	tell application "Pages"
		activate
		set filname to (path to desktop folder as text) & nuname & ".pdf"
		set x to make new document with properties {path:filname}
		open lvar
		save document 1 in file filname
		close every window saving no
	end tell
end repeat
end open

 

ανοίγουμε το applescript κάνουμε copy paste τον κώδικα (σε ξεχωριστά applescript το καθενα) τα σώζουμε ως application αλλάζουμε τα icon σε κάτι που να ταιριάζει (εγώ έβαλα τα icons απο pdf και word) και τα βάζουμε στο dock μετά όποια pages θελουμε τα διαλέγουμε και τα τραβάμε στο εικονίδιο στο dock....

[ixthy]

Ωραίοοοοος!!! Υπάρχει βοήθεια για αυτά τα scripts στο site της Apple;