PC Toledo

Basta usar o Dosprinter com o Parâmetro /RAW e os comandos ASC corretos.

... e Objs. So isso só. Preciso terminar logo isso viu !!!
Em Harbour eu consigo imprimir na USB em modo texto, na matricial ? Assim eu me livro do DosPrinter tb, sabe !!
Se vai acontecer ou não é muito difícil garantir...
Agora que vai ganhar uma infinidade de possibilidades, isso vai...
E Sem ...

pero ha falladosegue o erro Subsystem Call ....: WScript.ShellSystem Code .......: 3Default Status ....: .F.Description .......: DISP_E_MEMBERNOTFOUNDOperation .........: RUNArguments .........: [ 1] = Type: C Val: start %comspec% /c calc.exe [ 2] = Type: N Val: 0 [ 3] = Type: L Val: .T.Involved ...

Mario, buenas noches

El ejemplo que compartí me funciona muy bien, todos los dias desde 2007.
Yo voy a suponer que el reporte es extenso, mientras imrpime o visualiza el sistema es LIBERADO, con el parámetro /DELAY0 (DELAY CERO), por favor revisa si ese parámetro está bien escrito.

Atento saludo ...

Sí, muy bien. la ventana negra no saltó al frente pero la continuación del programa queda en la dependencia de cerrar el programa que fue llamado por este comando. es necesario agregar start al principio del comando .. hice un intento cambiando la línea:

oShell: Run ('%comspec% /c' + cComando, 0 ...

... impresion Horizontal
//
cParametros:= (cCpi + ' /CP850 /TOP0.5 /DELAY0' ;
+ cRtf + cLuc + cHoriz + ' ' + cArchTxt)
//
// DELAY0 es para que DosPrinter libere el sistema
// antes de terminar de imprimir
// cArchTxt = Archivo de texto
//
cComando:= ('D:\MiCarpeta\DosPrinter.EXE' + cParametros ...

Pessoal, boa noite!

Levantei o tópico por que estou com o mesmo problema. Estou usando um programa externo pra gerar QR-Code, já que o do HMG-Zebra tem um problema com texto. É um programa com tela gráfica mas que aceita linha de comando via RUN.

No HMG 3.0.46 não bota essa tela preta, mas no 3.4 ...

Jairo,

Quem disponibilizou esse código do Myrun()
foi o meu amigo Paiva de Uberlândia ....

Eu já o havia experimentado ... sem sucesso ...

agora peguei esse código do jeito q vc disponibilizou e tentei novamente....

mas não adianta ...

a pretinha está sempre lá ....

eu já dei o meu jeitinho, é ...

Sobre o comando... o fórum não deixa postar.
De qualquer jeito é uma nova janela

Tendo que colocar diferente pro fórum aceitar o texto:

RUN ( "c m d / c start comando" )

o /b só vi agora. talvez dê certo com esse comando.

https://github.com/JoseQuintas/JoseQuintas/blob/master/source/ze_printbegin.prg

Valia também para o Clipper...
O que precisa é... encerrar a impressão... pode ser desligando da impressora.
SET PRINTER TO

Isso salva tudo que está pendente de salvar/imprimir.

Sobre executar... Talvez wapi ...

Olá Mario,

Não sei se está disposto a insistir nisso, mas você disse que usa GUI, então você está usando Harbour, é isso?

Se sim você já tentou com a função MyRun()? Ela foi disponibilizada aqui no fórum, e uso até hoje para abrir programas externos com parâmetros:

(PS: Não lembro quem ...

não adiantou...
a janelinha preta aparece ....

colocando /MIN pelo menos ela aparece minimizada ....

Olá Mário,

Tente acrescentar Start /B no início do comando. Exemplo:

bom dia..... gostaria de saber como é que vocês fazem para executar o DOSPRINT.EXE ...

NO meu caso eu executo:


comanda := "dosprint.exe /SEL TLTERM1.txt"
run (comanda)


mas ... como utilizo modo GUI (gráfico) uma janela preta (o cmd) é acionado e fica lá enquanto a pessoa não clica o OK (já ...

... de imprimir numa HP, por isso implementei o NODOSIMP, funcionando muito bem por sinal, só estou com problema em orçamento com mais de uma página que não está imprimindo.

Continuo pedindo ajuda de quem puder.

Caso não for possível, testarei outras alternativas como PRWIN, DOSPRINTER e outros mais.