Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
portuguese
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css

Pagetitle

...

ADir

...

...

...

ADir

Preenche

...

uma

...

série

...

de

...

arrays

...

com

...

informações

...

de

...

arquivos

...

e

...

diretórios

...

(nomes

...

de

...

arquivos,

...

tamanhos,

...

datas,

...

horas

...

e

...

atributos).

Sintaxe

Bloco de código
collapsefalse
ADir( [ cEspecArq ], [ @aNomesArq ], [
aNomesArq
 @aTamanhos ], [
aTamanhos
 @aDatas ], [
aDatas
 @aHoras ], [
aHoras
 @aAtributos ], [
aAtributos
 lchangeCase ] )
--> nRet

Parâmetros

...

Nome

Tipo

Descrição

Obrigatório

Referência

cEspecArq

...

caractere

Indica o path e máscara de arquivos a ser pesquisado. Para isso, pode-se incluir caracteres do tipo curinga * e ?, como também se referenciar ao diretório ou path. Caso nada seja especificado, o parâmetro assumirá como padrão *.*

 

 

aNomesArq

...

vetor

Indica o array que será preenchido com os nomes de arquivos que correspondem a . Cada elemento contém o nome do arquivo e extensão no formato string em maiúsculo.

 

...

X

aTamanhos

...

vetor

Indica o array que será preenchido com os tamanhos dos arquivos correspondentes no array . Cada elemento será numérico.

 

...

X

aDatas

...

vetor

Indica o array que será preenchido com as datas dos arquivos correspondentes no array . Cada elemento será do tipo data (D)

 

...

X

aHoras

...

vetor

Indica o array que será preenchido com as horas dos arquivos correspondentes no array . Cada elemento preenchido, contém uma string no formato hora, minutos e segundos (hh:mm:ss).

 

...

X

aAtributos

...

vetor

Indica o array que será preenchido com os atributos dos arquivos correspondentes no array . Cada elemento é uma string. Caso seja especificado, os arquivos de diretório, sistema e escondidos são inclusos, assim como os arquivos normais. Mas se não for especificado, somente os arquivos normais serão inclusos.

 

X

lchangeCase

lógico

Se .T. converte o nome dos arquivos para letra maiúscula (UPPER CASE), se .F. mantém o nome dos arquivos igual ao original. Padrão .T.

 

 

Retorno

Nome

Tipo

Descrição

nRet

...

numérico

Retorna a quantidade de arquivos encontrados que correspondem à máscara de pesquisa no diretório especificado.

Observações

  • Diretórios: Caso

...

  • o parâmetro aAtributos seja especificado e cEspecArq

...

  • seja especificado como *.*, os diretórios serão incluídos em aNomesArq.

...

  • No array aAtributos, os diretórios são indicados com um valor atributo de "D." Se ADir() for executada dentro de um subdiretório, as duas primeiras entradas

...

  • do array

...

  • aNomesArq são "." e "..", os "alias" dos diretórios corrente e raiz. A data e hora da última atualização são informadas para diretórios, mas o tamanho de um diretório é sempre zero.

...

  • Esta função foi mantida

...

  • por compatibilidade, e definida como obsoleta. aDir() foi substituída pela função Directory(), que retorna todas as

...

  • informações do(s) arquivo(s)

...

  • em um array multidimensional.

Exemplos

Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
User Function adir()
  Local aFiles := {} // O array receberá os nomes dos arquivos e do diretório


  Local aSizes := {} // O array receberá os tamanhos dos arquivos e do diretorio


  Local nX


  ADir("c:\garbage\*.*", aFiles, aSizes)


  // Exibe dados dos arquivos


  nCount := Len( aFiles )


  For nX := 1 to nCount


    ConOut( 'Arquivo: ' + aFiles[nX] + ' - Size: ' + AllTrim(Str(aSizes[nX])) )


  Next nX
Return

Abrangência

Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server

Veja também

...