---

Hallo zusammen,

wie kann ich via VB6 einen Netzwerkdrucker der z.B. auf printserver1 liegt und Drucker1 heißt, also wie folgt:

\\printserver1\Drucker1

Danke schonmal!

------------------

cu
Heiko

Schau mal rein www.diemertens.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Heiko,

da deine Frage leicht unvollständig ist kann ich nur vermuten was du wissen möchtest.
Aber ich tippe mal auf ansprechen.
Also dann mal her mit den Drucker!

Code:

---

Dim oPrint As Printer

'Alle Drucker durchlaufen
For Each oPrint In Printers
  'Ein paar Beispiel Informationen
  Debug.Print("hDC: " & oPrint.hDC)
  Debug.Print("Name: " & oPrint.DeviceName 

Next

---

In der Printers Auflistung stehen alle (auch Netzwerk) Drucker, welche auf deinem System zur Verfügung stehen.
In der VB6 Hilfe ist das eigentlich auch schön erklärt.

Ich hoffe mal ich konnte helfen und mein Tipp war richtig...

------------------
Mfg Daniel

SolidWorks macht schnell abhängig, fangen Sie gar nicht erst an!
----------------------------------------------
Wir machen Sie fit für die Zukunft, damit Sie kosten sparen und SolidWorks optimieren!

SolidWorks API Programmierung; Schuler Design Automation GmbH |     kontakt@schuler-da.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Ich verstehe das er so, dass er einen Drucker von einem Druckerserver verbinden will.

Das würde mit folgendem Code funktionieren.

Code:

---

Dim net As Object

Set net = CreateObject("WScript.Network")
net.AddWindowsPrinterConnection "\\Servername\DruckerName"

---

Grüssle Lars

------------------

"Soll es funktionieren oder darf es auch etwas von Siemens sein?" ...

http://validator.w3.org/check?uri=http://ww3.cad.de/cgi-bin/ubb/Ultimate.cgi

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP