PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → manipulation de word par OLE
manipulation de word par OLE
Débuté par romain.frebourg, 09 jan. 2006 16:45 - 3 réponses
Posté le 09 janvier 2006 - 16:45
Bonjour,

Je souhaiterais savoir si c'est possible de recupérer le nombre de page d'un fichier word par OLE.
J'imprime mes documents words via le script suivant :

PROCEDURE imprimeword()
// Déclaration d'un objet Word
word est un objet OLE "Word.Application"

// Word n'apparait pas à l'écran
word>>Visible=Faux

// Ouverture du document
word>>Documents>>Open(datafile)

//impression du document
word>>Activedocument>>printout()

// Fermeture de Word
word>>Quit()

Est-il possible de spécifier l'imprimante de sortie, car avec la commande 'printout' l'impression se fait sur l'imprimante par defaut.

Dans l'attente d'une réponse.

Romain
Posté le 09 janvier 2006 - 18:10
à propos de l'imprimante, essayez de changer l'imprimante par défaut avant le PrintOut().
afficher par exemple la liste des imprimantes via la fonction windev iListeImprimante() et puis rendre celle choisie comme imprimante par défaut : iconfigure().

essayer de voir l'exemple livré avec windev "WD8 Pilotage Word", je pense qu'il doit y avoir des trucs comme ça.
Posté le 10 janvier 2006 - 11:13
Bonjour,

Methode printOut de word :
PrintOut(;
Background,; // AS PTR
Append,; // AS PTR
Range,; // AS PTR
OutputFileName,; // AS PTR
From,; // AS PTR
TO_,; // AS PTR
Item,; // AS PTR
Copies,; // AS PTR
Pages,; // AS PTR
PageType,; // AS PTR
PrintToFile,; // AS PTR
Collate,; // AS PTR
FileName,; // AS PTR
ActivePrinterMacGX,; // AS PTR
ManualDuplexPrint) // AS PTR

Tu as aussi :
word>>ActivePrinter( uParam001) // AS STRING


Cordialement

C.AUBRY
Posté le 10 janvier 2006 - 12:07
Merci pour vos reponses, je vais essayer avec les commandes OLE et celles de windev