Dir (Función)

Actualización: noviembre 2007

Devuelve una cadena que representa el nombre de un archivo, directorio o carpeta que coincide con un modelo especificado, con un atributo de archivo o con la etiqueta de volumen de una unidad.

My.Computer.FileSystem (Objeto) proporciona mayor productividad y rendimiento en las operaciones de E/S de archivo que si se utiliza la función Dir. Vea My.Computer.FileSystem.GetDirectoryInfo (Método) para obtener más información.

Public Overloads Function Dir() As String
' -or-
Public Overloads Function Dir( _
       ByVal PathName As String, _ 
       Optional ByVal Attributes As FileAttribute = FileAttribute.Normal _
) As String

Parámetros

• PathName
  Opcional. Expresión de tipo String que especifica un nombre de archivo, un nombre de directorio o carpeta, o la etiqueta de volumen de la unidad. Se devuelve una cadena de longitud cero ("") si no se encuentra PathName.

• Attributes
  Opcional. Enumeración o expresión numérica cuyo valor especifica los atributos del archivo. Si se omite, Dir devuelve archivos que coinciden con PathName pero que carecen de atributos.

Valores

Los valores de enumeración del argumento Attributes son los siguientes:

Nota:
El lenguaje de Visual Basic especifica estas enumeraciones, que se pueden utilizar en cualquier parte del código en sustitución de valores reales.

Comentarios

La función Dir admite el uso de caracteres comodín de carácter múltiple (*) y de carácter único (?) para especificar varios archivos.

VbVolume devuelve la etiqueta del volumen para la unidad en lugar de un nombre de archivo concreto.

La primera vez que se llame a la función PathName, se debe especificar la función Dir. Para recuperar el elemento siguiente, puede realizar llamadas posteriores a la función Dir sin parámetros.

Nota de seguridad:
Para que se ejecute correctamente, la función Dir requiere que se otorguen los indicadores Read y PathDiscovery de FileIOPermission al código de ejecución. Para obtener más información, vea FileIOPermission, SecurityException y Permisos de acceso a código.

Ejemplo

En este ejemplo se utiliza la función Dir para comprobar si existen determinados archivos y directorios.

Dim MyFile, MyPath, MyName As String
' Returns "WIN.INI" if it exists.
MyFile = Dir("C:\WINDOWS\WIN.INI")   

' Returns filename with specified extension. If more than one *.INI
' file exists, the first file found is returned.
MyFile = Dir("C:\WINDOWS\*.INI")

' Call Dir again without arguments to return the next *.INI file in the
' same directory.
MyFile = Dir()

' Return first *.TXT file, including files with a set hidden attribute.
MyFile = Dir("*.TXT", vbHidden)

' Display the names in C:\ that represent directories.
MyPath = "c:\"   ' Set the path.
MyName = Dir(MyPath, vbDirectory)   ' Retrieve the first entry.
Do While MyName <> ""   ' Start the loop.
      ' Use bitwise comparison to make sure MyName is a directory.
      If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
         ' Display entry only if it's a directory.
         MsgBox(MyName)
      End If   
   MyName = Dir()   ' Get next entry.
Loop

Notas para desarrolladores de dispositivos inteligentes

Esta función no está admitida.

Requisitos

Espacio de nombres:Microsoft.VisualBasic

**Módulo:**FileSystem

**Ensamblado:**Visual Basic Runtime Library (en Microsoft.VisualBasic.dll)

Vea también

Referencia

ChDir (Función)

CurDir (Función)

FileAttribute (Enumeración)