OVH Cloud OVH Cloud

problème d'impression

2 réponses
Avatar
Yann
Bonjour,

J'aimerais imprimer certaines "form" en paysage, et=20
d'autres en portrait, j'ai donc utilis=E9 :

Printer.Orientation =3D vbPRORLandscape
PrintForm
Printer.Orientation =3D vbPRORPortrait
PrintForm

Je sais que =E7a marche chez un de mes coll=E8gues, mais avec=20
mon imprimante non.

d'ailleurs m=EAme :=20

Printer.Orientation =3D vbPRORLandscape
PrintForm
PrintForm

ne marche pas !=20

j'ai comme erreur=20
"erreur d'ex=E9cution '486'
impossible d'imprimer l'image de feuille sur ce type=20
d'imprimante"

Si quelqu'un a une id=E9e merci d'avance.
Cordialement.
Yann, d=E9veloppeur d=E9butant

2 réponses

Avatar
Axel Guerrier [MS]
Bonjour Yann,

télécharge le dernier Service Pack (5 ou 6) pour VB6 - il contient le Fix
corrigeant cette erreur.

261144 INFO: List of Bugs Fixed in Visual Studio 6.0 Service Pack 4
http://support.microsoft.com/?id&1144

http://msdn.microsoft.com/vstudio/downloads/updates/sp/vs6/sp5/dnldoverview.aspx


--
Axel GUERRIER
Microsoft France
--------------------
Merci de bien vouloir répondre à ce message dans le newsgroup où il a été
posté. Je le consulte régulièrement.

"Yann" wrote in message
news:17ea501c44a38$d3ad7200$
Bonjour,

J'aimerais imprimer certaines "form" en paysage, et
d'autres en portrait, j'ai donc utilisé :

Printer.Orientation = vbPRORLandscape
PrintForm
Printer.Orientation = vbPRORPortrait
PrintForm

Je sais que ça marche chez un de mes collègues, mais avec
mon imprimante non.

d'ailleurs même :

Printer.Orientation = vbPRORLandscape
PrintForm
PrintForm

ne marche pas !

j'ai comme erreur
"erreur d'exécution '486'
impossible d'imprimer l'image de feuille sur ce type
d'imprimante"

Si quelqu'un a une idée merci d'avance.
Cordialement.
Yann, développeur débutant
Avatar
Ludovic SOEUR
Normalement, c'est parce que tu imprimes sur ton imprimante par défaut et
que ton imprimante par défaut n'est pas celle que tu penses.
Tu as essayé de regarder du côté de
Printer.TrackDefault = True
avant tout ton code. Cela permet de forcer la synchro entre printer vb et
printer system

regarde dans Printer.DeviceName le nom de l'imprimante qui est utilisée



Sinon, en principe, il faut entre chaque page finir la page active par la
commande Printer.EndDoc

Ton code deviendrait pour le premier cas

Printer.Orientation = vbPRORLandscape
PrintForm
Printer.EndDoc
Printer.Orientation = vbPRORPortrait
PrintForm
Printer.EndDoc

et pour le deuxième :

Printer.Orientation = vbPRORLandscape
PrintForm
Printer.EndDoc
PrintForm
Printer.EndDoc

Il n'empêche que si ca ne résout pas le problème, il faut regarder du côté
de ta configuration imprimante....c'est quand même bizarre. J'ai essayé sur
plusieurs postes et ca marche sans problème.