想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盤檔案可以可以正常備份，但檔案夾無法備份
uj5u.com熱心網友回復：
這種操作可以考慮用dir函式和遞回法來處理，如果不想太耗資源可以考慮用多執行緒來處理uj5u.com熱心網友回復：
能幫偏寫一下嗎？謝謝樓上嘍uj5u.com熱心網友回復：
你寫了個vbs7*24小時輪詢檢查硬碟？強烈建議你找另外的方案。
uj5u.com熱心網友回復：
巧用軟體讓U盤實作自動備份https://www.upan.cc/technology/use/7901.html
uj5u.com熱心網友回復：
我試了你的腳本,我這里檔案夾也可以正常備份;uj5u.com熱心網友回復：
你可以先把on error resume next去掉,看看它提示什么?轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/26844.html
標籤：VBA
下一篇：使用VBA網抓智聯招聘的資料