Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
TarCompress
TarCompress

Função: TarCompress

Armazena arquivos e diretórios em um único arquivo no formato TAR (Tape ARchive)

TarCompress ( < aItens>, < cArquivoSaida> ) --> cArquivoTar

 

NomeTipoDescriçãoObrigatórioReferência
aItensVetorIndica os arquivos e diretórios que serão armazenados.X 
cArquivoSaidaCaracterIndica o nome do arquivo que será gerado com a extensão ".tar".X 

 

cArquivoTar
    (caracter)
  • Retorna Em caso de sucesso, retorna o nome do arquivo incluindo o path onde o arquivo no formato TAR foi criado; caso dê erro, retorna uma string em branco ("").
  • Esta função agrupa uma lista de arquivos e/ou diretórios no formato TAR.
  • TarCompress
Essa função
  • trabalha somente com arquivos e diretórios localizados no servidor (a partir do rootPath do ambiente).
  • Caso seja passado algum arquivo no client, é gerada uma exceção com a mensagem: "Only path on server are allowed".
  • <aItens> deve ser um vetor de uma dimensão contendo strings com os nomes dos arquivos e/ou diretórios a serem agrupados. Caso o vetor tenha mais de uma dimensão, é gerada uma exceção com a mensagem "Argument must be an array of one dimension only".
  • Caso algum dos itens de <aItens> não seja do tipo caracter, ou tenha tamanho 0 (zero), ou o arquivo/diretório não exista, a função retorna uma string em branco e não gera o arquivo TAR.
user function exemplo()
local aItens := {}
local tarFile := ""
aAdd( aItens,

#Include 'Protheus.ch'

User Function Exemplo()

Local aItens := {}
Local tarFile := ""  

aAdd( aItens,
"\file1.txt" )
 

aAdd( aItens, "\file2.txt" )
 

aAdd( aItens, "\file3.txt" )
 

aAdd( aItens, "\testdir\folderA" )
 

aAdd( aItens, "\testdir\folderB\file1-folderB.txt" )
 

aAdd( aItens, "\testdir\folderB\file2-folderB.txt" )
 

aAdd( aItens, "\testdir\folderB\file3-folderB.txt" )
 

// cria o arquivo
tar 
 tar
tarFile := tarCompress( aItens, "\testdir\file.tar" )
Return
return
Protheus 10 , TOTVS Application Server 10 , ByYou Application Server