How to use vbs to unhide all files in a folder

This article introduces the "how to use vbs to unhide all files in the folder" related knowledge, in the actual case of the operation process, many people will encounter such a dilemma, then let the editor lead you to learn how to deal with these situations! I hope you can read it carefully and be able to achieve something!

The copy code is as follows:

StrComputer = "." Set objWMIService = GetObject ("winmgmts:\\" & strComputer & "\ root\ cimv2") Set FileList = objWMIService.ExecQuery _ ("ASSOCIATORS OF {Win32_Directory.Name='c:\ Scripts'} Where" _ & "ResultClass = CIM_DataFile") Set objFSO = CreateObject ("Scripting.FileSystemObject") For Each objFile In FileList Set objFile = objFSO.GetFile (objFile.Name) If objFile.Attributes AND 2 Then objFile.Attributes = objFile Attributes XOR 2 End If Next "how to unhide all files in a folder with vbs" ends here Thank you for your reading. If you want to know more about the industry, you can follow the website, the editor will output more high-quality practical articles for you!