problema no comando RUN

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Everton
Usuário Nível 3
Usuário Nível 3
Mensagens: 143
Registrado em: 07 Jul 2004 08:53
Localização: Campo Grande - MS

problema no comando RUN

Mensagem por Everton »

Olá Turma.

Pesquisando pelo forum, lí um monte de formas para fazer funcionar o comando run no windows XP, mas não funcionou nunhuma, alguem poderia me dar uma luz.
Como estou fazendo. Estou usando o programa USB do nosso amigo para imprimir em uma HP multifucional, mas não consigoe executá-lo dentro do programa.

cComando := "USB.EXE"+" "+M->N_FICHA+".TXT"
run &(cComando)

o que eu posso fazer, o meu programa roda em um servidor 2003, e gostaria de gravar os arquivos .TXT em uma pasta local nas estações chamada FICHAS, onde nesta pasta está o arquivo USB.EXE, USB.MEM e o respectivo arquivo .TXT, isso nem é muito o problema, o negocio mesmo é que não consigo executar o USB de dentro do programa. Grato pela atenção.
Everton Luiz Penteado
Clipper 5.2b - Blink 7.0
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Código: Selecionar todos

*INICIA A IMPRESSAO EM USB
   SET DEVICE TO PRINT
   set printer to C:\FICHAS\SEUTXT.txt

  @ PROW()+1,00 SAY "IMPRIMINDO,BLA,BLA,BLA..."

*TERMINA A IMPRESSAO EM USB
   SET PRINTER TO
   set device to screen
   executa:=SWPRUNCMD("USB C:\FICHAS\SEUTXT.TXT")
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Avatar do usuário
gvc
Colaborador
Colaborador
Mensagens: 1270
Registrado em: 23 Ago 2005 10:57

Mensagem por gvc »

aka := "USB C:\FICHAS\SEUTXT.TXT"
run (aka)

boa sorte
Everton
Usuário Nível 3
Usuário Nível 3
Mensagens: 143
Registrado em: 07 Jul 2004 08:53
Localização: Campo Grande - MS

Mensagem por Everton »

Olá Leonardo obrigado pela dica, mas neste programa eu ainda uso o rlink, e este comando é do blink, mas velu pela dica muito grato. GVC deu certo a sua dica muito obrigado tbm, valeu turma, precisando estamos ai...
Everton Luiz Penteado
Clipper 5.2b - Blink 7.0
Avatar do usuário
sygecom
Administrador
Administrador
Mensagens: 7131
Registrado em: 21 Jul 2006 10:12
Localização: Alvorada-RS
Contato:

Mensagem por sygecom »

Everton,

Puxa verdade mesmo falha minha....sai colocando e nem perguntei se usava o BLINKER.....hehehe

Abraços
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
Responder