Allen's app above works like a charm but has some limitations that make it unusable for us in this project. For example you cannot specify a target folder to extract the file to when using burst mode. Maybe I'm blind but can't find a way in the docs to get it working the way we require.

The script below works great. You need to purchase the pdf splitting app when you do not want the watermark at the bottom of each page but that’s only 28,00 US$. Sadly it is necessary to kill acrobat reader when it is done printing cause it does not exit by itself. Word or notepad do not need to be killed.
In our case the $page variable will eventually be filled by reading from a file that gets exported from our database once a week. For testing it is set to a specific value. Our test.pdf file has 128 pages so the extracted pages have 001, 002, etc… in the filenamens therefore $page should be set to 075 to get page 75, 009 to get page 9, etc….
A check on the amount of extracted pages will show you if and how many leading 0’s should be added.

Code:

Break on

Call @SCRIPTDIR + "\functions\DirList().udf"
Call @SCRIPTDIR + "\functions\EnumProcess().udf"
Call @SCRIPTDIR + "\functions\printTo2().udf"

;Del "c:\pdftest\split\*.pdf"

$path = "C:\pdftest\tools\"
$files = DIRLIST("c:\pdftest\onverwerkt\*.pdf",2)
$page = "075"

For Each $file in $files
	$filepath = Split($file, "\")
	$filename = SubStr($filepath[Ubound($filepath)], 1, Len($filepath[Ubound($filepath)]) -4)
	Shell $path + "pdfspme_cmd.exe  -spe  "  + $file + " c:\pdftest\split\" + $filename
	PrintTo2("c:\pdftest\docs\defaultletter.doc","\\server\printer")
	PrintTo2("c:\pdftest\split\" + $filename + $page + ".pdf","\\server\printer")
	Sleep 5
	$kill= EnumProcess("AcroRd32.exe",1)
	If @ERROR = 0
		Del "c:\pdftest\split\*.pdf"
	Else
		?@ERROR
		?@SERROR
		Sleep 5
		Exit
	EndIf
Next
_________________________
Mart

- Chuck Norris once sold ebay to ebay on ebay.