Module
Contents
Index 🔎︎

# CurDir Function

Devuelve una cadena variante que representa la ruta d'accesu actual de la unidá especificada.

This statement currently does not work as documented. See this issue for more information.

## Sintaxis:

    CurDir [(Testu As String)]

## Valor de torna:

Cadena

## Parámetros:

Testu: Cualquier espresión de cadena qu'especifique una unidá esistente (por exemplu, "C" pa la primer partición de la primer unidá de discu duru).

Si nun s'especificó nenguna unidá o ésta ye una cadena de longitud cero (""), CurDir devuelve la ruta d'accesu pa la unidá actual. LibreOffice Basic informa d'un fallu si la sintaxis de la descripción de la unidá ye incorrecta, ésta nun esiste o la so lletra ye posterior a la definida en CONFIG.SYS cola instrucción Lastdrive.

Esta función nun estrema ente mayúscules y minúscules.

## Error codes:

5 Llamada a procedimientu non válida

68 Preséu non disponible

7 Memoria escosa

51 Fallu internu

## Exemplu:

    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