Ciao a tutti, ho una procedura in vb6 che mi crea la stampa unione tra una serie di file word e i rispettivi txt (sorgente dati)
ma pur mettendo le stringhe di codice per chiudere il documento il processo rimane...
...immaginate a lavorare 1000 doc al giorno... il SW si blocca ogni 3X2...codice:wordx.ActiveDocument.Close wordx.Quit
soluzioni????
l'oggeto worsd lo instanzi con New o createobject?
ti consigli quest'ultimo il latebinding così dovrebbe chiudere correttamente
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
Pergallo... mio salvatore!
così con new...codice:Dim wordx As New Word.Application
potresti dirmi come posso fare???
codice:'così la dichiari Dim wordx As Word.Application 'la prima volta che la istanzi Set wordx = createObject("Word.Application")
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
E' neccessario chiudere ogni volta Word?Originariamente inviato da Nemolog
Ciao a tutti, ho una procedura in vb6 che mi crea la stampa unione tra una serie di file word e i rispettivi txt (sorgente dati)
ma pur mettendo le stringhe di codice per chiudere il documento il processo rimane...
...immaginate a lavorare 1000 doc al giorno... il SW si blocca ogni 3X2...codice:wordx.ActiveDocument.Close wordx.Quit
soluzioni????
se lo lascio aperto quando vado ad aprire il secondo mi dice documento word già aperto da un'altro utente....
dopo che ho usato...
continua a darmi dei problemi sulla stampa unione... nel senso che a volte stampa... e altre dopo 9 o 12 o 20 stampe si blokka...codice:Set wordx = CreateObject("Word.Application")
e si blokka con messaggio di "automation error" ...non so che fare...
il problema è che prima di 3gg fa il codice funzionava correttamente... non posso usarlo su un altro pc perchè non gira... anche se il codice è sempre lo stesso.
Ma alla fine dopo il quit setti gli oggetti = Nothing?
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
si le setto a nothing alla fine...
ma ricapitoliamo (scusa l'ignoranza, porta pazienza!)
prima le dichiaro: dim wordx as new word.application...
poi le setto : Set wordx = CreateObject("Word.Application")
elaboro
e infine
le setto a nothing giusto?
niente newOriginariamente inviato da Nemolog
si le setto a nothing alla fine...
ma ricapitoliamo (scusa l'ignoranza, porta pazienza!)
prima le dichiaro: dim wordx as new word.application...
poi le setto : Set wordx = CreateObject("Word.Application")
elaboro
e infine
le setto a nothing giusto?
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
Permessi di invio
Rispondi quotando