How to find hidden directory?

[lsakizada]

how to find hidden directory?

And how to set it visible too?

Thanks

[lsakizada]

FindHiddenDirs("C:")
Exit

Func FindHiddenDirs($Path)
    $handle = FileFindFirstFile($Path & "\*")
    While 1
        $file = FileFindNextFile($handle)
        If @error Then ExitLoop
        $attrib = FileGetAttrib($Path & "\" & $file)
        If StringInStr($attrib, "D") = 0 Then ContinueLoop
        FindHiddenDirs($Path & "\" & $file)
        If StringInStr($attrib, "H") = 0 Then ContinueLoop
        ;MsgBox(0, "Hidden Dir", $Path & "\" & $file, 0)
        ConsoleWrite($Path & "\" & $file & @CRLF)
    WEnd
    FileClose($handle)
EndFunc   ;==>FindHiddenDirs

see FileSetAttrib in the help file

Great! realy helped me. Have a best one!