ERLEDIGT
NEIN
NEIN
ANTWORTEN
2
2
ZUGRIFFE
456
456
EMPFEHLEN
-
28.06.10 13:09 #1
- Registriert seit
- Sep 2008
- Beiträge
- 96
Hallo zusammen!
Mit folgendem Code lese ich die lokal installierten Drucker und deren Satus aus.
Code :1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38
Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim objWMIService As Object Dim colPrint As Object Dim strprinter As Object Dim strpstatus As String Dim pstatus As String objWMIService = GetObject("winmgmts://./root/cimv2") colPrint = objWMIService.execquery("select * from win32_Printer") For Each colPrnt In colPrint strprinter = colPrnt.caption strpstatus = colPrnt.printerstatus Select Case strpstatus Case 1 pstatus = "Fehler" Case 2 pstatus = "Unbekannt" Case 3 pstatus = "Bereit" Case 4 pstatus = "Druckt" Case 5 pstatus = "Aufwärmen" Case 6 pstatus = "Druck beendet" Case 7 pstatus = "Offline" End Select Me.ListBox1.Items.Add(strprinter) Me.ListBox2.Items.Add(pstatus) Next End Sub
Allerdings verstehe ich nicht, warum mir als Satus "Bereit" angezeigt wird, obwohl der Drucker ausgeschaltet ist.
Hab ich da vielleicht was falsch verstanden? Ich dachte, dann zeigt er "Offline" an.
Der Drucker hängt am parallelen Anschluß.
Oder muß ich das anders abfragen und wenn ja, wie?
Danke schonmal!
Gruß Outi
-
-
29.06.10 06:46 #3
- Registriert seit
- Sep 2008
- Beiträge
- 96
Danke für Deine schnelle Antwort!
Leider erhalten ich bei diesen Beispielen das selbe Ergebnis!
Es muß doch irgendwie möglich sein, den Status "Offline" zu erhalten,
wenn der Drucker ausgeschaltet ist.
Für jede Hilfe bin ich dankbar!
Edit:
Ich habe was von der inpout32.dll gelesen.
Ist es vielleicht damit möglich, den Port oder vielmehr das angeschlossene Gerät "auszulesen"?Geändert von Outsider77 (30.06.10 um 06:16 Uhr)
Ähnliche Themen
-
usb drucker
Von mostly_harmless im Forum C/C++Antworten: 2Letzter Beitrag: 10.11.08, 21:20 -
Drucker?
Von firstlord18 im Forum HardwareAntworten: 6Letzter Beitrag: 10.12.05, 15:24 -
Status?
Von Janares im Forum Visual Basic 6.0Antworten: 10Letzter Beitrag: 23.04.03, 11:40





Zitieren
Login





