on open fileList
set originalFile to item 1 of fileList
set saveTID to AppleScript's text item delimiters
set AppleScript's text item delimiters to {":"}
set originalDocName to text item -1 of (originalFile as text)
set AppleScript's text item delimiters to {"."}
set originalDocNameStub to text 1 thru text item -2 of originalDocName
set AppleScript's text item delimiters to saveTID
set deskPath to path to desktop as text
tell application id "com.adobe.Acrobat.Pro" -- Adobe Acrobat Pro.app
open originalFile
tell document originalDocName
set pageCount to count each page
end tell
repeat with i from 1 to pageCount
if i > 1 then
open originalFile
end if
tell document originalDocName
if i = 1 then
delete pages first 2 last pageCount
else if i = pageCount then
delete pages first 1 last (pageCount - 1)
else
delete pages first (i + 1) last pageCount
delete pages first 1 last (i - 1)
end if
set pageName to page number of page i
end tell
set newDocName to originalDocNameStub & "-" & (i as string) & ".pdf"
set newDocPath to deskPath & newDocName
save document originalDocName to file newDocPath with linearize
close document newDocName saving no
end repeat
end tell
end open
For some things you need to use the built-in _javascript_, but certainly not all.