如何在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