[VB6 + MSWord] file di testo + modello

[myne.it]

Ciao a tutti...

Sto realizzando una piccola applicazione fax in VB6 per la mia azienda, e devo dire che funziona anche bene. :adhone:

L'unico problema è che l'origine dei miei fax sono dei file di testo generati automaticamente da AS400.

Vorrei aggiungere a questi banali file .TXT un logo e un minimo di grafica per renderli + presentabili.

E' possibile da VB6 (magari attraverso delle macro di Word) fare un merge del file di testo con il modello di Word (.DOT) che normalmente uso per la carta intestata?

Mi sarebbe davvero utile...


Grazie a tutti!!! :metallica
myne.it

[myne.it]

...beh
per metà sono riuscito da solo... :quipy:

Era sufficiente:
- aprire un riferimento a Word 9.0
- istanziare una Word.Application
- istanziare una Word.Document (specificando il modello da usare)
- creare una stringa buffer da immettere nel documento
- scrivere il testo attraverso il comando ".Content.InsertAfter"
- salvare il tutto ...e via! :sexpulp:

Tutto OK se si crea un solo file DOC, ma quando se ne creano diversi in sequenza, beh...
mi lascia una serie di "Word Application" aperte nei Processi (pur avendole chiuse da VB6 con il comando .Quit)

Sapete come ovviare alla cosa?
E' una questione di tempistica?
Forse conviene aprire una sessione di Word.Application e chiuderla solo alla fine degli "n" documenti creati?


Grassie... :gren:

[verardoelvis]

prova a distruggere l'istanza con nothing.
ciao

[myne.it]

Originariamente inviato da verardoelvis
prova a distruggere l'istanza con nothing.
ciao

...mo' provo... :metallica

[myne.it]

YES! :metallica

Oltre a chiudere l'istanza del Word.Document con Set ...=Nothing

o anche impostato l'apertura dell'istanza Word.Application all'avvio dell'applicazione, mentre la chiudo (con .Quit e poi con Nothing) solo alla chiusura dell'applicazione!

Ho generato 4 file di Word in un attimo, e l'istanza nei processi è sparita appena ho chiuso l'applicazione VB6!!! :sexpulp:

Ora lo testo in maniera più pesante, ma credo proprio che vada bene!!!

Grazie verardoelvis!!! :metallica :metallica