Vbscript 点击这个脚本从SSD我买了二手。这是恶意的吗？

我不假思索地点击了一下，它似乎什么也没做，只是关上了窗户。看着代码，我太傻了，想不出它是做什么的，但我偏执，它在幕后做了些什么

Option Explicit

'On Error Resume Next

Dim strComputer
Dim objWmiService
Dim colMonitoredProcesses
Dim objLatestProcess

Dim colProcesses
Dim objProcess

strComputer = "."

Set objWmiService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2")

Set colProcesses = objWmiService.ExecQuery _
    ("Select * From Win32_Process Where Name = 'explorer.exe'")

For Each objProcess In colProcesses
    objProcess.Terminate
Next

Set colMonitoredProcesses = objWmiService.ExecNotificationQuery _
    ("Select * From __InstanceCreationEvent " _
    & "Within 1 Where TargetInstance Isa 'Win32_Process' " _
    & "And (TargetInstance.Name = 'iexplore.exe' " _
    & "Or TargetInstance.Name = 'notepad.exe')")

Do 

    Set objLatestProcess = _
    colMonitoredProcesses.NextEvent.TargetInstance

    If LCase(objLatestProcess.Name) = "iexplore.exe" Then
        objLatestProcess.Terminate
    End If

Loop

---

看起来可能是某些代码在等待某个进程启动、终止该进程并在看到某个特定进程启动时退出

从本质上说，它似乎只是关闭了记事本和internet explorer进程

下面是微软论坛上的一篇文章，几乎完全是这样的代码

我想你没事

---

以后不要随意点击东西

首先它关闭所有explorer.exe实例这是Windows外壳，基本上是任务栏和桌面。然后，它观察记事本或Internet Explorer是否启动，如果是Internet Explorer，则将其关闭。我不知道为什么它也在检查记事本启动，但什么都没做。

A不要点击随机脚本。B格式驱动器您可以这样做，以避免捕捉到丑陋的东西。此脚本关闭internet explorer，记事本窗口终止进程，因此在某种程度上，这并不好，因为您可能会丢失未保存的数据，但它不是病毒，不会造成任何严重损坏。别再用了