Question

我是vbscript的新手，但我需要编写一个vbscript来创建一个新目录并将其设置为隐藏... 现在我希望它不应该在用户搜索隐藏文件夹时显示。有人可以帮助我如何实现这一目标？这是我的小代码

Dim objFSO, objFolder, strDiretory, 

strDirectory = "E:\logs"

Set objFSO = CreateObject("Scripting.FileSystemObject")




      Set objFolder = objFSO.CreateFolder(strDirectory)

   Set objFolder = objFSO.getFolder(strDirectory)
   objFolder.Attributes = 1

Answer 1

如果我没记错，隐藏文件夹使用的属性为2而不是1.请尝试使用以下代码代替您的属性来设置属性：

If objFolder.Attributes = objFolder.Attributes AND 2 Then
    objFolder.Attributes = objFolder.Attributes XOR 2
End If

如何防止隐藏文件夹被搜索？

1 个答案: