Mini-tuto: Imprimir LPT1 a USB

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% [?]