PC SOFT

ONLINE HELP
 WINDEV, WEBDEV AND WINDEV MOBILE

Home | Sign in | English EN
  • Use conditions
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReports and QueriesUser code (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Browser code
WINDEV Mobile
AndroidAndroid Widget iPhone/iPadApple WatchUniversal Windows 10 AppWindows Mobile
Others
Stored procedures
Closes an archive.
Versions 15 and later
Android This function is now available for Android applications.
New in version 15
Android This function is now available for Android applications.
Android This function is now available for Android applications.
Versions 17 and later
iPhone/iPad This function is now available for iPhone/iPad applications.
New in version 17
iPhone/iPad This function is now available for iPhone/iPad applications.
iPhone/iPad This function is now available for iPhone/iPad applications.
Versions 18 and later
Android Widget This function is now available in Android Widget mode.
WINDEVWEBDEV - Server codeWindows This function now supports the 7z format.
New in version 18
Android Widget This function is now available in Android Widget mode.
WINDEVWEBDEV - Server codeWindows This function now supports the 7z format.
Android Widget This function is now available in Android Widget mode.
WINDEVWEBDEV - Server codeWindows This function now supports the 7z format.
Versions 19 and later
Universal Windows 10 App This function is now available in Windows Store apps mode.
New in version 19
Universal Windows 10 App This function is now available in Windows Store apps mode.
Universal Windows 10 App This function is now available in Windows Store apps mode.
Versions 21 and later
Universal Windows 10 App This function is now available in Universal Windows 10 App mode.
WINDEVWEBDEV - Server codeWindowsLinuxUniversal Windows 10 AppiPhone/iPad This function now supports the TAR and TGZ (TAR.GZ) formats.
New in version 21
Universal Windows 10 App This function is now available in Universal Windows 10 App mode.
WINDEVWEBDEV - Server codeWindowsLinuxUniversal Windows 10 AppiPhone/iPad This function now supports the TAR and TGZ (TAR.GZ) formats.
Universal Windows 10 App This function is now available in Universal Windows 10 App mode.
WINDEVWEBDEV - Server codeWindowsLinuxUniversal Windows 10 AppiPhone/iPad This function now supports the TAR and TGZ (TAR.GZ) formats.
Example
WINDEVWEBDEV - Server codeWindows MobileUser code (UMC)Ajax
MyArchive is zipArchive
// Open an archive
ResOpenArchive = zipOpen(MyArchive, "C:\Archives\Archive.zip")
// In Windows Mobile:
// ResOpenArchive = zipOpen(MyArchive, "\Archives\Archive.zip")
 
IF ResOpenArchive = 0 THEN
// Processes
...
// Close the archive
zipClose(MyArchive)
END
Syntax
zipClose(<Archive>)
<Archive>: Character string (with quotes) or zipArchive variable
Name of archive to use.
This name can correspond to:
Remarks

Use conditions

  • An archive can be closed only if:
    • The archive is opened. An archive is opened by zipOpen.
    • The archive exists. An archive is created by zipCreate.
  • All the archives will be automatically closed when the application is stopped.
  • A WLanguage error occurs if the archive to close does not exist. The program is stopped.
Reminder:
  • LinuxUniversal Windows 10 AppiPhone/iPad Only the archives in ZIP, TAR and TGZ (TAR.GZ) format are available.
  • Windows MobileAndroidAndroid Widget Java Only the archives in ZIP format are available.
Business / UI classification: Business Logic
Component: wd260zip.dll
See also
Minimum version required
  • Version 9
This page is also available for…
Comments
exemplo fechar zip
https://windevdesenvolvimento.blogspot.com/2021/06/dicas-3348-windev-webdev-mobile-windev.html
https://youtu.be/495RvqL4j20
Esse Video vai estrear as 10:00 do dia 11/06/2021
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)
amarildo
06 Jun. 2021