ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Charger un PDF dans Acrobat, lister les champs du formulaire, modifier une valeur, enregistrer...   



L'auteur

Francis Faure
France France
Membre Actif (personne physique)
# 0000000001
enregistré le 11/10/2004

http://www.wanagain.net
51 ans
Faure Francis
de la société Design Or Decline
Fiche personnelle


Note des membres
pas de note

Contributions > 09 - Automation > Adobe Acrobat

Charger un PDF dans Acrobat, lister les champs du formulaire, modifier une valeur, enregistrer...
# 0000000396
ajouté le 20/01/2007 20:20:48 et modifié le 20/01/2007
consulté 8065 fois
Niveau initié

Version(s) Foxpro :
VFP 9.0
VFP 8.0
VFP 7.0
VFP 6.0
VFP 5.0
VFP 3.0

Description

Proposition d'un code source illustrant la gestion d'un formulaire PDF avec Adobe Acrobat

Cordialement
Francis FAURE

Code source :
* But : illustrer un chargement d'un document PDF ayant un formulaire dans Adobe Acrobat
* (version normale, pas le reader)
* Lister les champs et remplir le champ "Nom" du formulaire...
* et sauvegarder

lsFichierPDF = "C:\data\vfpAcrobat\test.pdf"
IF NOT FILE(m.lsFichierPDF)
  =MESSAGEBOX("Fichier PDF Introuvable.",16, "m.lsFichierPDF", 2000)
  RETURN
endif

oApp=CreateObject("AcroExch.App")
oDoc=CreateObject("AcroExch.AVdoc")
if oDoc.Open(m.lsFichierPDF, "Titre")
  oForm = CreateObject("AFormAut.App")
  * liste des champs
  for each lsFields in oForm.Fields
    ? "Champ=",ALLTRIM(m.lsFields.name), "Type=", m.lsFields.type"Valeur=", m.lsFields.Value
    * Modification de la valeur du champ "nom"
    IF ALLTRIM(lsFields.name)="nom"
      oForm.fields("nom").value = "AtoutFox"
    ENDIF
  NEXT
  * sauvegarde du fichier PDF
  oPddoc = oDoc.GetPDDoc
  oPddoc.save(1, m.lsFichierPDF)
  oForm = null
endif
oDoc.Close(1)
oDoc=null
oApp.Exit
oApp = null
Commentaires
Aucun commentaire enregistré ...

Publicité

Les pubs en cours :

www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2019.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3