

CODE: [Copy to clipboard]VBS复制文件显示进度(效果与楼主提供的图像一样):copy /z win.gho d:\
CODE: [Copy to clipboard][ Last edited by newxso on 2009-7-8 at 20:41 ]Set objShell = CreateObject("Shell.Application")
strFile = "winxpsp3.gho" '被复制文件(可以用通配符,没有路径为当前目录)
strFolder = "D:\" '目标目录
objShell.NameSpace(strFolder).CopyHere strFile & "?", &H0&
| 欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) | Powered by Discuz! 2.5 |