Pues ésa es mi pregunta. ¿Es posible añadir una excepción o simplemente desactivar el firewall de windows en visual basic?
Algo asi como la opción que tiene el emule de abrir puertos en firewall interno de windows xp ;)
Gracias de antemano
Para detener el servicio del Firewall:
Shell "cmd.exe /c net stop SharedAccess"
Para añadir una excepción al Firewall:
set ws = CreateObject("WScript.Shell")
ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\SharedAccess\Parameters\FirewallPolicy\StandardProfile\AuthorizedApplications\List\C:\chat.exe","C:\chat.exe:*:Enabled:chat"
El problema del segundo código es que confunde la contrabarra del directorio con una separación para crear una subclave, la solución seria usar las APIs o solucionar este pequeño problema.
Entiendo, pensaré en ello, y si no lo consigo posteo aki mismo.
Gracias, es lo que andaba buscando ;)