Kevin ...
translate this to : list directories in N:\ non-recursively (/b is irrelevant I think)
That'd be then :
break on
global $folders[0]
dim $n
$n = dir("n:\")
do
if getfileattr("n:\" + $n) & 16 ;folder
$folders[ubound($folders)] = $n
redim preserve $folders[ubound($folders)+1]
endif
$n = dir()
until $n = "" or @error
if ubound($folders)
redim preserve $folders[ubound($folders)-1]
endif
"Folders in N:\" ?
for each $f in $folders
$f ?
next
get $
_________________________
