Module
Contenu
Index 🔎︎

# Fonction CurDir

Renvoie un variant sous forme de chaîne représentant le chemin actuel de l'unité spécifiée.

Cette instruction ne fonctionne pas actuellement telle qu'elle est décrite. Pour plus d'informations, reportez-vous à ce problème.

## Syntaxe :

    CurDir [(Text As String)]

## Valeur de retour :

Chaîne de caractères

## Paramètres :

Text : expression au format chaîne de caractères spécifiant une unité existante ("C" pour la première partition du premier disque dur, par exemple).

Si aucune unité n'est spécifiée ou si l'unité est une chaîne de longueur zéro (""), CurDir renvoie le chemin de l'unité active. LibreOffice Basic signale une erreur si la syntaxe de la description de l'unité est incorrecte, si l'unité n'existe pas ou si la lettre de cette unité figure après la lettre définie dans CONFIG.SYS avec l'instruction Lastdrive.

Cette fonction ne respecte pas la casse.

## Codes d'erreur :

5 appel de procédure incorrect

68 périphérique non disponible

7 mémoire insuffisante

51 erreur interne

## Exemple :

    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