La Web del Programador: Comunidad de Programadores
 
    Pregunta:  696 - LEER EL PUERTO PARALELO
Autor:  Carlos Garcia
Quisiera por Favor Me ayuden ya que no Puedo leer el Puerto Paralelo desde Visual Fox Pro Estaba Utilizando el Comando Fopen() y siempre devuelve -1 , nose si es que no lo utilizo bien o simplemente no se puede, les agradeceria si me ayudan

  Respuesta:  Gabriel Alvarez
yo te recomiendo que uses una dll inpout32.dll la programes en visual basic ok compiles el programas geners un ejecutable y los corras desde visualfox con el comando run yo lo he hecho.

  Respuesta:  Mario
Hola. Bueno, empiezo por decirte que la experiencia que tengo es en Fox para DOS, pero creo que se puede aplicar en Visual Fox.
Tengo entendido que no existen funciones para acceder a los ports (la funcion fopen es para abrir archivos), ya que Fox esta orientado a bases de datos. Lo que se puede hacer en Fox para DOS es llamar a modulos OBJ de programas en C.
Esto se hace con la funcion CALL de Fox.
Una solucion hacer la funcion de acceso al port en C, generar el OBJ, y desde Fox llamar esta funcion usando la funcion CALL (fijate en el help como funciona exactamente la funcion CALL).
Te repito que no se si esto se puede hacer en la version Windows, pero podes probar.
Suerte!!!.
Nota : Si te funciona, por favor hacemelo saber.
Gracias.

  Respuesta:  ALBEIRO GOMEZ
BUENO YO TAMBIEN TENIA ESE PROBLEMA ME VOTABA EL V LOR -1 PERO COMO ERA EN VFP5 GENERE ELSIGUIENTE CODIGO:
set safety off
use prueba
zap
do while .t.
STORE FOPEN(´C:\WINDOWS\SYSTEM\LPT.VXD´) TO puerto
STORE FREAD(´C:\WINDOWS\SYSTEM\LPT.VXD´,254) TO MCAD
mcad2 = asc(mcad)
if MCAD2 > 0
appen blank
repla valor with mcad2
exit
else
loop
endif
enddo
CON EL CUAL SE HABRE EL ARCHIVO DEL CONTROLADOR DEL PUERTO Y ASI SE PUEDEN TOMAR LOS DATOS.

ESPERO HABERTE AYUDADO.