SnArF Posted October 14, 2009 Posted October 14, 2009 I wrote a littel script to create a filelist incl. subfolders When I run the script I get an error if the script finds the nethood folder. Does someone know how to solve this? _FileList('', 'c:') Func _FileList($SubDir1, $From) Local $FileFrom = FileFindFirstFile($From & $SubDir1 & '\*.*') While 1 Local $File = FileFindNextFile($FileFrom) If @error Then ExitLoop ;If $File = 'nethood' then ContinueLoop Local $FileName = FileGetLongName($From & $SubDir1 & '\' & $File) ConsoleWrite($FileName & @LF) If StringInStr(FileGetAttrib($FileName), 'D') Then Local $SubDir2 = $SubDir1 & '\' & $File _Filelist($SubDir2, $From) EndIf WEnd EndFunc My scripts: _ConsoleWriteLog | _FileArray2D
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now