Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Creating Objects
Message
 
À
19/04/2004 14:27:35
Steven Dyke
Safran Seats USA
Texas, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Divers
Thread ID:
00896222
Message ID:
00896232
Vues:
11
>Nick,
>
>This is my Acrobat Automation Code:
>
>avDocM = CreateObject("AcroExch.AVDoc")
>avDocM.Open((pdm_var.prerelPDFDir) + AllT(new_ps_name)+'.pdf',"")
>dfr = avDocM.GetPDDoc()
>dfr.GetNumPages()
>avDocE = CreateObject("AcroExch.AVDoc")
>avDocE.Open((pdm_var.aclt_hold) + AllT(new_ps_name)+'1.pdf',"")
>dfr2 = avDocE.GetPDDoc()
>
>sde123 = dfr.ReplacePages(0,dfr2,0,1,.F.)
>
>dfr.Save(0x20+0x4+0x1,(pdm_var.prerelPDFDir) + AllT(new_ps_name)+'.pdf')
dfr = null
dfr2 = null
>avDocM.Close(.T.)
>avDocE.Close(.T.)
avDocM = null
avDocE = null
You need to add:

dfr = null
dfr2 = null

before calling Close() method, as above, because they also are related object references.
Nick Neklioudov
Universal Thread Consultant
3 times Microsoft MVP - Visual FoxPro

"I have not failed. I've just found 10,000 ways that don't work." - Thomas Edison
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform