Función CurDir

Devuelve una cadena variante que representa la ruta actual .

Algunas funciones de archivos y directorios específicas de DOS ya no están disponibles en LibreOffice, o su funcionalidad es limitada. Por ejemplo, no se ofrece compatibilidad con las funciones ChDir, ChDrive y CurDir. Algunas propiedades específicas de DOS ya no se utilizan en funciones que esperan propiedades de archivo como parámetros (por ejemplo, para diferenciar entre archivos ocultos y archivos de sistema). Esto garantiza el mayor nivel posible de independencia de plataforma para LibreOffice. Por lo tanto, esta prestación está sujeta a eliminación en una versión futura.

La biblioteca ScriptForge en LibreOffice 7.1 presenta el servicio FileSystem con métodos para manejar archivos y carpetas en scripts de usuario.

CurDir [(Text As String)]

Valor de retorno:

Cadena

Text: Cualquier cadena de texto que especifique una unidad existente, por ejemplo "C" para la primera partición del primer disco duro. Este parámetro se utiliza únicamente en Windows.

Si no se especifica ninguna unidad o si la unidad es una cadena de longitud cero (""), CurDir devuelve la ruta de la unidad actual. LibreOffice Basic informa de un error si la sintaxis de la descripción de la unidad es incorrecta o si la unidad no existe.

Esta función no distingue entre mayúsculas y minúsculas.

  Sub ExampleCurDir
      Dim sDir1 As String, sDir2 As String
      sDir1 = "C:\Test"
      sDir2 = "D:\Private"
      ChDir( sDir1 )
      MsgBox CurDir
      ChDir( sDir2 )
      MsgBox CurDir
  End Sub