VB6 LPT Port auslesen

Question

hi

ich habe mir folgende schaltung für meinen LPT Port gebaut:
http://www.ds-electronics.de/pictures/input05.gif

wie kann ich jetzt da mit VB6 rausfinden ob einer von den Int (zB Int1) betätigt wurde / wird?!

hat jmd ein projekt für mich oder den code dafür!?

Answer 1

Hallo fantasaufer,

Du benötigst die EnumPrinters-Funktion.

Declare Function EnumPrinters Lib "winspool.drv" _
Alias "EnumPrintersA" ( _
ByVal flags As Long, _
ByVal Name As String, _
ByVal Level As Long, _
pPrinterEnum As Long, _
ByVal cdBuf As Long, _
pcbNeeded As Long, _
pcReturned As Long) As Long

Mit Google kannst Du schnell einige Seiten mit Beispielen dazu finden. Den kompletten Quellcode kann ich hier leider nicht abbilden.

Gruß
xmatrix