Codigo para leer datos desde el puerto paralelo en Visual Basic 6 y bajo XP?

Question

Hola,

Llevo bastante tiempo detras de conseguir la forma de controlar una entrada a traves del puerto paralelo.

El esquema electrico es mediante un simple buffer que mete 5 v en las patillas de entrada/salida del Puerto.

Lo que quiero es agregar una nueva fila a un excel, con la hora cada vez que se accione una entrada.

He leido en foros que no hay forma de realizarlo con librerias distintas a io.dll, pues quiero que funcione bajo XP.

Algun consejo?

Saludos y gracias.

Answer 1

Hola,
Dale un vistazo a:
http://www.programmers-corner.com/sourcecode/111

Saludos,

---

No olvides marcar la respuesta como correcta si te ha sido de utilidad :-)

[MS-MVP-MCTS] Mi Perfil MVP en: https://mvp.support.microsoft.com/profile/Lluis NUG: http://andorradotnet.com Web: http://www.ordeeno.com Blog: http://msmvps.com/blogs/lfranco Geeks: http://geeks.ms/blogs/lfranco

Answer 2

Hi. Mira esta web a ver si te da ideas. http://cfievalladolid2.net/tecno/recursos/gt_zorrilla2001/archivos/puente.htm Saludo.

---

http://electronica-pic.blogspot.com

Answer 3

Muchas Gracias por el link,

Es para el puerto serie pero fijo que se puede adaptar facilmente.

Un saludo,

Answer 4

Quizas esto tambien pueda servirte...funciona incluso utilizando Vista.

http://msmvps.com/blogs/peplluis/archive/2009/01/22/acceso-al-puerto-paralelo-lpt-algo-m-225-s-que-encender-un-led-o-imprimir-un-doc.aspx

Solo recordarte que el puerto serie no trabaja con 5V DC y tambien que no es adecuado utilizar las e/s de los puertos del PC para activar/desactivar dispositivos externos. Deberias utilizar una circuiteria electronica especifica, no dudes en consultar si necesitas mas informacion.

Saludos,
Pep Lluis,

---

MVP - Visual Developer

Answer 5

El puerto paralelo hoy en día hay que tener cuidado ya que depende de la BIOS o época del PC, algunos puedes configurar como salidas/entradas. Si lo tienes normal, no uses directamente el puerto paralelo, usa optocapladores, es un integrado que tiene su diodo Led interior y un fototransistor que se comunica por luz. Así protege el puerto paralelo del dispositivo directamente frente subidas de tensión. 

Aquí hay ideas sobre puerto paralelo.

http://www.miajas.com/intercom/MotorDC.html

Hay ejemplos.

Si lo que deseas puerto serie: Aquí hay manuales de control del puerto serie.

http://www.pic16f84a.org/index.php?option=com_content&view=category&layout=blog&id=54&Itemid=105

Saludos.

---

http://electronica-pic.blogspot.com

Answer 6

Hola que tal, mi nombre es Angel Hdz, estudiante de Ing. Electrónica en el Tecnológico de Matamoros  y estoy haciendo un proyecto en Visual Basic 6 que consiste en probar si un diodo esta en cortocircuito o no, utilizando el puerto paralelo, tengo el control de las salidas del puerto, pero quiero saber como leer una entrada.

El proyecto es así: envío un estado lógico 1 al pin 2 pasa a través del puerto paralelo hacia el diodo a probar, si esta en cortocircuito quiero leer ese 1 y si el diodo no esta en cortocircuito la señal no retornara y por lo tanto quiero leer el 0 por medio de un pin de entrada del puerto paralelo.

El problema: no se como leer ese estado lógico en Visual Basic 6, quiero saber por que # de pin y que sintaxis usar.

El código:

Private Sub btnEnviar_Click()

    Out &H378, 2

End Sub

Private Sub btnSalir_Click()

    Out &H378, 0

    End

End Sub

Estaría muy agradecido si me pueden ayudar.

Saludos y gracias.

Answer 7

Hola Elektrono,

Te aconsejaria crear un nuevo hilo en vez de usar uno que se ha dado por contestado.

En todo caso, te aconsejaria que utilizaras VB Net. Te dejo un par de links que quizas puedan ser de utilidad, pero no dudes en iniciar otra conversaciíon si necesitas mas ayuda.

http://msmvps.com/blogs/peplluis/archive/2009/01/22/acceso-al-puerto-paralelo-lpt-algo-m-225-s-que-encender-un-led-o-imprimir-un-doc.aspx

http://social.msdn.microsoft.com/Forums/es-ES/vcses/thread/efe11bbb-8a2f-49b8-8527-a14aa0740be9

Saludos,
PepLluis,