Função CurDir

Devolve uma cadeia de caracteres variante que representa o caminho atual .

Algumas funções específicas do DOS relacionadas com ficheiros e diretórios já não estão disponíveis no LibreOffice, ou a sua funcionalidade é limitada. Por exemplo, não é fornecido suporte para as funções ChDir, ChDrive e CurDir. Algumas propriedades específicas do DOS já não são utilizadas em funções que esperam propriedades de ficheiros como parâmetros (por exemplo, para diferenciar ficheiros ocultos e ficheiros de sistema). Isto garante o maior nível possível de independência de plataforma para o LibreOffice. Por conseguinte, esta funcionalidade está sujeita a remoção numa versão futura.

A biblioteca ScriptForge do LibreOffice 7.1 introduz o serviço FileSystem, com métodos para gerir ficheiros e pastas em scripts do utilizador.

CurDir [(Text As String)]

Valor de retorno:

Cadeia

Texto: Qualquer expressão de cadeia de caracteres que especifique uma unidade existente, por exemplo, «C» para a primeira partição do primeiro disco rígido. Este parâmetro é utilizado exclusivamente no Windows.

Se não for especificada nenhuma unidade ou se a unidade for uma cadeia de caracteres de comprimento zero (""), CurDir devolve o caminho da unidade atual. O LibreOffice Basic apresenta um erro se a sintaxe da descrição da unidade estiver incorreta ou se a unidade não existir.

Esta função não diferencia maiúsculas de minúsculas.

  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