Javier:  If you notice in Paul's original syntax, he's using the DOS delete 
command to delete files in ALL the subdirectories of a root directory.  That's 
why I didn't respond to him cuz I have no idea how you could construct a 
"regular" delete command that would reach down subdirectory levels.

Karen

 

 

 

-----Original Message-----
From: Javier Valencia <[email protected]>
To: RBASE-L Mailing List <[email protected]>
Sent: Fri, Jun 19, 2015 8:57 pm
Subject: [RBASE-L] - RE: How to Globally Delete Files from Subdirectories


Paul,

In my command file I use the following command to get rid of all the
temporary files created when the last user logs out:

SET VAR vconnections
=(CVAL('CONNECTIONS'))
SET ERROR MESSAGE 2077 OFF
IF vconnections = 1 THEN
  
DEL *.$$$
ENDIF
SET ERROR MESSAGE 2077 ON

As far as I know it works
correctly. If you have blanks in your path, you might try building up the
variable with the path and criteria and using the ampersand:

SET VAR vcommand
= ('D:\CAD\*.bak ')
DEL &vcommand

Javier,

Javier Valencia, PE
O:
913-829-0888
H: 913-397-9605
C: 913-915-3137
-----Original
Message-----
From: [email protected] [mailto:[email protected]] On Behalf Of
Paul Buckley
Sent: Friday, June 19, 2015 10:43 AM
To: RBASE-L Mailing
List
Subject: [RBASE-L] - How to Globally Delete Files from
Subdirectories

Good Afternoon,

I'm using the latest build of eXtreme 9.5
(64) and I've got a compiled application that is not working correctly in one
spot. I am trying to delete all the BAK files in all the subdirectories of a
folder. The following worked for quite a while and now appears to be not
working:

SET VAR vdblquote = (CHAR(34))
SET VAR vcommand = ('zip cmd /c' &
'DEL' & .vdblquote + 'D:\CAD\*.bak /s /q' + .vdblquote) &vcommand

Any blues
clues as to where to start looking or what to do differently?

TIA,
Paul
Buckley



 

Reply via email to