Utilisation de unrar.dll (décompression d'un fichier winrar)
Publié : mer. 16/juil./2014 9:48
Inutile de réinventer la roue, ts-soft sur le forum anglais l'a fait pour vous sous la forme d'un module qui utilise unrar.dll.
Un exemple simple de code utilisant cette dll
L'include, cette simple demo ainsi que les dll (32 & 64 bits) se trouvent dans l'archive çi-dessous.
Télécharger UnRAR.zip
Un exemple simple de code utilisant cette dll
Code : Tout sélectionner
XIncludeFile "unrar_module.pbi"
UseModule unrar
Define.s File, Path
File = OpenFileRequester("Selectionner le fichier à décompresser", "", "RAR-Archiv (*.rar)|*.rar", 0)
If file <> ""
Path = PathRequester("Selectionner le dossier de Destination", "")
If Path=""
Path = GetPathPart(File)
EndIf
RARUnpackArchiv(File, Path)
EndIf