Imprimir por puerto USB - HELP!!
Publicado por Carlos Lionell (2 intervenciones) el 08/10/2016 18:23:36
Hola amigos del foro,
Necesito ayuda urgente, en el sistema que desarrolle configure para pon puerto paralelo, pero lo que ahora han cambiado de PC y no cuenta con ese puerto, quisiera saber como modificar mi código para que pueda imprimir pero por puerto USB.
Gracias por la ayuda
//Fraccion del mi codigo:
::::::::::::::::::::::::::::::::::::::::::
Necesito ayuda urgente, en el sistema que desarrolle configure para pon puerto paralelo, pero lo que ahora han cambiado de PC y no cuenta con ese puerto, quisiera saber como modificar mi código para que pueda imprimir pero por puerto USB.
Gracias por la ayuda
//Fraccion del mi codigo:
::::::::::::::::::::::::::::::::::::::::::
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
IF (thisform.recibos.page2.imp12_rec.Value<>0) THEN
@ LIN+14,COL+50 say thisform.recibos.page2.des11.Value
@ LIN+14,COL+59 say thisform.recibos.page2.imp11_rec.Value
ENDIF
@ LIN+14,col SAY chr(27)+'!'+chr(1) && Control code to turn compressed mode off
@ LIN+15,COL SAY chr(27)+'!'+chr(32)
@ LIN+19,COL+09 say "S/."+ALLTRIM(STR(ROUND(thisform.recibos.page2.importe_rec.Value,2),8,2))
@ LIN+20,1 SAY chr(27)+'!'+chr(1) && Control code to turn compressed mode off
SET DEVICE TO SCREEN
SET SAFETY OFF
COPY FILE ringreso.prn TO LPT1.dos
DELETE FILE ringreso.prnSET SAFETY ON
SET SYSMENU ON
CLOSE DATABASES ALL
THISFORM.ReleaseValora esta pregunta
0