Página 2 de 2

Enviado: 07 Dez 2007 19:52
por Pablo César
Mas Rochinha, é como o GVC falou, poderia ter consequências do sistema se perder ao mudar o diretorio corrente. Digo isso, se não retornar a diretório original em que se encontrava. Em vez do uso da DIRCHANGE eu preferiria DIRMAKE que é mais seguro e sintético. Mas acho que tudo isso seria desnecessário, visto que o seu exemplo anterior, bastaria colocar o caminho completo com drive e sub-diretorios (no caso).

Enviado: 08 Dez 2007 04:43
por rochinha
Amiguinho

Com certeza!

Enviado: 08 Dez 2007 14:20
por ABeltrani
Boa tarde !

O "efeito colateral" da dirchange é desfeito nesta função. Se os amigos observarem, verão que se dirchange retornar 0 (o diretorio existe), o programa retorna ao diretorio anterior "dirchange(´..´)".

Chamo a função desta forma: IF !VERDIR(´NOME DO DIRETORIO´)
RETU
ENDI

Diretório Pasta Existe

Enviado: 23 Fev 2008 11:57
por Marsenne
Verificar se o diretório existe com a função FILE não funciona.
O file retorna TRUE somente se o diretório já existe tendo ou não
arquivos nele.

A função abaixo verifica corretamente através do FERROR=3 que é
diretório inexistente. Basta colocar um nome de arquivo qualquer. No
meu coloquei 'NUL' mas pode ser qualquer outro. Caso não exista o
diretório o CLIPPER retorna o erro 3.

Funciona muito bem!

FOPEN("C:\TESTE\\NUL")
IF FERROR()=3 // se a pasta C:\TESTE nao existe ele criará
SET CONSOLE OFF
RUN MKDIR C:\TESTE
SET CONSOLE ON
ENDIF

abraços,
Marsenne Negreiros