how to kill and restart a .exe file

[beyrself]

Public Function RsReDir() 
'function to restart dns redirector - working as of 12-11-08'
Dim plist As Process() = Process.GetProcesses() 
'Get and parse list of processes to plist'
For Each p As Process In plist 
'parse each entry in plist as p process'
Try
If p.MainModule.ModuleName.ToLower() = "dnsredir.exe" Then
p.Kill()
'If module name of process matches "dnsredir.exe" then kill p'
Catch
'seems listing modules for some processes fails, so better ignore any exceptions here
End Try
Next p
ChDir("C:\DNSREDIR\")
'go to C:\DNSREDIR\'
Shell("dnsredir.exe", 1)
'run "dnsredir.exe'
Return Nothing
End Function

Hi, i would like to kill and restart dnsredir.exe file but the code doesnt' seem to work any idea why?

[vekipeki]

Hi, that post is really hard to read. Please remove the unnecessary tags, reformat it, and add CODE tags where necessary.

Check this link: Process.Kill Method (System.Diagnostics). Process.Kill works asyncronously, so you cannot expect your process to end immediatelly.

You should use Process.WaitForExit Method (System.Diagnostics) to block the execution of your program until the process has ended (or until your specified time elapses).

Also, if you catch an exception, it usually means that your process didn't end successfully, so you should handle that situation somehow (at least not restart it?).