VBScript如何使用aqfolder添加/删除文件夹

代码示例：

'''创建文件夹

sub create_a_folder
  Call aqFileSystem.CreateFolder("D:\newfolder") 
end sub

'''删除文件夹

sub delet_a_fFolder()
  Set FolderInf = aqFileSystem.GetFolderInfo("D:\newfolder") 
  Call FolderInf.Delete(true)  
end sub