for each $line in diruse("\\flag-fs01\resource", "/* /m /,")

	? $line

next





Function DirUse($Source, optional $options)

	dim $i, $return

	$return = wshpipe('diruse ' + $options + ' ' + $source,1)

	dim $out[ubound($return)-4]

	for $i = 2 to ubound($return)-2

		$out[$i-2] = $return[$i]

	next

	$diruse = $out

endfunction