Sign in to follow this  
Followers 0
au3scr

Firewall

5 posts in this topic

Can i make firwall with autoit?

Simple firewall, that sests ports open/closed


Share this post


Link to post
Share on other sites



I don't think so. Firewalls work closely with your network drivers. You could probably configure a firewall with AutoIt.

Share this post


Link to post
Share on other sites

Thanks a lot u ara nice , U helped me :)


Share this post


Link to post
Share on other sites

#4 ·  Posted (edited)

You can configure the builtin Windows firewall a few different ways. Here is one using "netsh firewall":

http://technet.microsoft.com/en-us/library/bb490617.aspx

http://streetjesus.blogspot.com/2005/07/te...ulation-of.html

  • add allowedprogram
  • set allowedprogram
  • delete allowedprogram
  • set icmpsetting
  • set multicastbroadcastresponse
  • set notifications
  • set logging
  • set opmode
  • add portopening
  • set portopening
  • delete portopening
  • set service
  • show commands
  • reset
Edited by weaponx

Share this post


Link to post
Share on other sites

@all

XP firewall is fully COM enabled, so easy to configure using AU3.

$objFirewall = objCreate("HNetCfg.FwMgr")
$objPolicy = $objFirewall.LocalPolicy.CurrentProfile

$objPolicy.FirewallEnabled = FALSE


; Enabling Remote Admin Port TCP 135
$objAdminSettings = $objPolicy.RemoteAdminSettings
$objAdminSettings.Enabled = TRUE

;Enable Port
Dim $objPort

$objPort = ObjCreate("HNetCfg.FwOpenPort")

$objPort.Name = "DCOM"
$objPort.Port = 888
$objPort.Scope = "NET_FW_SCOPE_LOCAL_SUBNET"
$objPort.Protocol = "NET_FW_IP_PROTOCOL_TCP"
$objPort.Enabled = True

$objProfile.GloballyOpenPorts.Add ($objPort)

Regards

ptrex

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0