Hallo,
vielleicht habe ich Glück und jemand von euch Experten verbringt sein Ostern auch am Rechner
Wir haben einen neuen Drucker HP Laser Jet 3015 mit 4 Papierfächern.
Bei uns werkeln 6 Drucker von 3 verschiedenen Herstellern. Bei dem Neuen haben wir uns für HP entschieden weil
kostenlose, immer erreichbare Hotline mit sehr freundlichen Mitarbeitern.
Bei unserem Problem hat man uns aber schmählich im Stich gelassen. Einen Programmierer kann man persönlich gar nicht sprechen. Und der Mailverkehr hin und her brachte nur Missverständnisse. Eine richtige Antwort habe ich jedenfalls bislang nicht.
Wir möchten die Papierfächer mit unterschiedlichen Formularen bestücken. Im VB-Code soll dann das richtige Fach genutzt werden. Das funktioniert eben nicht.
Wir starten den Druckvorgang (z.B. mit Fach 2) so:
In scr stehen folgende Eigenschaften:
Kind Custom {257}
RawKind 257
SourceName Fach 2
PageSettings zeigt mir:
Color=True, Landscape=False
Margins=[Margins Left=100 Right=100 Top=100 Bottom=100]
PaperSize=[PaperSize A4 Kind=A4 Height=1169 Width=827]
PaperSource=[PaperSource Fach 2 Kind=Custom]
PrinterResolution=[PrinterResolution X=600 Y=600]
Das Papier wird dennoch aus Fach 4 genommen. Es ist zum Verzweifeln
Kann jemand das Problem knacken? Wir wären sehr dankbar.
Grüße Norbert
vielleicht habe ich Glück und jemand von euch Experten verbringt sein Ostern auch am Rechner
Wir haben einen neuen Drucker HP Laser Jet 3015 mit 4 Papierfächern.
Bei uns werkeln 6 Drucker von 3 verschiedenen Herstellern. Bei dem Neuen haben wir uns für HP entschieden weil
kostenlose, immer erreichbare Hotline mit sehr freundlichen Mitarbeitern.
Bei unserem Problem hat man uns aber schmählich im Stich gelassen. Einen Programmierer kann man persönlich gar nicht sprechen. Und der Mailverkehr hin und her brachte nur Missverständnisse. Eine richtige Antwort habe ich jedenfalls bislang nicht.
Wir möchten die Papierfächer mit unterschiedlichen Formularen bestücken. Im VB-Code soll dann das richtige Fach genutzt werden. Das funktioniert eben nicht.
Wir starten den Druckvorgang (z.B. mit Fach 2) so:
Code:
Public Sub Print(ByRef printerName As String, printerTray As String) Dim scr As New PaperSource scr.SourceName = printerTray.Trim If String.IsNullOrEmpty(printerName) Then m_printDocument.PrinterSettings = New PrinterSettings 'use Windows Default Printer m_printDocument.DefaultPageSettings.PaperSource = scr Else m_printDocument.PrinterSettings.PrinterName = printerName m_printDocument.DefaultPageSettings.PaperSource = scr End If Try m_printDocument.Print() Catch ex As Exception Windows.Forms.MessageBox.Show(ex.ToString) End Try End Sub
Kind Custom {257}
RawKind 257
SourceName Fach 2
PageSettings zeigt mir:
Color=True, Landscape=False
Margins=[Margins Left=100 Right=100 Top=100 Bottom=100]
PaperSize=[PaperSize A4 Kind=A4 Height=1169 Width=827]
PaperSource=[PaperSource Fach 2 Kind=Custom]
PrinterResolution=[PrinterResolution X=600 Y=600]
Das Papier wird dennoch aus Fach 4 genommen. Es ist zum Verzweifeln
Kann jemand das Problem knacken? Wir wären sehr dankbar.
Grüße Norbert
Comment