VBS 文件夹处理

上一篇 / 下一篇  2011-04-13 13:03:36 / 个人分类:其他

1:创建folder

方法一:CreateFolder方法:创建文件夹
object.CreateFolder(foldername)
object:为FileSystemObject 对象的名称。
eg:
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.CreateFolder("c:\New Folder")

方法二:AddFolders方法:向 Folders 集合添加新 Folder。
object. Add(folderName)
object应为 Folders 集合的名称。
eg:
  Dim fso, f, fc, nf
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.GetFolder("D:\")
  Set fc = f.SubFolders
  If folderName <> "" Then
    Set nf = fc.Add(folderName)
  Else
    Set nf = fc.Add("New Folder")
  End If
注意:SubFolders属性:返回文件夹中所有子文件组成的folders集合

2:复制
Folder对象的copy方法:将指定的文件或文件夹从某位置复制到另一位置
FileSystemObject对象的CopyFolder方法:将文件夹从某位置递归复制到另一位置,可以复制多个文件夹
object.copy destination[,overwrite]
eg:
Dim fso, MyFolder
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFolder=fso.CreateFolder("D:\test")
MyFolder.Copy "C:\",True

object.CopyFolder source, destination[, overwrite]
eg:
Dim fso
Set fso=CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "D:\1\*","C:\",True

3:删除
Folder对象的Delet方法:删除指定的文件或文件夹。
object.Delete force
FileSystemObject对象的DeleteFolder方法:删除指定的文件夹和其中的内容。
object.DeleteFolder folderspec[, force]

4:移动
Folder对象的move方法:将指定的文件或文件夹从某位置移动到另一位置。
object.Move destination
FileSystemObject的moveFolder方法:将一个或多个文件夹从某位置移动到另一位置。
object.MoveFolder source, destination

其他命令:
GetTempName:返回随机生成的临时文件或文件夹的名称,用于执行要求临时文件或文件夹的操作。
object.GetTempName
GetSpecialFolder 方法:返回指定的特殊文件夹。
object.GetSpecialFolder(folderspec)
GetParentFolderName 方法:返回字符串,该字符串包含指定的路径中最后一个文件或文件夹的父文件夹。
object.GetParentFolderName(path)
GetFolder 方法:返回与指定的路径中某文件夹相应的 Folder 对象。
object.GetFolder(folderspec)
GetBaseName 方法:返回字符串,其中包含文件的基本名 (不带扩展名), 或者提供的路径说明中的文件夹。
object.GetBaseName(path)


TAG:

 

评分:0

我来说两句

srialy

srialy

走走停停,删删剪剪,指尖的跳动总是来不及,如此纠结的青春

日历

« 2024-05-07  
   1234
567891011
12131415161718
19202122232425
262728293031 

数据统计

  • 访问量: 18405
  • 日志数: 20
  • 建立时间: 2010-07-02
  • 更新时间: 2017-02-21

RSS订阅

Open Toolbar