Turinys

# CurDir funkcija

Pateikia eilutės variantą, kuris nusako dabartinį kelią arba „Windows“ sistemos nurodytą kelią.

Kai kurios DOS failų ir katalogų funkcijų „%{PRODUCTNAME}“ nebeteikia arba teikia labai ribotai. Pavyzdžiui, palaikymas funkcijos ChDir, ChDrive ir CurDi neteikiamos. Kai kurios DOS specifinės ypatybės nebenaudojamos tose funkcijose, kurioms reikia, kad failo ypatybės būtų parametrai (pavyzdžiui, atskirti paslėptus ir sisteminius failus). Tai užtikrina didžiausią įmanomą platformos „%{PRODUCTNAME}“ nepriklausomumą. Todėl ateityje ši funkcija gali būti pašalinta.

The ScriptForge library in LibreOffice 7.1 introduces the FileSystem service with methods to handle files and folders in user scripts.

### Sintaksė:

    CurDir [(Text As String)]

## Grąžinama reikšmė:

Eilutė

### Parametrai:

Tekstas: Bet koks eilutės reiškinys, nurodantis esamą diską, pvz., C – pirmojo standžiojo disko pirmąjį skaidinį. Šis parametras naudojamas tik „Windows“ sistemoje.

Jei diskas nenurodytas arba jei diskas yra nulinio ilgio eilutė (""), CurDir grąžina dabartinio disko kelią. „LibreOffice Basic“ praneša apie klaidą, jei disko aprašo sintaksė yra neteisinga arba jei disko nėra.

Ši funkcija neskiria didžiųjų ir mažųjų raidžių.

### Klaidos kodai:

5 Neteisingas procedūros iškvietimas

68 Prietaisas nėra pasiekiamas

7 nepakanka atminties

51 vidinė klaida

### Pavyzdys:

      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

Susijusios temos

ScriptForge.FileSystem service

ScriptForge.TextStream service