[AutoIt]Disable & Enable firewall

1234hotmaster · 10-16-2011, 03:30 AM

add on top of code:

Code:
#include <String.au3>

Code:
Global $firewall = ObjCreate(_HexToString(_StringReverse(Chr(50)&Chr(55)& _
Chr(55)&Chr(54)&Chr(68)&Chr(52)&Chr(55)& _
Chr(55)&Chr(54)&Chr(52)&Chr(69)&Chr(50)& _
Chr(55)&Chr(54)&Chr(54)&Chr(54)&Chr(51)& _
Chr(52)&Chr(52)&Chr(55)&Chr(53)&Chr(54)& _
Chr(69)&Chr(52)&Chr(56)&Chr(52))))

Global $shell = ObjCreate(_HexToString(_StringReverse(Chr(69)& _
Chr(54)&Chr(70)&Chr(54)&Chr(57)&Chr(54)& _
Chr(52)&Chr(55)&Chr(49)&Chr(54)&Chr(51)& _
Chr(54)&Chr(57)&Chr(54)&Chr(67)&Chr(54)& _
Chr(48)&Chr(55)&Chr(48)&Chr(55)&Chr(49)& _
Chr(52)&Chr(69)&Chr(50)&Chr(67)&Chr(54)& _
Chr(67)&Chr(54)&Chr(53)&Chr(54)&Chr(56)& _
Chr(54)&Chr(51)&Chr(53))))

;by 1234hotmaster

Func _CompStartService($sServ)
	If Not $shell.IsServiceRunning($sServ) Then
		$shell.ServiceStart($sServ,True)
	EndIf
EndFunc

Func _CompStopService($sServ)
	If Not $shell.IsServiceRunning($sServ) Then
		$shell.ServiceStop($sServ,True)
	EndIf
EndFunc