Drucken in VB6

[shad0w]

Hi,

ich hab bisher noch nie was in vb gedruckt ...

Nun soll ich ne rechnung drucken, inkl. briefkopf. Diesen Kopf hab ich als jpeg vorliegen ... wie bekomm ich das nun am besten oben auf die seite?

Geht das auch in der Druckvoransicht?

danke

[UlliTD]

Hi!

erstmal einen Drucker wählen z.b. mit ner Schleife nach dem Drucker suchen:

For Each prnPrinter In Printers

If InStr(prnPrinter.DeviceName, "Druckername") <> 0 Then

Set prtDrucker = prnPrinter

End If

Next

dann:

Set Printer = prtDrucker

Printer.PaintPicture Picture1.Picture, 680, 0

Printer.EndDoc

[shad0w]

cool. danke