2013-03-17 33 views
0

我是新来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 
+2

“隐“表示默认情况下不显示。这并不意味着它找不到。请退后一步,描述您尝试解决的实际问题,而不是您认为的解决方案。为什么用户不应该找到该文件夹​​? – 2013-03-17 21:26:07

+0

我只是想了解病毒等我如何使用这样的选项采用不同的病毒和木马等......只是为了找到一些方法来追踪他们... – Cukoo 2013-03-19 03:49:36

回答

0

如果我记得没错,隐藏的文件夹使用的2属性,而不是1尝试在地方你的下面的代码来设置属性:

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

是啊我用了2我错误地张贴1在这里。 ...但窗口显示thz隐藏文件夹,如果搜索隐藏文件夹....我想阻止它可见.... – Cukoo 2013-03-17 19:26:10

+1

我不认为你能够做到这一点,如果你明确告诉Windows做一个搜索隐藏的文件夹。 – David 2013-03-17 19:33:01

+0

嗯是的我正在寻找它还没有发现任何东西呢....有可能是另一种方式?? – Cukoo 2013-03-17 19:37:18