Extracting Pages using VB

[aberry]

Hi,

I am trying to programatically extract pages from a large PDF and break it down into smaller PDF's.

I am experiencing some problems however. The jso.extractpages option seems to be erroring. Can anyone point me to where I am going wrong? Code follows.

Thanks,

Andrew

Dim jso As Object
Dim gPDDoc As Acrobat.CAcroPDDoc
Dim gApp As Acrobat.CAcroApp

Set gApp = CreateObject("AcroExch.App&quot
Set gPDDoc = CreateObject("AcroExch.PDDoc&quot

gPDDoc.Open "C:\test.pdf"
Set jso = gPDDoc.GetJSObject

lRet = jso.extractpages(lPageCounter, iPages, "C:\" & lDocCount & ".pdf&quot

lPageCounter keeps track of the number of pages I have already extracted and iPages signifies the number of pages I wish to extract.