@echo off
title Delphi Uygulama Port Acma Araci
echo Portlar aciliyor, lutfen bekleyin...

:: 3050 Portu - Gelen (Inbound) ve Giden (Outbound)
netsh advfirewall firewall add rule name="bx_in" dir=in action=allow protocol=TCP localport=3050-3051 description="Firebird Veritabani Gelen Portu"
netsh advfirewall firewall add rule name="bx_out" dir=out action=allow protocol=TCP localport=3050-3051 description="Firebird Veritabani Giden Portu"

:: 211 Portu - Gelen (Inbound) ve Giden (Outbound)
netsh advfirewall firewall add rule name="bm_in" dir=in action=allow protocol=TCP localport=211 description="Delphi Servis Gelen Portu"
netsh advfirewall firewall add rule name="bm_out" dir=out action=allow protocol=TCP localport=211 description="Delphi Servis Giden Portu"

echo.
echo Islem tamamlandi! 3050 ve 211 nolu portlar TCP protokolü icin acildi.
pause