Verificar Existência e Criação de Diretório

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Spitzer
Usuário Nível 2
Usuário Nível 2
Mensagens: 60
Registrado em: 15 Ago 2003 04:56
Localização: Nova Fátima - PR

Verificar Existência e Criação de Diretório

Mensagem por Spitzer »

Olá!

Como verifico se um diretório existe?
E caso não exista, como crio-o (sem o comando RUN)?

Ex.: C:\Windows\Temp

Obrigado!
Abraços,
Ademir Spitzer
spereira
Usuário Nível 2
Usuário Nível 2
Mensagens: 85
Registrado em: 19 Jul 2004 11:42
Localização: Porto - Portugal

Mensagem por spereira »

Vc pode fazer o seguinte:

if MD("C:\WINDOWS\TEMP")
seu código...
endif

Espero ter ajudado.
MARINI
Usuário Nível 3
Usuário Nível 3
Mensagens: 288
Registrado em: 06 Jul 2004 08:06
Localização: Pindamonhangaba SP

Mensagem por MARINI »

Use o
DIRMAKE("C:\Windows\Temp")
da CTP.LIB.
Não é necessário examinar se o DIR existe, pois caso
exista não alterará nada e se não existir será criado.
Sds
Marini
Gerald
Usuário Nível 1
Usuário Nível 1
Mensagens: 39
Registrado em: 06 Jul 2004 17:50
Localização: Caldas Novas
Contato:

Mensagem por Gerald »

spereira escreveu:Vc pode fazer o seguinte:

if MD("C:\WINDOWS\TEMP")
seu código...
endif

Espero ter ajudado.
Mas "MD" não é uma função do clipper. Onde consigo ela?
Quando disserem que seu trabalho não é o de um profissional, lembre-se: Amadores construíram a arca de Noé, profissionais, o Titanic...

www.1grau.com\comunidadeclipper
skype = "gpfranca"
novo email: geraldo@usinfo.com.br
spereira
Usuário Nível 2
Usuário Nível 2
Mensagens: 85
Registrado em: 19 Jul 2004 11:42
Localização: Porto - Portugal

Mensagem por spereira »

Eu utilizo a biblioteca CLIPPER.LIB e linkedito com o Blinker.
Gerald
Usuário Nível 1
Usuário Nível 1
Mensagens: 39
Registrado em: 06 Jul 2004 17:50
Localização: Caldas Novas
Contato:

Mensagem por Gerald »

spereira escreveu:Eu utilizo a biblioteca CLIPPER.LIB e linkedito com o Blinker.
Alguma versão mais nova da dessa biblioteca? A que eu utilizo tá com a data de 15/09/1997. Tem como passar essa que vc utiliza p/ mim? O email é geraldo@usinfo.brte.com.br .
Nota de Moderação:
por [url=https://pctoledo.org/forum/memberlist.php?mode=viewprofile&u=100899][color=#00AA00]Pablo César[/color][/url]: (de acordo a sua ultima citação) 
 
Enviar por email, resolver através de meios privados são práticas não aceitas aqui no fórum. Desestimulamos este tipo de procedimento, já que o objetivo do fórum é para servir como fonte centralizadora de informações, onde os usuários possam compartilhar de forma pública e não exclusiva. Favor ler a Regra Geral do Fórum (itens 10,11,12 e 13).
Desde já ficou muito agradecido...
Quando disserem que seu trabalho não é o de um profissional, lembre-se: Amadores construíram a arca de Noé, profissionais, o Titanic...

www.1grau.com\comunidadeclipper
skype = "gpfranca"
novo email: geraldo@usinfo.com.br
MARINI
Usuário Nível 3
Usuário Nível 3
Mensagens: 288
Registrado em: 06 Jul 2004 08:06
Localização: Pindamonhangaba SP

Mensagem por MARINI »

spereira escreveu:Eu utilizo a biblioteca CLIPPER.LIB e linkedito com o Blinker.

Nesta LIB não existe a função MD nem no BLINKER.
Deve estar ocorrendo algum engano na informação.
Sds
Marini
MARINI
Usuário Nível 3
Usuário Nível 3
Mensagens: 288
Registrado em: 06 Jul 2004 08:06
Localização: Pindamonhangaba SP

Mensagem por MARINI »

MARINI escreveu:Use o
DIRMAKE("C:\Windows\Temp")
da CTP.LIB.
Não é necessário examinar se o DIR existe, pois caso
exista não alterará nada e se não existir será criado.

Se quiser examinar se o DIR existe poderá ser feito assim:

var:=DIRMAKE("C:\Windows\Temp")
IF var=0
.. diretório criado
ELSEIF var=-5
.. diretório já existe

ENDIF

http://www.clipx.net/ng/53guide/ng39600.php
Sds
Marini
spereira
Usuário Nível 2
Usuário Nível 2
Mensagens: 85
Registrado em: 19 Jul 2004 11:42
Localização: Porto - Portugal

Mensagem por spereira »

Gerald escreveu:
spereira escreveu:Eu utilizo a biblioteca CLIPPER.LIB e linkedito com o Blinker.
Alguma versão mais nova da dessa biblioteca? A que eu utilizo tá com a data de 15/09/1997. Tem como passar essa que vc utiliza p/ mim? O email é geraldo@usinfo.brte.com.br . Desde já ficou muito agradecido...
Na verdade, esqueci de citar que também utilizo a biblioteca CMOUSE.LIB que é a que possui estas funções.
Alguém possui o manual desta biblioteca, pois gostaria de saber quais outras funções estão disponíveis nela.
Spitzer
Usuário Nível 2
Usuário Nível 2
Mensagens: 60
Registrado em: 15 Ago 2003 04:56
Localização: Nova Fátima - PR

Mensagem por Spitzer »

Olá!

Valeu!

Já uso mesmo a CTP, então farei uso da função sugerida pelo Marini.

Obrigado!
Abraços,
Ademir Spitzer
Responder