Bekomm immo mehrere Fehlermeldungen:
Printer" ist im Namespace "Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6" mehrdeutig
PrintForm" ist im Namespace "Microsoft.VisualBasic.PowerPacks.Printing" mehrdeutig
Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6.PrinterObjectConstants, Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6.PrinterObjectConstants" mehrdeutig.
Kann mir da jemand weiterhelfen. Namespace sagt mir derzeit gar nichts...
Importiert wird folgendes:
Printer" ist im Namespace "Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6" mehrdeutig
PrintForm" ist im Namespace "Microsoft.VisualBasic.PowerPacks.Printing" mehrdeutig
Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6.PrinterObjectConstants, Microsoft.VisualBasic.PowerPacks.Printing.Compatibility.VB6.PrinterObjectConstants" mehrdeutig.
Kann mir da jemand weiterhelfen. Namespace sagt mir derzeit gar nichts...
Quellcode
- If DruckerAuswahl.ShowDialog = Windows.Forms.DialogResult.OK Then
- Dim printer2 As New Printer
- Dim pd As New PrintAction()
- Dim pf As New PowerPacks.Printing.PrintForm
- pf.PrinterSettings.DefaultPageSettings.PrinterSettings.PrinterName = DruckerAuswahl.cmb_Drucker.SelectedItem.ToString
- pf.Form = Me
- pf.PrinterSettings.DefaultPageSettings.Margins = New System.Drawing.Printing.Margins(0, 0, 0, 0)
- printer2.PrintQuality = vbPRPQHigh
- pf.PrinterSettings.Copies = DruckerAuswahl.cmb_Anz_Kopien.SelectedItem.ToString
- Me.Opacity = 1
- pf.Print()
- Button_Drucken.Visible = False
- btn_Abbrechen.Visible = False
- PrintDocument1.PrinterSettings.Copies = PrintDialog1.PrinterSettings.Copies
- PrintDocument1.Print()
- Me.Close()
- End If
Importiert wird folgendes:
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „thommy1972de“ ()