--- In [email protected], Alan Martin <[EMAIL PROTECTED]> wrote:
Hi Alan,
I answered under that thread. That's I think what he wants to do.
Sean
> In another thread, I think someone is asking how (not why)
> to delete empty subfolders.
>
> I think the following may be a good answer
> and it works when tested here
>
> but I don't want to confuse him with one of my horrible mistakes
> so I'd like someone else to check it for me please
> Bruce? Sean? Mockey? Nelson Mandela?
>
>
> command .DelEmptyFolders("c:\windows\temp")
>
> ;;----------- DelEmptyFolders.powerpro ------
>
> file.allfiles(arg(1),"[EMAIL PROTECTED](_file_)",5)
> quit
>
> @sub
> if(not file.listfiles(arg(1),1))
> file.delete(arg(1))
> quit
>
> ;;---------------------------------------
>
> Or, because arg(1) means different things in different places,
> maybe this looks more friendly and less confusing:
>
> ;;-------------------------------------
>
> parentfolder = arg(1)
> file.allfiles(parentfolder,"[EMAIL PROTECTED](_file_)",5)
> quit
>
> @sub
> subfolder = arg(1)
> if(not file.listfiles(subfolder,1))
> file.delete(subfolder)
> quit
>
> ;;-------------------------------------------
------------------------ Yahoo! Groups Sponsor --------------------~-->
Check out the new improvements in Yahoo! Groups email.
http://us.click.yahoo.com/6pRQfA/fOaOAA/yQLSAA/JV_rlB/TM
--------------------------------------------------------------------~->
Attention: PowerPro's Web site has moved: http://www.ppro.org
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/power-pro/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
