Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Progression bar while copying files
Message
 
 
To
18/06/2005 15:06:09
Hilmar Zonneveld
Independent Consultant
Cochabamba, Bolivia
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01024640
Message ID:
01024643
Views:
18
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
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform