En Visual Basic tenía este código:
Open “LPT1″ For Output As #3
Print #3, Chr(27); Chr(64); Chr(27); Chr(69); Chr(1); “PRINTER TEST”
Print #3, Chr(27); Chr(109)
Close #3
Todo funciona bien si tu pc tiene dicho puerto, pero si no?; queda comprar un adaptador usb to parallel.
Resuelto el primer problema.
Primero? qué, no era el único?
Resulta que no se soluciona cambiando:
Open “LPT1″ For Output As #3
a
Open “USB001″ For Output As #3
Existe una manera sencilla he inteligente:
Tu impresora que ahora te figura conectada a traves de:[Virtual printer for USB); lo compartes con la red (ya sabes: click derecho sobre la impresora y click en compartir)
abres el cmd (command.exe) y escribes:
NET USE LPT1: \\MaquinaCompartida-01\MiImpresora /persistent:yes
A mi me quedo algo asi:
NET USE LPT1: \\td-7\BIXOLONS /persistent:yes
Que es lo que hace esto?
Manda todos las peticiones LPT1 a tu impresora de red.(entiendes la jugada?)
Tu código (Open “LPT1″ For Output As #3) no se modifica para nada.
Popularity: 2% [?]
