CurDir Function

Nagbabalik ng variant string na kumakatawan sa kasalukuyang path .

warning

Ang ilang mga function ng file at direktoryo na tukoy sa DOS ay hindi na ibinibigay sa LibreOffice, o ang kanilang function ay limitado lamang. Halimbawa, suporta para sa Sinabi ni ChDir , ChDrive at CurDir hindi ibinigay ang mga function. Ang ilang mga katangiang partikular sa DOS ay hindi na ginagamit sa mga function na umaasa sa mga katangian ng file bilang mga parameter (halimbawa, upang maiba mula sa mga nakatagong file at mga file ng system). Tinitiyak nito ang pinakamataas na posibleng antas ng kalayaan ng platform para sa LibreOffice. Samakatuwid, ang feature na ito ay napapailalim sa pag-aalis sa isang release sa hinaharap.


note

Ang ScriptForge ang library sa LibreOffice 7.1 ay nagpapakilala sa FileSystem serbisyo na may mga pamamaraan upang mahawakan ang mga file at folder sa mga script ng user.


Syntax:


CurDir [(Text As String)]

Ibinalik na halaga:

String

Mga Parameter:

Teksto: Anumang string expression na tumutukoy sa isang umiiral na drive, halimbawa "C" para sa unang partition ng unang hard drive. Ang parameter na ito ay ginagamit lamang sa ilalim ng Windows.

Kung walang drive na tinukoy o kung ang drive ay zero-length string (""), CurDir ibinabalik ang landas para sa kasalukuyang drive. Ang LibreOffice Basic ay nag-uulat ng isang error kung ang syntax ng paglalarawan ng drive ay hindi tama o kung ang drive ay hindi umiiral.

Ang function na ito ay hindi case-sensitive.

Mga error code:

5 Di-wastong procedure call

68 Hindi available ang device

7 Hindi sapat ang memorya

51 Panloob na error

Halimbawa:


  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

Mangyaring suportahan kami!