Instrução ChDir

Altera o diretório ou disco atual.

Algumas funções de arquivos e de diretório específicos do DOS não são mais fornecidos no LibreOffice, ou suas funcionalidades são limitadas. Por exemplo, o suporte para as funções ChDir, ChDrive e CurDir não é fornecido. Algumas propriedades específicas do DOS não são mais usadas em funções que esperam propriedades de arquivos como parâmetros (por exemplo, para diferenciar arquivos ocultos e arquivos do sistema). Isso garante o maior nível de independência de plataforma para o LibreOffice. Portanto estes recursos estão sujeitos a serem removidos em versões futuras.

A biblioteca ScriptForge do LibreOffice introduz o serviço FileSystem com métodos para tratar arquivos e pastas em scripts do usuário.

Sintaxe:


ChDir Text As String

Parâmetros:

Text: qualquer expressão de cadeia de caracteres que especifique a unidade ou o caminho do diretório.

Se desejar alterar apenas a unidade atual, digite a letra da unidade seguida de dois-pontos.

Códigos de erro:

5 Chamada de procedimento inválida

76 Caminho não encontrado

Exemplo:


  Sub ExampleChDir
      Dim sDir1 As String, sDir2 As String
      sDir1 = "C:\Test"
      sDir2 = "D:\Private"
      ChDir( sDir1 )
      MsgBox CurDir
      ChDir( sDir2 )
      MsgBox CurDir
  End Sub

Serviço ScriptForge.FileSystem

Serviço ScriptForge.TextStream