VB6 with Windows 95,98,2K, NT or XP with I/O Driver inpout32.dll For LPT-1

[adeebraza]

Dear Friends,
Following is the program for I/O controlling with Visual Basic 6 and Operating Software any one of the Windows 95,98,2K, NT & XP with Driver npout32.dll File. It is very useful for controlling any electrical device through PC’s Parallel Port to Switch ON and OFF with an interface.
Thanks
Adeeb Raza

[willakawill]

Unusual that someone should post code like this with no question asked, particularly as the code refers to at least 2 different forms, command buttons and shapes that have not been explained so we are left to imagine their functionality.

Please post a question if you have one. This is not a site for advertising your software

[khushtarzia]

Dear Friends,
Following is the program for I/O controlling with Visual Basic 6 and Operating Software any one of the Windows 95,98,2K, NT & XP with Driver inpout32.dll File. It is very useful for controlling any electrical device through PC’s Parallel Port to Switch ON and OFF with an interface.
Thanks
Adeeb Raza

Hi
Pl tell me, IS IT WORK IF We Note the following two points.
for 3 digit BCD reading of an digital instrument.

1- Type in (Module1.bas)
Public Declare Function Inp Lib "inpout32.d ll" Alias "Inp32" _
(ByVal address As Integer) _
As Integer

Public Declare Sub Out Lib "inpout32.d ll" Alias "Out32" _
(ByVal address As Integer, _
ByVal Value As Integer)
-------------------------------------------------------------------------------------
2- Type in (Form1)
Option Explicit
Dim AEPPort As Integer
Dim AEPData As Integer
Dim Data, pat

Sub AEPOut(Data As Integer)
Out AEPPort, AEPData
End Sub

Thanks
Khushtar Zia