The following code illustrates how to use the CreateFolder method to create a folder.
JScript
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateFolder("c:\\new folder");
VBScript
Function CreateTheFolder
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateFolder("c:\New Folder")
CreateFolderDemo = f.Path
End Function
PowerBASIC
FUNCTION CreateTheFolder () AS STRING
LOCAL fso AS IFileSystem
LOCAL f AS IFolder
fso = NEWCOM ("Scripting.FileSystemObject")
f = fso.CreateFolder(UCODE$("c:\New Folder"))
FUNCTION = ACODE$(f.Path)
END FUNCTION