代码示例:

'''创建文件夹

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