如何在Scripter Automation中創建目錄

Question

是否可以在Scripter Automation中創建目錄？ 如果是這樣，怎麼樣？

我需要調用ActiveX插件。 在VB中你可以用

My.Computer.FileSystem.CreateDirectory("C:\Documents and Settings\AllUsers 
\Documents\NewDirectory") 

Answer 1

叫什麼你需要創建一個FSO和使用其.CreateFolder方法：

>> Set oFS = CreateObject("Scripting.FileSystemObject") 
>> s = "NewDirectory" 
>> WScript.Echo CStr(oFS.FolderExists(s)) 
>> oFS.CreateFolder s 
>> WScript.Echo CStr(oFS.FolderExists(s)) 
>> 
Falsch 
Wahr 

Answer 2

Ekkehard.Horner

非常感謝，那是什麼我在尋找！

WScript.Echo不需要！

Set FSO = CreateObject("Scripting.FileSystemObject") 
directory = path 
If(FSO.FolderExists(directory) Then 
Else FSO.CreateFolder directory