usando run

[Roberto alcantara]

usando o comando run para executar (net use lpt1 /delete) e (net use lpt1 \\usuario\impressora) o sistema operacional retorna uma mensagem, Existe um comando que evite que esta mensagem retorne na tela do programa, ou eu tenho que salvar a tela antee e restaura-la imediatamente depois do comando run? Alguem sabe? De ja sou grato pela ajuda dos colegas!

[alxsts]

Olá Roberto.

Seja bem-vindo ao fórum!

Estes comandos do sistema operacional emitem mesmo suas mensagens, que acabam "sujando" as telas de nossos aplicativos.

A solução que encontrei, quando precisei fazer isto, fou usar o comando START do CMD, com parâmetros indicando que ele executasse minimizado e em janela separada.

Consulte a sintaxe, abrindo uma janela do CMD e teclando HELP START. Verifique os parâmetros /MIN e /SEPARATE.

Dentro do teu programa, monte uma string com a linha de comando. Algo parecido com

Código: Selecionar todos

cCommand :=  "START CMD.EXE /C NETUSE <parâmetros>"

Depois faça o

Código: Selecionar todos

RUN ( cCommand )

Você não mencionou qual linkeditor usa. Se estiver usando o Blinker, poderá usar, de dentro do teu programa, a função SwapRunCmd(). Esta função é do Blinker e traz vantagens sobre o comando RUN do Clipper.

Adicionalmente, você pode usar o recurso de busca do fórum, localizado na parte superior direita da página. Com certeza há tópicos relacionados a este assunto.

[JoséQuintas]

Pra maioria dos comandos, pode usar a opção de redirecionar a saída.
run ("net > lixo.txt")
run ("net > NUL:")
O detalhe de NUL é que dependendo do sistema operacional pode precisar ou não dos dois pontos.
Se direcionar pra arquivo, pode até analisar o resultado.