Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Zip files
Message
 
À
29/03/2022 10:48:58
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Divers
Thread ID:
01684018
Message ID:
01684020
Vues:
62
>Hello all,
>
>I have this code to zip files
>
>cFileZip = "C:\temp2\D401001F.ZIP"
>cSource = "c:\temp1\"
>strtofile(chr(0x50)+chr(0x4B)+chr(0x05)+chr(0x06)+replicate(chr(0),18),cFileZip) && Créer un fichier zip
>o=CREATEOBJECT("shell.application")
>FOR EACH ofile IN o.NameSpace(cSource).items
> o.NameSpace(cFileZip).copyhere(ofile)
>ENDFOR
>
>I would like to have the possibility to pick one by one, the files that should go in my zip file.
>
>Can I modify that code or do I need to do it another way? If another way you can provide code?

Just do it before this code,
Copy only needed files in C:\TEMP1 folder
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform