2,462
社区成员
发帖
与我相关
我的任务
分享想u盘插入电脑后自动备案U盘所有文件和文件夹到电脑
想u盘插入电脑后自动备份U盘所有文件和文件夹到电脑，
如下；
set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
on error resume next
do
wscript.sleep 1000
if fso.driveexists("h:\") then
fso.copyfile"h:\*","d:\备份文件\"
fso.copyfolder"h:\*","d:\备份文件\"
wscript.sleep 20000
end if
loop
结果，U盘文件可以可以正常备份，但文件夹无法备份
如下；
set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
on error resume next
do
wscript.sleep 1000
if fso.driveexists("h:\") then
fso.copyfile"h:\*","d:\备份文件\"
fso.copyfolder"h:\*","d:\备份文件\"
wscript.sleep 20000
end if
loop
结果，U盘文件可以可以正常备份，但文件夹无法备份
...全文
请发表友善的回复…
发表回复
milaoshu1020 2019-07-22
- 打赏
- 举报
你可以先把on error resume next去掉,看看它提示什么?
milaoshu1020 2019-07-22
- 打赏
- 举报
我试了你的脚本,我这里文件夹也可以正常备份;
VB业余爱好者 2019-07-22
- 打赏
- 举报
巧用软件让U盘实现自动备份
https://www.upan.cc/technology/use/7901.html
https://www.upan.cc/technology/use/7901.html
脆皮大雪糕 2019-07-19
- 打赏
- 举报
你写了个vbs7*24小时轮询检查硬盘？
强烈建议你找另外的方案。
weixin_45420450 2019-07-18
- 打赏
- 举报
能帮偏写一下吗？谢谢楼上喽
现在还是人类 2019-07-18
- 打赏
- 举报
这种操作可以考虑用dir函数和递归法来处理，如果不想太耗资源可以考虑用多线程来处理
