Enable XP Firewall

[wobblefoo]

Use that attached file...it takes the parameter "name of your lan connection", with quotes. The default name is Local Area Connection.

To fully automate this vbs you need to either edit it or create your own that runs it and closses the dialogs.

Mine Looks Like

Dim WshShell 
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "%systemdrive%\install\EnableFirewall\firewall.cmd"
WScript.Sleep(5000)
WshShell.AppActivate("Windows Script Host")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WshShell.AppActivate("Windows Script Host")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WshShell.AppActivate("Windows Script Host")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WshShell.AppActivate("Windows Script Host")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WshShell.AppActivate("Windows Script Host")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WshShell.AppActivate("Internet Sharing Configuration")
WScript.Sleep(1000)
WshShell.SendKeys "{ENTER}"
WScript.Quit

The cmd batch file just runs the attached vbs...

@echo off
%systemdrive%\install\EnableFirewall\firewall_enable.vbs "Local Area Connection"

Of course edit these files to suit your directory needs.

Make sure you run these before installing antivirus software or you will get a possible malicous script warning.

firewall_enable.vbs