Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Josselin Jouannet
Bonjour tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
Bonjour,
J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
Comment puis-je tester la fin de l'impression ?
Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me prévient qu'il a une impression en cours.
Merci..
Olivier
Bonjour
tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration
'exemple methode
myprinter.EndDoc 'spool l'impression
myprinter.KillDoc 'Arrete l'impression
myprinter.NewPage 'Termine la page en cours et passe à la page suivante de
l'objet Printer
et autres .......
l'objet est bien documenté dans msdn
@+
"Olivier" a écrit :
Bonjour,
J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
Comment puis-je tester la fin de l'impression ?
Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me
prévient qu'il a une impression en cours.
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
Bonjour,
J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
Comment puis-je tester la fin de l'impression ?
Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me prévient qu'il a une impression en cours.
Merci..
Olivier
Olivier
Bonjour Josselin,
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais Microsoft Word en "OLE automation"( objet "word.application") pour effectuer cette impression. C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de l'impression.
"Josselin Jouannet" a écrit dans le message de news:
Bonjour tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
> Bonjour, > > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. > > Comment puis-je tester la fin de l'impression ? > > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me > prévient qu'il a une impression en cours. > > Merci.. > > > > Olivier > > > > >
Bonjour Josselin,
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais
Microsoft Word en "OLE automation"( objet "word.application") pour effectuer
cette impression.
C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si
vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de
l'impression.
"Josselin Jouannet" <JosselinJouannet@discussions.microsoft.com> a écrit
dans le message de
news:7DC5E664-EE91-4EE5-81B4-59EF0369B951@microsoft.com...
Bonjour
tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration
'exemple methode
myprinter.EndDoc 'spool l'impression
myprinter.KillDoc 'Arrete l'impression
myprinter.NewPage 'Termine la page en cours et passe à la page suivante de
l'objet Printer
et autres .......
l'objet est bien documenté dans msdn
@+
"Olivier" a écrit :
> Bonjour,
>
> J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
>
> Comment puis-je tester la fin de l'impression ?
>
> Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me
> prévient qu'il a une impression en cours.
>
> Merci..
>
>
>
> Olivier
>
>
>
>
>
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais Microsoft Word en "OLE automation"( objet "word.application") pour effectuer cette impression. C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de l'impression.
"Josselin Jouannet" a écrit dans le message de news:
Bonjour tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
> Bonjour, > > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. > > Comment puis-je tester la fin de l'impression ? > > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me > prévient qu'il a une impression en cours. > > Merci.. > > > > Olivier > > > > >
Jean Yves SÉVENO
Bonjour.
La propriété BackgroundPrintingStatus de l'objet Application de Word renvoie le nombre de travaux d'impression se trouvant dans la file d'attente d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque chose comme :
If Application.BackgroundPrintingStatus > 0 Then Do Until Application.BackgroundPrintingStatus = 0 DoEvents Loop End If Application.Quit
Cordialement.
Jean Yves
"Olivier" a écrit dans le message de news:
Bonjour Josselin,
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais Microsoft Word en "OLE automation"( objet "word.application") pour effectuer cette impression. C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de l'impression.
"Josselin Jouannet" a écrit dans le message de news:
Bonjour tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
> Bonjour, > > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. > > Comment puis-je tester la fin de l'impression ? > > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me > prévient qu'il a une impression en cours. > > Merci.. > > > > Olivier > > > > >
Bonjour.
La propriété BackgroundPrintingStatus de l'objet Application de Word renvoie
le nombre de travaux d'impression se trouvant dans la file d'attente
d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque chose
comme :
If Application.BackgroundPrintingStatus > 0 Then
Do Until Application.BackgroundPrintingStatus = 0
DoEvents
Loop
End If
Application.Quit
Cordialement.
Jean Yves
"Olivier" <olivier.coutard@free.fr> a écrit dans le message de news:
OwE30xT3EHA.4028@TK2MSFTNGP15.phx.gbl...
Bonjour Josselin,
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais
Microsoft Word en "OLE automation"( objet "word.application") pour
effectuer
cette impression.
C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si
vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de
l'impression.
"Josselin Jouannet" <JosselinJouannet@discussions.microsoft.com> a écrit
dans le message de
news:7DC5E664-EE91-4EE5-81B4-59EF0369B951@microsoft.com...
Bonjour
tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration
'exemple methode
myprinter.EndDoc 'spool l'impression
myprinter.KillDoc 'Arrete l'impression
myprinter.NewPage 'Termine la page en cours et passe à la page suivante
de
l'objet Printer
et autres .......
l'objet est bien documenté dans msdn
@+
"Olivier" a écrit :
> Bonjour,
>
> J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
>
> Comment puis-je tester la fin de l'impression ?
>
> Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me
> prévient qu'il a une impression en cours.
>
> Merci..
>
>
>
> Olivier
>
>
>
>
>
La propriété BackgroundPrintingStatus de l'objet Application de Word renvoie le nombre de travaux d'impression se trouvant dans la file d'attente d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque chose comme :
If Application.BackgroundPrintingStatus > 0 Then Do Until Application.BackgroundPrintingStatus = 0 DoEvents Loop End If Application.Quit
Cordialement.
Jean Yves
"Olivier" a écrit dans le message de news:
Bonjour Josselin,
merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais Microsoft Word en "OLE automation"( objet "word.application") pour effectuer cette impression. C'est d'ailleurs "Word" qui m'affiche le message "impression encours...si vous fermer l'application, l'impression sera annulée".
Et c'est dans cet objet "word.application" que je veux tester la fin de l'impression.
"Josselin Jouannet" a écrit dans le message de news:
Bonjour tu dois utiliser l'objet printer
Dim myprinter As Printer 'declaration 'exemple methode myprinter.EndDoc 'spool l'impression myprinter.KillDoc 'Arrete l'impression myprinter.NewPage 'Termine la page en cours et passe à la page suivante de l'objet Printer et autres ....... l'objet est bien documenté dans msdn @+ "Olivier" a écrit :
> Bonjour, > > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. > > Comment puis-je tester la fin de l'impression ? > > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui me > prévient qu'il a une impression en cours. > > Merci.. > > > > Olivier > > > > >
Olivier
Bonjour Jean Yves,
Merci beaucoup, c'est exactement ce qu'il me faut.
Il est vrai que je n'ai pas trouvé de doc exhaustive sur toutes les propriètés/methode de l'objet "Word".
Merci encore de ton aide,
Cordialement,
Olivier.
"Jean Yves SÉVENO" a écrit dans le message de news:41b738a5$0$2801$
Bonjour.
La propriété BackgroundPrintingStatus de l'objet Application de Word
renvoie
le nombre de travaux d'impression se trouvant dans la file d'attente d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque
chose
comme :
If Application.BackgroundPrintingStatus > 0 Then Do Until Application.BackgroundPrintingStatus = 0 DoEvents Loop End If Application.Quit
Cordialement.
Jean Yves
"Olivier" a écrit dans le message de news:
> Bonjour Josselin, > > merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais > Microsoft Word en "OLE automation"( objet "word.application") pour > effectuer > cette impression. > C'est d'ailleurs "Word" qui m'affiche le message "impression
encours...si
> vous fermer l'application, l'impression sera annulée". > > Et c'est dans cet objet "word.application" que je veux tester la fin de > l'impression. > > > > "Josselin Jouannet" a écrit > dans le message de > news: >> Bonjour >> tu dois utiliser l'objet printer >> >> Dim myprinter As Printer 'declaration >> 'exemple methode >> myprinter.EndDoc 'spool l'impression >> myprinter.KillDoc 'Arrete l'impression >> myprinter.NewPage 'Termine la page en cours et passe à la page suivante >> de >> l'objet Printer >> et autres ....... >> l'objet est bien documenté dans msdn >> @+ >> "Olivier" a écrit : >> >> > Bonjour, >> > >> > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. >> > >> > Comment puis-je tester la fin de l'impression ? >> > >> > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui
me
>> > prévient qu'il a une impression en cours. >> > >> > Merci.. >> > >> > >> > >> > Olivier >> > >> > >> > >> > >> > > >
Bonjour Jean Yves,
Merci beaucoup, c'est exactement ce qu'il me faut.
Il est vrai que je n'ai pas trouvé de doc exhaustive sur toutes les
propriètés/methode de l'objet "Word".
Merci encore de ton aide,
Cordialement,
Olivier.
"Jean Yves SÉVENO" <jyseveno@wanadoo.fr> a écrit dans le message de
news:41b738a5$0$2801$8fcfb975@news.wanadoo.fr...
Bonjour.
La propriété BackgroundPrintingStatus de l'objet Application de Word
renvoie
le nombre de travaux d'impression se trouvant dans la file d'attente
d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque
chose
comme :
If Application.BackgroundPrintingStatus > 0 Then
Do Until Application.BackgroundPrintingStatus = 0
DoEvents
Loop
End If
Application.Quit
Cordialement.
Jean Yves
"Olivier" <olivier.coutard@free.fr> a écrit dans le message de news:
OwE30xT3EHA.4028@TK2MSFTNGP15.phx.gbl...
> Bonjour Josselin,
>
> merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais
> Microsoft Word en "OLE automation"( objet "word.application") pour
> effectuer
> cette impression.
> C'est d'ailleurs "Word" qui m'affiche le message "impression
encours...si
> vous fermer l'application, l'impression sera annulée".
>
> Et c'est dans cet objet "word.application" que je veux tester la fin de
> l'impression.
>
>
>
> "Josselin Jouannet" <JosselinJouannet@discussions.microsoft.com> a écrit
> dans le message de
> news:7DC5E664-EE91-4EE5-81B4-59EF0369B951@microsoft.com...
>> Bonjour
>> tu dois utiliser l'objet printer
>>
>> Dim myprinter As Printer 'declaration
>> 'exemple methode
>> myprinter.EndDoc 'spool l'impression
>> myprinter.KillDoc 'Arrete l'impression
>> myprinter.NewPage 'Termine la page en cours et passe à la page suivante
>> de
>> l'objet Printer
>> et autres .......
>> l'objet est bien documenté dans msdn
>> @+
>> "Olivier" a écrit :
>>
>> > Bonjour,
>> >
>> > J'imprime un doc RTF depuis un programme vb grace à un objet OLE.
>> >
>> > Comment puis-je tester la fin de l'impression ?
>> >
>> > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui
me
>> > prévient qu'il a une impression en cours.
>> >
>> > Merci..
>> >
>> >
>> >
>> > Olivier
>> >
>> >
>> >
>> >
>> >
>
>
Merci beaucoup, c'est exactement ce qu'il me faut.
Il est vrai que je n'ai pas trouvé de doc exhaustive sur toutes les propriètés/methode de l'objet "Word".
Merci encore de ton aide,
Cordialement,
Olivier.
"Jean Yves SÉVENO" a écrit dans le message de news:41b738a5$0$2801$
Bonjour.
La propriété BackgroundPrintingStatus de l'objet Application de Word
renvoie
le nombre de travaux d'impression se trouvant dans la file d'attente d'impression en arrière plan.
Il suffit donc de boucler dessus jusqu'à ce qu'elle renvoie 0. Quelque
chose
comme :
If Application.BackgroundPrintingStatus > 0 Then Do Until Application.BackgroundPrintingStatus = 0 DoEvents Loop End If Application.Quit
Cordialement.
Jean Yves
"Olivier" a écrit dans le message de news:
> Bonjour Josselin, > > merci pour cette réponse, mais je n'utilise pas VB pour imprimer mais > Microsoft Word en "OLE automation"( objet "word.application") pour > effectuer > cette impression. > C'est d'ailleurs "Word" qui m'affiche le message "impression
encours...si
> vous fermer l'application, l'impression sera annulée". > > Et c'est dans cet objet "word.application" que je veux tester la fin de > l'impression. > > > > "Josselin Jouannet" a écrit > dans le message de > news: >> Bonjour >> tu dois utiliser l'objet printer >> >> Dim myprinter As Printer 'declaration >> 'exemple methode >> myprinter.EndDoc 'spool l'impression >> myprinter.KillDoc 'Arrete l'impression >> myprinter.NewPage 'Termine la page en cours et passe à la page suivante >> de >> l'objet Printer >> et autres ....... >> l'objet est bien documenté dans msdn >> @+ >> "Olivier" a écrit : >> >> > Bonjour, >> > >> > J'imprime un doc RTF depuis un programme vb grace à un objet OLE. >> > >> > Comment puis-je tester la fin de l'impression ? >> > >> > Car , lorsque je veux killer l'objet, j'obtient une alerte word qui
me
>> > prévient qu'il a une impression en cours. >> > >> > Merci.. >> > >> > >> > >> > Olivier >> > >> > >> > >> > >> > > >