Opening all Appleworks documents in Pages

Question

I have LOTS of Applework documents in my system, and actually because of a reinstall I don't even have Appleworks on my new iMac right now. I've made the switch to Pages and really like this program (as well as Numbers). Can I have the computer switch all Applework documents in all locations to Pages with one command, or do I have do this individually file per file. Also, is it a hazard to change all the Appleworks documents at one stroke without looking at each one individually in the face of possibly loosing data to changed fonts or formats, etc. Any comments on this would be helpful. Thanks. ummmmm....I'm thinking already a one sweep change would be problematic because some Applework docuents are actually spreadsheets, even though in Appleworks all spreadsheets and word documents have the same Appleoworks icon.... okay any feedback to my rambling?

Answer 1

Hello
Here is the script:
Save the script as Application or Application bundle on the desktop.
Drag and drop an AppleWorks file's icon on the script's icon.
You will get a dialog describing what it is.
--SCRIPT
on open (sel)
set leFichier to sel's item 1 as alias
set finfos to info for leFichier
set creType to file creator of finfos
set fType to file type of finfos
set vernum to (ASCII number of (read leFichier for 1)) (* read the first byte of the file *)
if creType is not "BOBO" then
display dialog (leFichier as text) & return & return & "isn't an AW document"
else if fType is "CWDB" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " DataBase"
else if fType is "CWGR" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " DRawing"
else if fType is "CWPT" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " PainTing"
else if fType is "CWPR" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " PResentation"
else if fType is "CWSS" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " SpreadSheet"
else if fType is "CWWP" then
display dialog (leFichier as text) & return & return & "is an AW " & vernum & " WordProcessing"
else
display dialog (leFichier as text) & return & return & "isn't an importable AW document"
end if
end open
--[/SCRIPT]
Yvan KOENIG (from FRANCE jeudi 28 février 2008 23:55:12)