Hi, I got an extra silver platter and felt generous so here it is 
Have fun with it.
Code:
$type = GetFileAttr ("c:\scripts")
$exists= Exist ("c:\scripts")
;
Select
Case $exists = "1"
?"Found something called scripts."
Select
Case $type <> "16"
Del "c:\scripts"
?"Type is file, deleted file."
MD "c:\scripts"
?"Created scripts directory."
;
Case $type = "16"
?"Type is directory, doing nothing."
EndSelect
;
Case $exists <> "1"
?"Found nothing called scripts"
MD "c:\scripts"
?"Created directory called scripts."
EndSelect
Edited by R2D2 (2003-12-08 11:34 PM)
_________________________
Mart
- Chuck Norris once sold ebay to ebay on ebay.
