Comando Run de Novo

[negrao]

Mocada, postei a uns 5 dias atras para inibir a execucao do comando ARJ via programa, esse funcionou perfeitamente usando o > NUL
Mas quando se executa o comando RUN DEL TESTE.TXT > NUL ele mostra na tela a mensagem 'ARQUIVO NAO ENCONTRADO'.Qndoo arquivo existe blza, nao mostra nada.
Tem como nao mostrar essa mensagem de arquivo nao encontrado TB ?

Obrigado

[anacatacombs]

Boa tarde.

Eu aconselho, antes de fazer qualquer coisa com o arquivo (deletar, renomear, copiar) verificar se antes se ele existe ou não.

Código: Selecionar todos

IF FILE("TESTE.EXE")
    RUN DEL TESTE.TXT > NUL 
ENDIF

Além de não aparecer mais a mensagem de arquivo não encontrado, vai diminuir a chance de erros em tempo de execução.
[]'s

Ana

[negrao]

Rsrsrs, valeu ana.
Tava na cara a solucao e nao percebi.

Deu certo sua Dica...obrigado

[alxsts]

Olá amigos,

por que não usar a função FErase do próprio Clipper?

Código: Selecionar todos

   ? FileDelete( "C:MEUDIR\MEUSUBDUR\MEUARQ.EXT" )

FUNCTION FileDelete ( cFileSpec )

   LOCAL lRet := .F., nOption := 1
  
   IF ! Empty( cFileSpec )
      WHILE nOption == 1
         If File( cFileSpec )
            IF ! FErase( cFileSpec )
               nOption := Alert( "Falha ao excluir " + cFileSpec, { " Tentar novamente ", " Cancelar " } )
            ELSE
               lRet := .T.
            ENDIF
         ELSE
           Alert( "Falha ao excluir " + cFileSpec + ".;Arquivo não localizado." )
           EXIT
         ENDIF
      ENDDO 
   ENDIF

   RETURN lRet

Na Nanfor.Lib tambem tem função para excluir arquivos.
Respondi seu post anterior. Se precisar excluir usando RUN, deixei uma dica lá. É só olhar.

[]s
AlxSts

[Maligno]

Quando li a mensagem do OP imaginei que DEL fosse um mero exemplo de uso que também causa uma mensagem indesejada. Normalmente se usa algo bobo assim só pra exemplificar.

[anacatacombs]

É Maligno, eu também achei.
Para exclusão do arquivo existem várias funcões.
FILEDELETE, DELETEFILE ....
Mas de qualquer forma,se tratando de exclusão ou qualquer outra coisa, verificar se o arquivo existe ou não é procedimento teoricamente padrão para qualquer situação que necessite do mesmo, até mesmo para evitar futuros erros.

[alxsts]

Desculpem... poderiam me dizer o que significa "OP", escito pelo Maligno?

[]s
AlxSts

[anacatacombs]

a grosso modo: é quem criou o tópico.

[Maligno]

poderiam me dizer o que significa "OP"

OP = "Original Poster"; quem começou o tópico, como disse a Ana.
Procure no Google por "internet acronyms". Há dezenas desses acrônimos, que são muito utilizados em fóruns estrangeiros.

[alxsts]

Grato.

[]s
AlxSts

[Pablo César]

Aproveitando o trem deste tópico. Estou tendo dificuldades em encontrar uma solução para o seguinte código que funcione em WINXP e que ora bem funciona em WIN98:

Código: Selecionar todos

RODA:="DIR C:\FIREFOX.EXE /S /B > C:TEMP.TXT"

// Seja com Blinker
SWPRUNCMD(RODA)

// ou RTlink
run (RODA)

Alguém ja passou por isto ?. Esse procedimento iria varrer o HD todos os subdiretórios apartir da raiz procurando por um determinado arquivo (neste caso o FIREFOX.EXE). Não sei por quê cargas dáguas retorna "Caminho nao encontrado" quando executado na linha de comando. Alguém saberia como posso resolver isto ? Cómo localizar um determinado arquivo no HD e que retorne o caminho da pasta em que se encontra ?

[rosalvo rosa]

Pablo, respondendo a tua carona no tópico, veja no NG, o comando DIRECTORY, e depois use o AEVAL. No NG está
bem esplicado. Depois poste o resultado..

[Maligno]

Tenho a ligeira impressão que o objetivo do "DIR" dessa história é apenas exemplificar a dificuldade enfrentada pelo colega. Tive sensação de dé-jàvu agora. ))

[Pablo César]

veja no NG, o comando DIRECTORY, e depois use o AEVAL.

Ops, desculpe a demora em responder. Eu não tenho probvlemas com o DIRECTORY, acontece que estou fazendo a pesquisa de um determinado arquivo no disco inteiro. Para isso achei mais fácil utilizar o comando DIR do DOS. Pode observar que o DIR tem o parâmetro /S que pesquisa subdiretórios e mando pesquisar apartir da raiz. Mas como eu disse, não estou conseguindo executar no WINXP através do program em Clipper. Isso é esquisito !. Não sei se alguém passou por isso, se pegar o código que postei e compilar verão que não funciona ! Dá como mensagem "Caminho nao encontrado"

Tenho a ligeira impressão que o objetivo do "DIR" dessa história é apenas exemplificar a dificuldade enfrentada pelo colega. Tive sensação de dé-jàvu agora. ))

É isso mesmo, não estou conseguindo executar o comando DIR no meu aplicativo em Clipper. E quanto a essa questão do "dé-jàvu" parece coisa diriam alguns... eu também achei que passei por isso ! MAs não vou ficar grilado, ja até conseguí uma solução para esse caso. O objetivo é para compartilhar essa experiência.

Assim como ja ví em outro tópico, sobre obter os nomes dos terminais em rede através NET VIEW, sugerido pelos colegas Vailton e Janio com o comando NTBSTAT. Eu também as vezes apelo aos comandos do próprio SO para implementar no meu sistema. Mas essa do DIR fiquei pasmo de não funcionar.

[alxsts]

Olá.

É Pablo, no dia em que voce postou isso, gastei umas boas horas testando e tentando. Mas não consegui. Dá o mesmo problema. Tentei tambem com CMD /C START DIR... > Arquivo.Txt, e ficou mais esquisito ainda. Ele cria o Arquivo.Txt, com o resultado do DIR certinho mas não fecha o arquivo e o direcionamento (>) (parece que não remove a nova instancia do CMD). Os comandos subsequentes são gravados nesse arquivo... uma zona.

[]'s
AlxSts