Windowsのファイヤーウォールの設定を行いたい VB9 or PHP5

質問

VB2008やPHP5でWindowsのファイヤーウォールの設定を行いたいのですが可能でしょうか？
例えばMySQLなら 名前がMySQL ポートは3306と設定し、反映されるものです。通常は手でコントロールパネルから行いますが、自動で反映させたいです。

OSはWindowsXP Windows2003 WindowsVistaのそれぞれできれば幸いです。

回答No.1

osamuy

netshコマンドでルールを構成できますので、それをexecするとか。

参考URL：

http://technet.microsoft.com/ja-jp/library/cc776229(WS.10).aspx