Hi Sergey,
I've tested it with Acrobat 7 and worked perfectly.
Thanks for sharing this code.
BTW: Where can I get more stuff about manipulating PDFs
from VFP (create, etc)?


>Hi Tore,
>
>I tested the code with Acrobat 8 but I expect it to work in other versions as well

#DEFINE PDSaveFull	1	&& Write the entire file.

lcPdfFile = "h:\temp\z51.pdf"
lcNewPdfFile = "h:\temp\z51-mod.pdf"

lnPage2DelStart = 1
lnPage2DelEnd = lnPage2DelStart
loAcroApp = CREATEOBJECT("AcroExch.App")
*loAcroApp.Show()
loAVDoc = CREATEOBJECT("AcroExch.AVDoc")
loAVDoc.Open(lcPdfFile, "PDF")

loPDDoc = loAVDoc.GetPDDoc()
loPDDoc.DeletePages(lnPage2DelStart-1, lnPage2DelEnd-1)

loPDDoc.Save(PDSaveFull, lcNewPdfFile)
loPDDoc.Close()

loAVDoc.Close(.T.)
loAcroApp.Exit()