File path in footer

Question

Does Pages give me a way to autofill my file path into the footer like Word does?

Answer 1

Hello
Here is a revised version.
Copy the script in the clipboard
Paste in a blank window of Script Editor
Save it as an Application or an Application Bundle
Move the newly created application into the folder:
<startup Volume>:Users:<yourAccount>:Library:Scripts:Applications:Pages:
Now, enter your Pages document.
Click where you want.
Go to
menu Scripts > pastethepath
The path to the document's package will be pasted at the insertion point.
If the document was never saved you will get an error message.
Yvan KOENIG
1 janvier 2008
revised 24 février 2008
--(SCRIPT pastethepath.app]
set theApp to "Pages"
tell application theApp to set u to path of document 1 (*
returns nothing if the document was never saved *)
try
set u to u (* send an error if the doc was never saved *)
on error
tell application theApp to set u to name of window 1
end try
set ky to "/Volumes/"
if u starts with ky then
set u to text 2 thru -1 of POSIX path of (text (1 + (count of ky)) thru -1 of u)
else if u starts with "/Users/" then
tell application "System Events" to set u to (path of disk item u)
set u to text 1 thru -2 of (u as Unicode text)
else
set z to do shell script "defaults read 'Apple Global Domain' AppleLocale"
if z starts with "fr_" then
error "Le document " & "«" & u & "» n’a pas été enregistré." number 701
else
error "The document " & "“" & u & "” was never saved." number 701
end if
end if
set the clipboard to u
tell application theApp to activate
tell application "System Events" to tell process theApp
keystroke "v" using {command down}
end tell
--[/SCRIPT]
Yvan KOENIG (from FRANCE dimanche 24 février 2008 17:20:54)