Página 1 de 1

impressao em rede

Enviado: 21 Mar 2006 21:50
por PITERGALDIANO
tenho um sistema que faz impressoes em rede através do comando

type nomearquivo To Printer
´
a rede é configurada assim

net use lpt1 \\computador\impressora

só que a impressão só vai quando saio do sistema


o que pode ser

obrigado

Enviado: 21 Mar 2006 22:04
por alaminojunior
Olá meu caro, coloque depois das linhas:

SET PRINTER TO
SET DEVICE TO SCREEN

o seguinte:

PrCommit()

FUNCTION PRCOMMIT
local cPrinter := set( _SET_PRINTFILE, "LPT3" )
set( _SET_PRINTFILE, "LPT2" )
set( _SET_PRINTFILE, "LPT1" )
set( _SET_PRINTFILE, "" )

// restores the original printer-port!
set(_SET_PRINTFILE, cPrinter, .t.)