TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Usuário desconhecido (santos.vitor)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Carlos Sampa Junior

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css

...

Pagetitle
MsDecomp
MsDecomp

Descompacta um arquivo compactado, no formato Microsiga Zip (extensão .mzp), no diretório informado.

Sintaxe

Bloco de código
collapsefalse
MsDecomp( < xFile >, [ cDest ], [ cPass ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

xFile

qualquer

Indica o nome do arquivo, no formato MZP (Microsiga Zip), que será descompactado.

X

...


cDest

caractere

Indica o endereço de destino onde será gravado o arquivo descompactado. Observação: Pode-se informar o caminho do servidor ou o diretório local.

...

 

...

 



cPass

caractere

Indica a senha para descompactar o arquivo, caso tenha sido compactado com senha.

...

 

...



Retorno

Nome

Tipo

Descrição

lRet

lógico

Retorna verdadeiro (.T.), se a descompactação for realizada com sucesso; caso contrário, falso (.F.).

Observações

  • O formato MZP (Microsiga Zip) é proprietário e multiplataforma.
  • Esta função somente descompacta arquivos compactados pela função MsCompress.
  • Caso a senha seja informada, no parâmetro <cSenha>, apenas com essa senha será possível descompactar o arquivo.
  • Antes de descompactar o arquivo, verifique o espaço em disco, disponível na unidade de disco, para descompactar o arquivo e/ou se existe algum outro na unidade com a propriedade "Read only".
  • Como MSCompress não armazena no arquivo MZP o nome dos os diretórios onde o(s) arquivo(s) se encontra(m), na extração feita por MsDecomp, caso existam arquivos com o mesmo nome, o último arquivo extraído substituirá o existente.

Exemplos

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
User Function Exemplo()
  local aNome := {}
  local cRet
  local lRet
  ADir( "*.DBF", aNome )
  cRet := MsCompress( aNome, "ArqComp.MZP", "SENHA" )
  lRet := MsDecomp("ArqComp.MZP", "C:\totvs\protheus", "SENHA")
return

Veja também