0

Windowsマシンで実行されているプロセスを強制終了する短いJavaScriptコードを作成しようとしています(7でプログラムを開発していますが、サーバー2003で本番環境で実行する必要があります)。私は次のコードから始めました:

w = new ActiveXObject("WScript.Shell");
w.run("taskkill.exe /im iexpore.exe");
return true;

ただし、強制終了されるプロセスを渡す必要があります。殺すにはさまざまなものがあり、何を殺すかを決定する別のプログラムがあります。

現在、次のコードがありますが、まだ機能しません。

Dim prcid
Dim check
Dim Inp
Set Inp = WScript.Arguments
check=0
Set objService = GetObject("winmgmts:")

For Each Process In objService.InstancesOf("Win32_process")
  If process.name= "Inp" Then
    prcid=process.processid
    check=1
    Exit For
  End If
Next

If check =0 Then
  WScript.Quit [ExitCode]
End if

For Each process In objService.InstancesOf("Win32_process")
  If process.name= "Inp" Then
    If process.processid=prcid Then
        strComputer = "."
        Set objWMIService = GetObject("winmgmts:" _ 
          & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
        Set colProcessList = objWMIService.ExecQuery _
          ("SELECT * FROM Win32_Process WHERE Name = 'Inp'")
        For Each objProcess in colProcessList
            objProcess.Terminate()
        Next
    End If

    Exit For
  End If
Next
4

2 に答える 2

0

Windows Script Host を使用していると仮定します。

次のように、スクリプトへの引数にアクセスできます。

objArgs = WScript.Arguments;
for (i = 0; i < objArgs.length; i++)
{
   WScript.Echo(objArgs(i));
}

強制終了したいプロセスをパラメーターとしてスクリプトに渡したいと思うでしょう。

T.

于 2012-07-09T19:18:26.993 に答える