Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Progression bar while copying files
Message
 
À
18/06/2005 15:06:09
Hilmar Zonneveld
Independent Consultant
Cochabamba, Bolivie
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01024640
Message ID:
01024643
Vues:
17
Dear Hilmar

I have Mike's code below
But I don't have a clue on how to display a progress
bar as you've said.
Also this function looks nice, but there's something wrong
as it does not work


DECLARE INTEGER CopyFile IN kernel32;
STRING lpExistingFileName,;
STRING lpNewFileName,;
INTEGER bFailIfExists

cd c:\backup
nCount = ADIR(myArray)
for i = 1 to nCount
lcFilename = myArray[i,1]
lcFilename = 'c:\backup\'+lcFilename
lcNewfile = 'c:\newdir'+lcFilename
CopyFile (lcFilename, lcNewfile, 0)
endfor
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform