set filesystem = CreateObject("Scripting.FileSystemObject")
filesystem.CreateFolder("C:\test")
MsgBox("Created directory C:\test")
filesystem.DeleteFolder("C:\test")
MsgBox("Deleted directory C.\test")