ADIR( ) (Función)

Coloca información acerca de archivos en una matriz y, a continuación, devuelve el número de archivos.

ADIR(ArrayName [, cFileSkeleton [, cAttribute [, nFlag]]])

Valores devueltos

Numeric

Parámetros

• ArrayName
  Especifica el nombre de la matriz. Si la matriz incluida no existe, Visual FoxPro la creará automáticamente. Si la matriz existe y no es suficientemente grande para contener toda la información, Visual FoxPro aumentará automáticamente su tamaño para dar cabida a la información. Si la matriz es mayor de lo necesario, Visual FoxPro reducirá su tamaño. Si la matriz existe y ADIR( ) devuelve 0 porque no se han encontrado archivos coincidentes, la matriz permanecerá inalterada. Si la matriz no existe y ADIR( ) devuelve 0, la matriz no se creará

  La tabla siguiente describe el contenido de cada columna de la matriz y el tipo de datos de cada columna:

  Columna	Contenido de la matriz	Tipo de datos
  1	Nombres de archivo	Character
  2	Tamaños de archivo	Numérico
  3	Fecha de última modificación	Fecha
  4	Hora de última modificación	Character
  5	Atributos de archivo	Character

  La última columna de la matriz contiene los atributos de archivo de los archivos coincidentes. Cada atributo de archivo se expresa mediante una letra y un archivo puede tener más de un atributo. La tabla siguiente indica el atributo de archivo representado por cada letra:

  Letra	Atributo
  A	Archivo de lectura y escritura
  H	Oculto
  R	Sólo lectura
  S	Sistema
  D	Directorio

• cFileSkeleton
  Especifica una estructura de archivo de forma que pueda almacenar información acerca de los archivos con nombres o extensiones que coincidan con un criterio de búsqueda. Por ejemplo, el criterio puede ser todas las tablas, todos los archivos de texto, todos los archivos con nombres cuya primera letra sea A, etc. Estas búsquedas generales se realizan mediante comodines como * y ? en cFileSkeleton. Un signo de interrogación representa un único carácter y un asterisco representa un número cualquiera de caracteres. Puede utilizar un número cualquiera de comodines en cualquier posición de la estructura de archivo.

  Puede especificar una unidad o directorio donde buscar archivos coincidentes. Si no se especifica una unidad y un directorio, Visual FoxPro coloca en la matriz información relativa a los archivos del directorio actual.

• cAttribute
  Especifica la inclusión de subdirectorios y archivos ocultos o de sistema

  cAttribute puede contener cualquier combinación de D, H y S. La inclusión de D devuelve nombres de subdirectorios del directorio actual, además de los nombres de archivo que coincidan con la estructura de archivos especificada en cFileSkeleton. La inclusión de H devuelve información acerca de los archivos ocultos que coincidan con la estructura especificada en cFileSkeleton. La inclusión de S devuelve información acerca de los archivos del sistema que coincidan con la estructura especificada en cFileSkeleton.

  Puede incluir una cadena vacía en cFileSkeleton para devolver únicamente los nombres de subdirectorios, los archivos ocultos o los archivos del sistema.

  Puede incluir V en cAttribute para devolver el nombre de volumen de la unidad actual. Únicamente se devuelve el nombre de volumen a la matriz si se incluye V con D, H o S. El nombre de volumen se almacena en el primer elemento de la matriz y el resto de la matriz se trunca.

• nFlag
  Especifica si la pantalla proporciona nombres DOS o distinción real entre mayúsculas y minúsculas.

  nFlag	Descripción
  0	(Predeterminado) La pantalla muestra el nombre completo del archivo en mayúsculas.
  1	La pantalla muestra los nombres con las mayúsculas y minúsculas originales.
  2	La pantalla sigue la convención de nomenclatura 8+3 de DOS

Observaciones

Para cada archivo, ADIR( ) coloca en la matriz el nombre de archivo, su tamaño, la fecha y la hora de la última modificación, y los atributos.

Ejemplo

El siguiente ejemplo utiliza ADIR( ) para crear una matriz que contiene información de base de datos. A continuación se muestran los nombres de las bases de datos.

CLOSE DATABASES
SET DEFAULT TO (HOME(2) + 'Data')

gnDbcnumber = ADIR(gaDatabase, '*.DBC')  && Create array

CLEAR
FOR nCount = 1 TO gnDbcnumber  && Loop for number of databases
   ? gaDatabase(nCount,1)  && Display database names
ENDFOR
SET PATH TO HOME( )  && Set path to Visual FoxPro directory

Vea también

ADEL( ) | AELEMENT( ) | AFIELDS( ) | AINS( ) | ALEN( ) | ANETRESOURCES( ) | ASCAN( ) | ASORT( ) | ASUBSCRIPT( ) | DIMENSION | DIR o DIRECTORY