bodro
интересно чем не устраивает
DIR?
Код:
DIR /AD /S /B >test.txt
хотя можно и AutoIT-ом, что-нибудь типа:
Код:
$root="C:"
DirList ($root,"test.txt")
Func DirList ($root,$file)
$search = FileFindFirstFile($root & "\*.*")
While 1
$dir = FileFindNextFile($search)
If @error Then ExitLoop
$dir =$root & "\" & $dir
If FileExists($dir & "\") Then
FileWriteLine($file,$dir)
DirList ($dir,$file)
EndIf
WEnd
FileClose($search)
Return 0
EndFunc
