Manipulation en VFP des DOCVARIABLE de Word
# 0000000652
ajouté le 29/10/2008 11:29:25 et modifié le 29/10/2008
consulté 8618 fois
Niveau
débutant
Version(s) Foxpro : VFP 9.0
Description
Suite à la demande de "fhc" sur le newsgroupe "microsoft.public.fr.fox" :
Voici une petite contribution d'illustration de manipulation des variables de Word utilisées avec le champ DOCVARIABLE.
Cordialement
Francis FAURE
Code source :
CLEAR
* Utilisation dans le document word de { DOCVARIABLE "maVariable" }
lsFile = "c:\temp\test.doc"
oWApp = CreateObject("Word.Application")
oWApp.Visible=.T.&& affichage de word pour debuggage
oWDoc = oWapp.Documents.Open(m.lsFile)
* Nombre de Variables existante dans le document
? "Nombre de Variables : ", oWdoc.Variables.Count()
* Ajouter des Variables * (attention : gérer l'erreur dans la cas ou la variable existe déjà)
oWDoc.Variables.add("nom")
oWDoc.Variables.add("prenom")
* modifier la valeur des Variables
oWDoc.Variables("nom").value="Papa"
oWDoc.Variables("prenom").value="Maman"
* Liste des Variables For lii = 1 To oWdoc.Variables.Count()
? "Item :", m.lii
? "Nom :", oWDoc.Variables(m.lii).Name
? "Valeur :", oWDoc.Variables(m.lii).Value
? "---------------------------------------" NEXT
* mise à jour des champs du document
oWdoc.Fields.Update()