IBM Lotus Symphony
|
Służy do zwracania łańcucha typu Variant reprezentującego bieżącą ścieżkę do określonego napędu.
![]() |
Ta instrukcja środowiska wykonawczego nie działa obecnie tak jak określono w dokumencie. |
CurDir [(Tekst As String)]
Łańcuch
Tekst: Dowolne wyrażenie łańcuchowe określające istniejący napęd (na przykład C w przypadku pierwszej partycji pierwszego napędu dysku twardego).
Jeśli nie zostanie określony żaden napęd lub napęd jest łańcuchem o zerowej długości (""), funkcja CurDir zwróci ścieżkę bieżącego napędu. Język Basic programu Lotus® Symphony™ zgłasza błąd, jeśli składnia opisu napędu jest niepoprawna, napęd nie istnieje lub litera napędu jest spoza zakresu zdefiniowanego w pliku CONFIG.SYS za pomocą instrukcji Lastdrive.
W przypadku tej funkcji wielkość liter nie jest rozróżniana.
Sub PrzykladCurDir
Dim sKat1 as String , sKat2 as String
sKat1 = "c:\Test"
sKat2 = "d:\prywatne"
ChDir( sKat1 )
msgbox CurDir
ChDir( sKat2 )
msgbox CurDir
end sub