uhm deze heb je denk ik ontworpen voor win 98 want de ioport95.dll zit niet erin. hoe moet ik deze toevoegen aan jou bestand?
hmmm ik gebruik geen enkel dll bestand 
gemaakt met vb6.0 onder 2000 prof
op google kan je vaak dll's vinde, tis wel effe zoeken tot je de juiste hebt 
die dll heb ik nog niet gedeclareerd, alsook de code is nog niet volledig: de arry's moet je nog maken, de verwerkin zal wel ongeveer kloppen !
ook de effectieve uitvoer naar de lpt moet je nog maken !
ik gebruik altijd io.dll
tsjaa die io.dll dat is die wat ik bedoel die staat idd anders aangegeven in vb. maar ik kom daar geen weis uit. heb da programma gewoon rustig veranderd en weet ook nog niet zoveel maar iets gaan declareren dat gaat net iets te ver. durf het bijna niet te vragen maar zou je deze btj kunnen uitwerken. misschien als software klopt kunnen we het schema op co zetten omdat het toch regelmatig langs komt en niet moeilijk is kwa hardware
zwier dit in de general om het nodige te declareren
Public Declare Sub PortOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Byte)
Public Declare Sub PortWordOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Integer)
Public Declare Sub PortDWordOut Lib "IO.DLL" (ByVal Port As Integer, ByVal Data As Long)
Public Declare Function PortIn Lib "IO.DLL" (ByVal Port As Integer) As Byte
Public Declare Function PortWordIn Lib "IO.DLL" (ByVal Port As Integer) As Integer
Public Declare Function PortDWordIn Lib "IO.DLL" (ByVal Port As Integer) As Long
Public Declare Sub SetPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Sub ClrPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Sub NotPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Function GetPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte) As Boolean
Public Declare Function RightPortShift Lib "IO.DLL" (ByVal Port As Integer, ByVal Val As Boolean) As Boolean
Public Declare Function LeftPortShift Lib "IO.DLL" (ByVal Port As Integer, ByVal Val As Boolean) As Boolean
Public Declare Function IsDriverInstalled Lib "IO.DLL" () As Boolean
IO.dll moet dan wel in de system dir staan (zie de site van io.dll - maker)
uitvoer naar de lpt doe je dan zo:
Call PortOut(888, 1) 'om de waarde 1 op de lpt te zetten
er wordt dus veel teveel gedeclareerd, maar dat geeft nie 
io.dll staat in de system 32 map
dit is wat die zegt