convert WMI script

[sentmemail]

Hi, how can i convert the below vbscript into .net ? thanks Computer = InputBox("Enter the computer name","Terminate Process", "localhost") PName = InputBox("Enter the name of the process","Terminate Process") Set Processes = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & Computer & "\root\cimv2").ExecQuery("select * from Win32_Process where Name = '" & PName & "'") For each Process in Processes Process.Terminate Next

[Dave Kreskowiak]

The System.Management namesapce has everything you'll need to do this. I wish it was a bit simpler to use though...

Import System.Management
.
.
.
' SELECT * FROM Win32_Process WHERE Name='processName'
Dim query As New SelectQuery("Win32_Process", String.Format("Name='{0}'", processName) )
 
' Initialize an object searcher with this query
Dim searcher As New ManagementObjectSearcher(query)
 
' Define arguments for our WMI method call on each object returned, in our
' case, Nothing (null)
Dim methodArgs() As Object = {Nothing}
 
' Get the resulting collection or Process objects and loop through it
For Each ManagementObject foundProcess In searcher.Get()
Debug.WriteLine( String.Format("Killing process: {0}", foundProcess.Properties("Name") ) )
foundProcess.InvokeMethod("Terminate", Nothing)
Next

RageInTheMachine9532 "...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

[sentmemail]

Wao! seems like i need to rewrite my vbscripts !! is there anyway to import them into VB?

[Dave Kreskowiak]

No. There is no conversion tool to go from VBScript to VB.NET. You'll have to rewrite them by hand. RageInTheMachine9532 "...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome