Vbscript 基于文件夹结构移动子文件夹的VB脚本
我对VB脚本非常陌生,我需要VB脚本根据文件夹名称结构移动特定子文件夹(即从“test2”中提取准确的“abc”子文件夹,并需要移动到“test1”),文件夹的准确结构如下所示Vbscript 基于文件夹结构移动子文件夹的VB脚本,vbscript,Vbscript,我对VB脚本非常陌生,我需要VB脚本根据文件夹名称结构移动特定子文件夹(即从“test2”中提取准确的“abc”子文件夹,并需要移动到“test1”),文件夹的准确结构如下所示 E:\test1\42\5423284\4967957\html E:\test1\43\5403284\4567051\html E:\test1\48\7723589\9977457\html E:\test1\47\5428284\2797932\html E:\test1\42\5468284\1487651\
- E:\test1\42\5423284\4967957\html
- E:\test1\43\5403284\4567051\html
- E:\test1\48\7723589\9977457\html
- E:\test1\47\5428284\2797932\html
- E:\test1\42\5468284\1487651\html
- E:\test2\42\5423284\4967957\html\abc
- E:\test2\43\5403284\4567051\html\abc
- E:\test2\48\7723589\9977457\html\abc
- E:\test2\47\5428284\2797932\html\abc
- E:\test2\42\5468284\1487651\html\abc
Public Function processFolder(oFolder)
WScript.Echo "looking at", oFolder.Path
processFolder = True
If "abc" = oFolder.Name Then
WScript.Echo "will move", oFolder.Path
WScript.Echo " to", Replace(oFolder.Path, "\df\", "\mf\")
oFolder.Move Replace(oFolder.Path, "\df\", "\mf\")
processFolder = False
End If
End Function