Script de bloqueo de IP/País (Error) [SOLUCIONADO]

[motocros_elche]

Hola a todos, estoy tratando de utilizar un script el cual añade una lista de rangos ip al firewall de Windows pero al ejecutarlo recibo este error del cual no encuentro absolutamente nada buscando: Problem getting a list of current firewall rules, quitting...

He probado a desactivar el firewall incluso ha descargar y activar el idioma ingles por si era algún comando en ingles que no funcionaba bien en Español (como la S en vez de Y para decir si).

Este es el script:
http://johnalvarez.net/?p=1248
Se descarga desde este link:
http://johnalvarez.net/downloads/windows_firewall_script.zip

Se supone que deberían de añadirse unas reglas de entrada al firewall pero no se añade nada.


Lo que quiero hacer básicamente es poder usar ese tipo de formato que tiene el .txt ya que muchas webs dan los rangos de ip's de países en ese mismo formato.

Lo quiero más que nada para bloquear a cierto país desde el cual entran muchos hackers a mi servidor de un juego y también por que no hablan ni en ingles ni en Español y me quitaría un peso de encima previniendo este tipo de usuarios en vez de baneando a tantos. (9/10 de X país con hacks, muy normal no es).

Utilizo Windows Server 2012 Datacenter R2.

Saludos.

[motocros_elche]

¿alguna sugerencia al menos sobre como hacer algo así?.

Gracias.

[HdM]

Hola.

Esto poco tiene que ver con vb classic...

idioma ingles por si era algún comando en ingles que no funcionaba bien en Español

En el script hay un comentario que da la solución al problema que indicas:

{"`nProblem getting a list of current firewall rules, quitting...`n" ; exit }
# Note: If you are getting the above error, try editing the regex pattern two lines above to include the 'Rule Name' in your local language.

De modo que 2 líneas arriba de ese comentario en el script, cambia

Código (dos) [Seleccionar] Expandir

[Rule Name|Regelname|Nome]

por

Código (dos) [Seleccionar] Expandir

[Rule Name|Regelname|Nome|Nombre de regla]

Si no hay más errores diferentes, debería funcionar.

Saludos.

[motocros_elche]

Hola.

Esto poco tiene que ver con vb classic...

En el script hay un comentario que da la solución al problema que indicas:

De modo que 2 líneas arriba de ese comentario en el script, cambia

Código (dos) [Seleccionar] Expandir

[Rule Name|Regelname|Nome]

por

Código (dos) [Seleccionar] Expandir

[Rule Name|Regelname|Nome|Nombre de regla]

Si no hay más errores diferentes, debería funcionar.

Saludos.

Muchísimas gracias, ha funcionado a la perfección, en cuanto a que no tiene que ver mucho con VB pues no sabia muy bien donde poner algo así y pensé que aquí seria donde mejor sabrían solucionarlo.

Saludos.