[REBOL] Re: Recursive directory read/delete
From: al:bri:xtra at: 23-Apr-2001 20:33
Andrew Martin wrote:
> Anyone got a recursive directory deleter written?
Thanks everyone for their solutions. They were very helpful. Here's my
solution to the problem:
Delete!: make object! [
_Delete: get 'delete
set 'Delete func [
"Deletes the specified file(s)."
Target [file! url!] "The file to delete."
/Any "Allow wild cards."
if exists? Target [
either Any [
if dir? Target [
foreach File read Target [
ICQ: 26227169 http://members.nbci.com/AndrewMartin/