Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Erase fpx files
Message
From
28/10/2014 18:58:30
 
 
To
28/10/2014 18:23:00
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Miscellaneous
Thread ID:
01610054
Message ID:
01610059
Views:
22
You're welcome!

>that works beautifully Tore - ignore my previous reply. The text file had not yet been created that was all the problem was.
>many thanks for coming to my rescue.
>
>k
>
>>I do something like this
>>
>>Erase ListOfFailedFiles.txt
>>lnFiles = adir(laDir,'*.fxp')
>>for lnX = 1 to lnFiles
>>   Try
>>      Erase (laDir(lnX))
>>   Catch
>>      Strtofile(laDir(lnX),'ListOfFailedFiles.txt',1)
>>   EndTry
>>Endfor
>>If adir(laDir,'ListOfFailedFiles.txt')>0
>>   modi file ListOfFailedFiles.txt
>>Endif
>>
>>>I am trying to set up a refresh of new programs by removing all fxp files in my directory.
>>>Problem is I hit fxp's that are open or in memory.
>>>
>>>Erase C:/mydir/*.FXP
>>>
>>>I am trying an< if error()=1719 > then diverting to an error handler.
>>>Any suggestions as to what i should put into the error handler to bypass the open files would be appreciated.
>>>Or is there an alternate way of doing this outside of manually removing the files
>>>
>>>tnx
>>>k
Previous
Reply
Map
View

Click here to load this message in the networking platform