Enviar a LPT1 desde Excel

Prueba con algo parecido a:

Dim intFichero As Integer
intFichero = FreeFile(0)
Open "LPT1" For Output As intFichero
Print #intFichero, "texto" 'O el byte que sea
Close intFichero

El problema es que no puedo garantizar que te vaya a funcionar porque no puedo probar este código, debido a que las impresoras las tengo en red, no tengo ninguna conectada directamente a LPT1, ni ningún otro dispositivo.
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Pepito" escribió en el mensaje news:345301c375bf$ddacd280$
Hola!!
Alguien me pudiera dar una idea sobre como enviar un byte
al puerto LPT1 o al LPT2 , ( los ejemplos que he visto en
qbasic eran así)
Out 888, var no?
pero ¿Cómo se hace esto desde VBA de Excel2000 ?
!!no sé?! .¿\'_'/?. ;-(((
Si tienen algún ejemplo práctico mejor.
Saludos
Pepito
OJO:-> Ya que estamos en este tema , las direcciones de
memoria Hex(0378(888 DEC)-037F(895 DEC) y de la 0778-
077A )las usa LPT1 para e/s, ¿Porqué tantos byte , y como
esto funciona?.
(( 8 byte por un lado y 3 por otro).Chaooo

FA Saludos,
Bien probaré , y luego te comento pues es para dominar 8
canales , fuera de la PC,y esto me llevará un poco de
tiempo.
Muchas gracias por compartir tu luz.
Pepito.

Mostrar la cita

Prueba con algo parecido a:

Dim intFichero As Integer
intFichero = FreeFile(0)
Open "LPT1" For Output As intFichero
Print #intFichero, "texto" 'O el byte que sea
Close intFichero

El problema es que no puedo garantizar que te vaya a

funcionar porque no puedo probar este código, debido a que
las impresoras las tengo en red, no tengo ninguna
conectada directamente a LPT1, ni ningún otro dispositivo.
Mostrar la cita

Un saludo.


Fernando Arroyo
MS MVP - Excel

"Pepito" escribió en el

mensaje news:345301c375bf$ddacd280$
Mostrar la cita

Hola!!
Alguien me pudiera dar una idea sobre como enviar un byte
al puerto LPT1 o al LPT2 , ( los ejemplos que he visto en
qbasic eran así)
Out 888, var no?
pero ¿Cómo se hace esto desde VBA de Excel2000 ?
!!no sé?! .¿\'_'/?. ;-(((
Si tienen algún ejemplo práctico mejor.
Saludos
Pepito
OJO:-> Ya que estamos en este tema , las direcciones de
memoria Hex(0378(888 DEC)-037F(895 DEC) y de la 0778-
077A )las usa LPT1 para e/s, ¿Porqué tantos byte , y como
esto funciona?.
(( 8 byte por un lado y 3 por otro).Chaooo



.