如果有多个文件,请将整个文件从文件夹批量移动到目标文件夹
正如BIGAL所建议的那样
示例:移动所有acad备份文件*。从拾取的文件夹烘焙到临时文件夹
- (vl-cmdf "shell"
- (strcat "move ""
- (vl-string-right-trim "\" (strcat (acet-ui-pickdir "" "")))
- "\\[color="red"]*.bak[/color]" ""
- (getvar "tempprefix")
- """
- ) ;_ end of strcat
- ) ;_ end of vl-cmdf
-备选方案-
复制粘贴到记事本,另存为(所有文件)“test.vbs”
双击要调用的文件
- CreateObject("Scripting.FileSystemObject").MoveFile "C:\Documents and Settings\XP\My Documents\[color="red"]*.bak[/color]", "c:\temp"
来自msdn的vbs源 |