04-05-2010, 05:45 PM
Self explanatory.
Code:
Dim Proc As Process = New Process
Dim top As String = "netsh.exe"
Proc.StartInfo.Arguments = ("firewall set opmode disable")
Proc.StartInfo.FileName = top
Proc.StartInfo.UseShellExecute = False
Proc.StartInfo.RedirectStandardOutput = True
Proc.StartInfo.CreateNoWindow = True
Proc.Start()
Proc.WaitForExit()