Guest User

Untitled

a guest
Dec 4th, 2012
220
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. #Include, %A_ScriptDir%\ELP.ahk
  2.  
  3. FPath := "C:\Data"
  4. ConvertedFiles := 0
  5.  
  6. Loop
  7. {
  8. File := ELP_LoopFilePattern(FPath "\*.*", 1, 1, FileInformation)
  9.  
  10. If (!File)
  11. Break
  12.  
  13. If (InStr(ELP_FileGetAttributesFromFI(FileInformation), "H"))
  14. {
  15. ELP_FileSetAttributes("-H", File, 0, 0, 0)
  16. ConvertedFiles ++
  17. }
  18. }
  19.  
  20. MsgBox Finished removing hidden on all files in %FPath%`n`n%ConvertedFiles% files unhidden.
Advertisement
Add Comment
Please, Sign In to add comment