Spis treści
Indeks 🔎︎

# Funkcja CurDir

Zwraca ciąg variant określający aktualną ścieżkę określonego napędu.

Ta instrukcja uruchomieniowa aktualnie nie działa zgodnie z opisem w dokumentacji. Aby uzyskać więcej informacji, zapoznaj się z z tym zagadnienieniem.

## Składnia:

    CurDir [(tekst As String)]

## Zwracana wartość:

Ciąg

## Parametry:

Tekst: Dowolny ciąg określający istniejący napęd (na przykład "C" dla pierwszej partycji pierwszego dysku twardego).

Jeśli żaden napęd nie został określony lub nazwa napędu jest ciągiem o zerowej długości (""), instrukcja CurDir zwraca ścieżkę do aktualnego napędu. Jeśli składnia opisu napędu jest nieprawidłowa, napęd nie istnieje lub litera napędu znajduje się za literą zdefiniowaną w instrukcji Lastdrive w pliku CONFIG.SYS, LibreOffice Basic zgłasza błąd.

Funkcja ta nie rozróżnia wielkości liter.

### Kody błędów:

5 Nieprawidłowe wywołanie procedury

68 Urządzenie nie jest dostępne

7 Brak pamięci

51 Błąd wewnętrzny

## Przykład:

    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