[VB.NET][SNP] Stop Firewall

 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()  

Turn off the firewall, by executing this code :)