Tina:
How about:

Local array laIdx(1,5)
Local lncount, i
LnCount = 0
LnCount = adir(laIdx, "*.idx)
If lnCount > 0 then
  For i = 1 to lnCount
     Erase (laIdx(i, 1))
  Endfor
Endif

Regards,

Jack Skelley

Sent from my iPod

On Jul 23, 2010, at 10:13 PM, Tina Currie <[email protected]> wrote:

> Hi everyone,
> 
> 
> 
> This should be a no-brainer, but I'm pregnant so got no brain right now.
> 
> Throughout my app if I need a temporary index then I usually just issue INDE
> ON FIELD TO SYS(3)  - knowing that will give me a whole bunch of .idx files
> to delete when app closes.
> 
> In my shutdown.prg I put:
> 
> 
> 
> if file('*.idx')
> 
>      erase  *.idx
> 
> endi
> 
> 
> 
> but it appears I can't use wildcards (*)  with the file() command.  How do I
> find all these idx files then and get rid of them?
> 
> 
> 
> TIA,
> 
> 
> 
> Tina 
> 
> 
> 
> 
> 
> --- StripMime Report -- processed MIME parts ---
> multipart/alternative
>  text/plain (text body -- kept)
>  text/html
> ---
> 
[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to