[VB] andere printer dan standaardprinter gebruiken

[tim-w]

Ik heb een script gemaakt waarmee ik een textbestand kan afdrukken...
nu is het probleem dat ik alleen naar de standaardprinter kan printen.

Ik heb gelezen dat dat opgelost kan worden met CommonDialog, maar dat vind ik niet zon sjieke oplossing...
Ik heb dus een comboBox gemaakt (cmbPrinters) waarin alle printers komen te staan

code:

Private Sub Form_Load()

Dim intT As Integer
For intT = 0 To Printers.Count - 1
    cmbPrinters.AddItem Printers(intT).DeviceName
Next intT

cmbPrinters.Text = Printer.DeviceName

End Sub

Maar ik kan nu de waarde van die Combobox niet als Printer instellen...

Iemand een idee hoe ik dat kan aanpakken?

[whoami]

Wil je niet doen:

code:

Printer.DeviceName = cmbPrinters.Text

[tim-w]

die opdracht geeft een foutmelding:

"Compile Error: Wrong number of arguments or invalid property assignment"...

(vanzelfsprekend had ik dat al geprobeert, anders stelde ik de vraag hier niet...)

[ Voor 31% gewijzigd door tim-w op 03-11-2003 16:52 ]

[RayNbow]

Visual Basic:

Set Printer = Printers(cmbPrinter.ListIndex)

[pjonk]

Om volledig te zijn:

Visual Basic:

Dim prn as Printer
Set prn = Printers(cmbPrinter.ListIndex)

Je moet uiteraard een object van het type Printer aanmaken voordat je een Set kan doen. Printers is een collection dwz een verzameling van Printer objecten. In dit geval wil je 1 object van het type printer uit de collection opvragen. Je gebruikt de listindex van de combobox om de juiste printer uit de collectie op te vragen..

Wellicht is het verstandig om eerst wat basiskennis over objects, collections en classes op te doen. De link hieronder is ook relevant:

http://msdn.microsoft.com...b98/html/vbobjprinter.asp

[ Voor 1% gewijzigd door pjonk op 03-11-2003 20:34 . Reden: typo's ]

[tim-w]

daar kan ik eerst wel mee verder...

bedankt!

[RayNbow]

JonkieXL schreef op 03 november 2003 @ 20:33:
Om volledig te zijn:

Visual Basic:

Dim prn as Printer
Set prn = Printers(cmbPrinter.ListIndex)

Je moet uiteraard een object van het type Printer aanmaken voordat je een Set kan doen. Printers is een collection dwz een verzameling van Printer objecten. In dit geval wil je 1 object van het type printer uit de collection opvragen. Je gebruikt de listindex van de combobox om de juiste printer uit de collectie op te vragen..

...

Dat is niet nodig. Printer is zelf al een bestaand object dat al beschikbaar is in VB. Zie MSDN: "Printing with the Printer Object"

Een fragment uit de MSDN:

Visual Basic:

Printer.Print "This is page 1."
Printer.NewPage
Printer.Print "This is page 2."
Printer.EndDoc

Dus als je met Printer print is die ene regel code uit m'n vorige post genoeg.