>>>>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