Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copying files to another directory
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01642909
Message ID:
01642960
Views:
41
>>>>>I have an unknown number of files in directory A
>>>>>I want to copy just the first to another directory B
>>>>>
>>>>>My present code copies them all COPY FILE *.* to c:\citisprint\attachxls\latest.xlsx
>>>>>
>>>>>How do I just copy the first and then delete it so it doesn't get copied again or can I move the first file to directory B? If so how?
>>>>>
>>>>>Thanks
>>>>
>>>>
>>>>How do you know what file is first?
>>>
>>>Say I have 10 files in a directory
>>>
>>>The first one in the directory - I want to move it to another directory process it and then delete it
>>>
>>>The next time I run the program the original 2nd file is now no !
>>>
>>>And so on until I have processed all 10 files
>>>
>>>Colin
>>
>>
>>lcFileName = SYS(2000,"D:\test\*.*")
>>DO WHILE NOT EMPTY(lcFileName)
>>   RENAME ("D:\test\"+lcFileName) TO ("D:\NewFolder\"+lcFileName) && Be careful, this will MOVE file not just copy
>>   lcFileName = SYS(2000,"D:\test\*.*",1)
>>ENDDO
>>
>
>
>I have attemted to run the following code in my live program - the files are in the attach directory but nothing gets moved - waht am I doing wrong?
>
>
>SET DEFAULT TO c:\citisprint\attach
>
>lcFileName = SYS(2000,"c:\citisprint\sttach\*.*")
>DO WHILE NOT EMPTY(lcFileName)
> RENAME (lcFileName) TO ("c:\citisprint\attachxls\"+lcFileName) && Be careful, this will MOVE file not just copy
> lcFileName = SYS(2000,"c:\citisprint\attach\*.*",1)
>ENDDO

You messed paths:
Here SYS(2000,"c:\citisprint\sttach\*.*")
you read "c:\citisprint\sttach\*.*"
BUT few lines after that you read "c:\citisprint\attach\"
lcFileName = SYS(2000,"c:\citisprint\attach\*.*",1)
Also you must put the path when you rename file:
RENAME (path to the file + lcFileName) TO ("c:\citisprint\attachxls\"+lcFileName) && Be careful, this will MOVE file not just copy
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform