Ver Mensaje Individual
  #2 (permalink)  
Antiguo 29/11/2005, 02:13
Avatar de Jose_minglein2
Jose_minglein2
 
Fecha de Ingreso: noviembre-2004
Mensajes: 2.344
Antigüedad: 20 años, 4 meses
Puntos: 8
Bueno , por fí lo he conseguido, viendo la poca doc que hay por ahí, pongo un simple ejemplo en vb.net para el uso de P.paralelo.

-Primero descargar INPOUT32.dll y copiarla a system32.
Código:
 Public Declare Function Inp Lib "C:\WINDOWS\SYSTEM32\INPOUT32.DLL" _
    Alias "Inp32" (ByVal PortAddress As Integer) As Integer

    Public Declare Sub Out Lib "C:\WINDOWS\SYSTEM32\INPOUT32.DLL" _
Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

dim lectura as integer = &H379
dim escritura as integer = &H378
dim lec_es as integer = &37A 

Private Function Leer() as integer
return inp(lectura)
end function
Esto devuelve un entero que forman los 8bits de lectura. (También se puede usar IO.dll para leer bits concretos)

Fuente:
http://www.geocities.com/eduardo_cmsv/index.htm