Ich habe dir ein einfaches AppleScript-Droplet gemacht…
PDFExtractPage1.zip [klieme.ch]
Einfach die PDF Dateien draufziehen. Die Originaldokumente werden nicht verändert.
Wenn das Originaldokument nur eine Seite hat wird keine neue Datei erstellt.
Das Droplet ist code-signed.
An die neuen 1-seitigen Dokumente wird der Zusatz "_Page1.pdf" angehängt.
Wen der Code interessiert, es wird AppleScriptObjC und das PDFKit framework (in Quartz enthalten) verwendet.
Einfach die PDF Dateien draufziehen. Die Originaldokumente werden nicht verändert.
Wenn das Originaldokument nur eine Seite hat wird keine neue Datei erstellt.
Das Droplet ist code-signed.
An die neuen 1-seitigen Dokumente wird der Zusatz "_Page1.pdf" angehängt.
Wen der Code interessiert, es wird AppleScriptObjC und das PDFKit framework (in Quartz enthalten) verwendet.
Show Plain Text
- use AppleScript version "2.4" -- Yosemite (10.10) or later
- use scripting additions
- use framework "Quartz"
- on open theFiles
- repeat with aFile in theFiles
- if kind of (info for aFile) is "PDF document" then
- set filePath to aFile as text
- set newfilePath to text 1 thru -5 of filePath & "_Page1.pdf"
- set newfileURL to (current application's NSURL's fileURLWithPath:(POSIX path of newfilePath))
- set thePDF to (current application's PDFDocument's alloc()'s initWithURL:aFile)
- set pageCount to thePDF's pageCount() as integer
- if pageCount > 1 then
- repeat with i from (pageCount - 1) to 1 by -1
- (thePDF's removePageAtIndex:i)
- end repeat
- end if
- (thePDF's writeToURL:newfileURL)
- end if
- end repeat
- end open