Ajuda sobre impressão
Enviado: 26 Jul 2015 00:11
Olá, Boa noite aos amigos, estou com um problema e estou pedindo ajuda dos amigos aqui, para fazer uma impressao de um simples cupom de conferencia, uso dessa forma no windows xp funciona perfeitamente inclusive usando cabo usb , porem no windows 7 ele da a mensagem a baixo de que a impressora nao esta ligada. desde já meu muito Obrigado.
Try
SET PRINTER ON
SET PRINTER TO LPT1
SET CONSOLE OFF
? x_nome
? x_endereco+', '+x_numero+', '+x_fixo
? '------------------------------------------------'
? ' COMANDA PARA SIMPLES CONFERENCIA'
? ' NAO E DOCUMENTO FISCAL'
? ' VENDA : '+_nome_da_venda
? '------------------------------------------------'
? 'PRODUTO QTD UNIT. SUB-TOTAL'
? '------------------------------------------------'
/*
imprime os produtos
*/
SET CONSOLE ON
SET PRINTER TO
SET PRINTER OFF
Catch e
msgexclamation('A IMPRESSORA Desligada ','Atenção') < -----------------------------------------
return(nil)
End
return(nil)
Try
SET PRINTER ON
SET PRINTER TO LPT1
SET CONSOLE OFF
? x_nome
? x_endereco+', '+x_numero+', '+x_fixo
? '------------------------------------------------'
? ' COMANDA PARA SIMPLES CONFERENCIA'
? ' NAO E DOCUMENTO FISCAL'
? ' VENDA : '+_nome_da_venda
? '------------------------------------------------'
? 'PRODUTO QTD UNIT. SUB-TOTAL'
? '------------------------------------------------'
/*
imprime os produtos
*/
SET CONSOLE ON
SET PRINTER TO
SET PRINTER OFF
Catch e
msgexclamation('A IMPRESSORA Desligada ','Atenção') < -----------------------------------------
return(nil)
End
return(nil)