Re: Help about Word
Re: Help about Word
- Subject: Re: Help about Word
- From: KOENIG Yvan <email@hidden>
- Date: Fri, 6 Jul 2007 21:33:22 +0200
Youpi
This time it works:
property o : "Macintosh HD:Users:yvankoenig:Desktop:tarifs assurance
Bouchard.doc"
set o to o as alias
if name extension of (info for o) is "doc" then my translate(o)
on translate(original)
tell application "Finder"
set dossier to (container of original) as Unicode text
set nom to name of original
set nNom to text 1 thru -4 of nom & "rtf"
end tell
set pOrig to quoted form of (POSIX path of original)
set pdest to quoted form of (POSIX path of (dossier & nNom))
set theScript to "textutil -convert rtf -output " & pdest & " " & pOrig
do shell script theScript
end translate
Thanks you everybody.
Yvan KOENIG
_______________________________________________
Do not post admin requests to the list. They will be ignored.
AppleScript-Users mailing list (email@hidden)
Help/Unsubscribe/Update your Subscription:
Archives: http://lists.apple.com/archives/applescript-users
This email sent to email@hidden