DICAS 3348 - WINDEV WEBDEV MOBILE - Windev Criar zip em cima de varios arquivos de um diretorio - Curso Zip 5

------------ Indicezip

Windev Curso Zip /1 ... Criar/Adicionar/Fechar - ZipCreate/ZipAddFile/ZipClose
DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll
DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile
https://windevdesenvolvimento.blogspot.com/2019/03/dicas-2037-windev-curso-zip-4.html

DICAS 3348 - WINDEV WEBDEV MOBILE - Windev Criar zip em cima de varios arquivos de um diretorio - Curso Zip 5

------------------------------------------------------

https://youtu.be/495RvqL4j20

Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 

email : amarildo.matos@gmail.com

Seja Membro do Canal

https://www.youtube.com/channel/UCQGPHrppG5XKoRbeOIgLJEA/join

Esse Video vai estrear as 10:00 do dia 11/06/2021

DICAS 3348 - WINDEV WEBDEV MOBILE - Windev Criar zip em cima de varios arquivos de um diretorio - Curso Zip 5

https://windevdesenvolvimento.blogspot.com/2021/06/dicas-3348-windev-webdev-mobile-windev.html

https://repository.windev.com/

https://repository.windev.com/resource.awp?file_id=281474976711122;zip-copiar-arquivos-pasta-windev-amarildo

https://help.windev.com/en-US/?3082003&name=zipcreate_function

https://doc.windev.com/en-US/?3082008&name=zipAddFile

https://help.windev.com/en-US/?3082013&name=zipcreateexe_function

https://doc.windev.com/en-US/?3082005&name=zipClose

https://help.windev.com/en-US/?3036058&name=fListFile

https://doc.windev.com/en-US/?3036049

ASSUNTOS

Exemplo: E:\_exemplos_windev_web_mob\windev_amarildo_aula\zip_copiar_arquivos_pasta_windev_v25_amarildo

Vai estar no repositorio windev 

Vamos criar uma windows chamvada zip copiar arquivos 

Vamos criar um botao para criar o zip 

Vamos criar um check box para ver se deseja criar um executavel do zip 

Vamos criar um listbox para ver os arqivos do diretorio 

Vamos fazer o codigo e vamos usar os seguintes comandos 

fExeDir

fListFile

zipCreate

zipAddFile

zipCreateExe

zipClose

--------------- Codigo

sNome_pasta is string=fExeDir()+"\copia\"

sArquivos_retorno is string=fListFile(sNome_pasta+"*.*") // Vamos ver quais arquivos estao nesse diretorio

LIST_arquivos.DeleteAll() // Cria o list box, -: é opcional 

sNome_arquivo_zip is string="arquivo"

zipCreate(sNome_arquivo_zip,fExeDir()+"\"+sNome_arquivo_zip+".zip")

FOR EACH STRING sArquivo_individual OF sArquivos_retorno SEPARATED BY CR 

LIST_arquivos.Add(sArquivo_individual) // adiciona no list box para ver os arquivos é opciona

    zipAddFile(sNome_arquivo_zip,sArquivo_individual,zipDrive)

END

IF CBOX_criar_Executavel=True THEN

NOME_ARQUIVO_eXE is string=fExeDir()+"\"+sNome_arquivo_zip+".exe"

zipCreateExe(sNome_arquivo_zip,NOME_ARQUIVO_eXE,zipCurrentDirectory)

END

zipClose(sNome_arquivo_zip)

---

---

ErpMatos - TgsSistemas

skype:amarildo.matos.informatica

email: amarildo.matos@gmail.com

whats: 51984197742

Youtube: Amarildo Matos

http://www.amarildomatos.com.br

https://groups.google.com/forum/#!forum/amarildowindev

www.windev.com

https://www.pcsoft.fr/webinaires.htm?p=forumpcs

https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp

https://www.windev.com/windev/WD-Express.htm

https://www.windev.com/windevmobile/WM-Express.htm

http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html

---

DICAS 2037 - WINDEV - CURSO ZIP 4 - zipCreateExe

------------ Indicezip

Windev Curso Zip /1 ... Criar/Adicionar/Fechar - ZipCreate/ZipAddFile/ZipClose
DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll
DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile
https://windevdesenvolvimento.blogspot.com/2019/03/dicas-2037-windev-curso-zip-4.html

DICAS 3348 - WINDEV WEBDEV MOBILE - Windev Criar zip em cima de varios arquivos de um diretorio - Curso Zip 5

---

---

---

---

---

DICAS 2037 - WINDEV - CURSO ZIP 4 - zipCreateExe

---

ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br

www.windev.com
https://www.pcsoft.fr/webinaires.htm?p=forumpcs
https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp
https://www.windev.com/windev/WD-Express.htm
https://www.windev.com/windevmobile/WM-Express.htm
https://groups.google.com/forum/#!forum/amarildowindev
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html


=====================================================
BOM DIA,SEJA BEM VINDOS A MAIS UMA VIDEO AULA. ESSA AULA ESTA SENDO GRAVADA NO DIA 07 03 2019. DICA 2037.HOJE VOU MOSTRAR COMO MOSTRAR GERAR UM EXECUTAVEL COMPACTADO EM WINDEV COM zipCreateExe .

GOOD MORNING, WELCOME TO MORE VIDEO AULA. THAT CLASS IS BEING RECORDED ON THE DAY 07 03 2019. TIP 2037.HOJE WILL SHOW HOW TO SHOW GENERATE AN EXECUTABLE COMPACTED IN WINDEV WITH zipCreateExe.

Buenos días, es bienvenido a otro vídeo AULA. ESTA CLASE ESTA SENDO GRABADA EN EL DÍA 07 03 2019. SUGERENCIA 2037.HOJE VO MOSTRAR COMO MOSTRAR GENERAR UN EXECUTABLE COMPACTADO EN WINDEV CON zipCreateExe.

BON MATIN, BIENVENUE À PLUS DE VIDÉO AULA. CETTE CATÉGORIE EST ENREGISTRÉE LE JOUR 07 03 2019. CONSEIL 2037.HOJE MONTRERA COMMENT MONTRER GÉNÉRER UN EXÉCUTABLE COMPACT WINDEV AVEC zipCreateExe.


DICAS 2037 - WINDEV - CURSO ZIP 4 - zipCreateExe

---

https://doc.windev.com/en-US/?3082013&name=zipcreateexe_function

// BTN_CRIAR_EXE_ZIPCREATEEXE

zipCreate("ArquivoZip","C:\temp\Arquivo07032019.zip")
zipAddFile("ArquivoZip","C:\temp\cliente.txt",zipDrive)
zipAddFile("ArquivoZip","C:\temp\empresa.txt",zipDrive)

zipCreateExe("ArquivoZip","c:\temp\Arquivo07032019.exe",zipCurrentDirectory)

---

---

---

---

---

---

---

DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile

---

---

---

DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile

---

www.windev.com
https://www.pcsoft.fr/webinaires.htm?p=forumpcs
https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp
https://www.windev.com/windev/WD-Express.htm
https://www.windev.com/windevmobile/WM-Express.htm
https://groups.google.com/forum/#!forum/amarildowindev
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html
https://doc.windev.com/en-US/?3082044&name=zipOpen
https://doc.windev.com/en-US/?3082031&name=ziplistfile_function

=====================================================
BOM DIA,SEJA BEM VINDOS A MAIS UMA VIDEO AULA. ESSA AULA ESTA SENDO GRAVADA NO DIA 06 03 2019. DICA 2036.HOJE VOU MOSTRAR COMO MOSTRAR O CONTEUDO DO ARQUIVO ZIP OU RAR COM ZIPLISTFILE.

GOOD MORNING, WELCOME TO MORE VIDEO AULA. THIS CLASS IS BEING RECORDED ON 06 03 2019. TIP 2036.HOJE WILL SHOW HOW TO SHOW THE CONTENT OF THE ZIP OR RAR FILE WITH ZIPLISTFILE.

Buenos días, es bienvenido a otro vídeo AULA. ESTA CLASE ESTA SENDO GRABADA EN EL DÍA 06 03 2019. SUGERENCIA 2036.HOJE VUELDO MOSTRAR EL CONTENIDO DEL ARCHIVO ZIP O RAR COM ZIPLISTFILE.

Buenos días, es bienvenido a otro vídeo AULA. ESTA CLASE ESTA SENDO GRABADA EN EL DÍA 06 03 2019. SUGERENCIA 2036.HOJE VUELDO MOSTRAR EL CONTENIDO DEL ARCHIVO ZIP O RAR COM ZIPLISTFILE.


DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile

---

---

---

// BTN DESCOMPACTAR ARQUIVO ZIPOPEN

sBaixar_arquivo is string="c:\temp\teste.rar"

zipOpen("ArquivoRar",sBaixar_arquivo)

ListAdd(LIST_ARQUIVOS,zipListFile("ArquivoRar"))

---

---

---

---

---

---

---

---

---

Windev Curso Zip /1 ... Criar/Adicionar/Fechar - ZipCreate/ZipAddFile/ZipClose
DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll
DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile
https://windevdesenvolvimento.blogspot.com/2019/03/dicas-2037-windev-curso-zip-4.html

---

---

DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll

---

---

---

DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll

---

ErpMatos - TgsSistemas
skype:amarildo.matos.informatica
email: amarildo.matos@gmail.com
whats: 51984197742
Youtube: Amarildo Matos
http://www.amarildomatos.com.br

www.windev.com
https://www.pcsoft.fr/webinaires.htm?p=forumpcs
https://forum.pcsoft.fr/fr-FR/pcsoft.br.windev/page/1.awp
https://www.windev.com/windev/WD-Express.htm
https://www.windev.com/windevmobile/WM-Express.htm
https://groups.google.com/forum/#!forum/amarildowindev
http://windevdesenvolvimento.blogspot.com.br/2017/07/menu-blog.html


=====================================================
BOM DIA,SEJA BEM VINDOS A MAIS UMA VIDEO AULA. ESSA AULA ESTA SENDO GRAVADA NO DIA 05 03 2019. DICA 2035.HOJE VOU MOSTRAR COMO DESCOMPACTAR UM ARQUIVO ZIP OU RAR COM ZIPOPEN E ZIPEXTRACTALL.

GOOD MORNING, WELCOME TO MORE VIDEO AULA. THIS CLASS IS BEING RECORDED ON 05 03 2019. TIP 2035.HOJE WILL SHOW HOW TO DECOMPACT A ZIP OR RAR FILE WITH ZIPOPEN AND ZIPEXTRACTALL.

Buenos días, es bienvenido a otro vídeo AULA. Esta clase se está registrando en DIA 05 03 2019. TIP 2035.HOJE mostrará cómo descomprimir un archivo ZIP RAR O CON ZIPOPEN Y ZIPEXTRACTALL.

BON MATIN, BIENVENUE À PLUS DE VIDÉO AULA. CETTE CATÉGORIE EST ENREGISTRÉE LE 05 03 2019. CONSEIL 2035.HOJE MONTRERA COMMENT DÉCOMPACTER UN FICHIER ZIP OU RAR AVEC ZIPOPEN ET ZIPEXTRACTALL.


DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll

---

https://doc.windev.com/en-US/?3082044&name=zipOpen
https://doc.windev.com/en-US/?3082011&name=zipextractall_function


// BTN DESCOMPACTAR ARQUIVO ZIPOPEN
sBaixar_arquivo is string="c:\temp\teste.rar"
IF fFileExist(sBaixar_arquivo)=True THEN
    zipOpen("ArquivoRar",sBaixar_arquivo)
    zipExtractAll("ArquivoRar","c:\temp\",zipOverwrite)
    Info("Arquivo Descompactado")
ELSE
Info("arquivo nao encontrado") 
END

---

---

---

---

---

---

---

---

---

Windev Curso Zip /1 ... Criar/Adicionar/Fechar - ZipCreate/ZipAddFile/ZipClose
DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll
DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile

---

---

Aula 932 - Windev Zip 1/... - ZipCreate/ZipAddFile/ZipClose

---

---

---

Video Youtube - Se gostou clique aqui para dar um joinha

---

http://doc.windev.com/en-US/search2.awp?q=zipCreate&mode=user&origin=searchbox

http://doc.windev.com/en-US/?1000003082005&name=zipClose_example

http://doc.windev.com/en-US/?1000003082003&name=zipCreate_example

http://doc.windev.com/en-US/?1000003082008&name=zipAddFile_example
_path_nome_zip is string="E:\aleva\Contador_Mandar\Arquivo.zip"
_arquivo_zip is zipArchive
n_cria_zip is int=zipCreate(_arquivo_zip,_path_nome_zip)
nResAddFile is int =0
IF n_cria_zip=0 THEN
    //colocar os arquivos a ser compactados
        s_nome_arquivo is string="E:\aleva\conferencia.txt"   
    //colocar os arquivos a ser compactados
    //adicionando arquivo para zip com diretorio incluido
        nResAddFile= zipAddFile(_arquivo_zip,    s_nome_arquivo, zipDrive)   
    //
    //adicionado arquivo somente
        nResAddFile= zipAddFile(_arquivo_zip,    s_nome_arquivo, zipNone)   
END
zipClose(_arquivo_zip)

---

---

---

---

---

---

---

Windev Curso Zip /1 ... Criar/Adicionar/Fechar - ZipCreate/ZipAddFile/ZipClose
DICAS 2035 - WINDEV - CURSO ZIP 2 - zipOpen - ZipExtractAll
DICAS 2036 - WINDEV - CURSO ZIP 3 - zipListFile
https://windevdesenvolvimento.blogspot.com/2019/03/dicas-2037-windev-curso-zip-4.html

---

---