bueno yo uso VB 2008 por motivos los cuales no voy a mencionar.

pero la verdad la mas usada según por las guías y ejemplos que se consiguen en internet es VB 2010 aunque hay mejore versiones actuales mas fáciles de usar.

mi recomendación para ti es que uses VB 2010 . aunque es mas fácil programar en
versiones mas nuevas, todo depende de ti.

        . mierrrrrrrr.      todo eso  lo creaste tu  ,   la verdad me has dejado
 impresionado .  creo que yo nunca podría hacer algo así. 

gracias de verdad por el code trabaja bien y es rápido. estoy en sorprendido.    .

                               Gracias Elektro me fue de gran ayuda.

no entiendo por que te complicas la vida .

@echo off
netsh wlan set hostednetwork mode=allow ssid=(NOMBRE DE RED) key=(clave)
netsh wlan start hostednetwork

Aqui esta tal vez tu problema :

Vamos a Centro de Conexiones y Redes en el Panel de Control, le damos clic derecho a la conexión que utilizamos para conectarnos a Internet  y en compartir Clic sobre la pestaña de Uso Compartido y activaremos la casilla de:
Permitir que los usuarios de otras redes se conecten a través de la conexión a Internet de este equipo
y le indicamos la red que hemos creado

seguramente no tienes la pestaña marcada, ese es el problema.

                                          Saludos y comenta si te sirvio 

en batch si se puede obtener la ip pero no se puede enviar.

code para obtener la ip.

@echo off
ipconfig >> ip.txt
pause

Si quieres enviarla tienes que crear un vbs:

set objcdo=createobject("cdo.message")
objcdo.subject="Prueba de envío"
objcdo.from="direccionmail"
objcdo.to="maildestinatario"
objcdo.textbody="Este es el texto del mail"
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "direccionsmtp"
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = puertosmtp
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 30
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "direccionmail"
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "contraseña"
objcdo.configuration.fields.item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1
objcdo.configuration.fields.update
objcdo.send

si quieres enviar el txt que tiene la ip pon:

objcdo.addattachment("c:\miarchivo.txt")

SI QUIERES OBTENER LA IP Y ENVIARLA SIN PROBLEMAS APRENDE VB.NET O VB6


PD:puedes enviar la ip solo con el batch y con una herramienta comandline llamada zeta uploader.  https://www.zeta-uploader.com/zetauploader-setup.exe

Mis respetos al creador del nRansomware. 

si yo tuviera los conocimientos requerido parara hacer un Ransomware , crearía lo mismo. jajaja. 

muy bueno tu code , srWhiteSkull 
pero no mestra los txt en pantalla. solo mustra el numero de ellos.

bueno , simplifique el code que puse arriba .

Enumera , muestra y cuenta los txt.

@echo off & title Contador de Archivos & set a=0 & color a & :by **Aincrad**
      echo/ & dir /b *.txt | findstr /n ".txt$" & echo/
                                        (for %%x in (*.txt) do set /a a+=1) 
      echo/ & echo/ & echo      Archivos txt encontrados %a% & echo/
pause  

                                       Comenten

si tu pregunta se refiere a cual es mas optimo?

la respuesta VB.NET. Ya que te permite programar en otros lenguajes también.
y tiene muchas posibilidades.

la única ventaja que le veo a VB6 es que el lenguaje es prácticamente lo mismo que
un vbs , solo le cambias algunas cositas y ya. y por eso aprender a programar en VB6 es realmente fácil .


te recomiendo definitivamente con VB.NET.

me alegro que te haya servido .  
          espero que no sea mucha molestia pero, podrías participar en la encuesta?

link:

http://foro.elhacker.net/programacion_general/encuesta_cual_lenguaje_es_el_mas_usado_en_el_foro_del_2192017_al_28092017-t474790.0.html

hola a todos los de el foro , en esta encuesta se mostrara cual lenguaje de programacion es el mas usado por los de el foro .

Instrucciones :

*La duración de esta encuesta es de 1 semana.

*se pondrá una lista de lenguajes  a elegir.

*Para votar , comente su/sus lenguajes preferidos .

*Si su lenguaje no se encuentra en esta lista, comentelo en color rojo.  

*Al finalizar la duración de esta encuesta se mostrara la una gráfica con los resultados.

-------------------------------------------------------------------------------------------
                                               lenguajes

  
    
    
PD: la encuesta finaliza dentro de una semana , con mi voto.

el problema es que estas repitiendo los valores .

ejemplo:

:descifrar
cls
echo [+]______________________________________________________________[+]
echo [+]                   *1.Descifrar                               [+]
echo [+]______________________________________________________________[+]
echo [+]______________________________________________________________[+]
echo/
echo/
echo/
set /p palabra=Escriba los numeros que quieras descifrar:
set "var23=%palabra%"
set "resultado=%var23:7=a%"
set "resultado=%resultado:009=b%"
set "resultado=%resultado:004=c%"
set "resultado=%resultado:2=d%"
set "resultado=%resultado:007=e%"
set "resultado=%resultado:03=f%"
set "resultado=%resultado:001=g%"
set "resultado=%resultado:3=h%"
set "resultado=%resultado:01=i%"
set "resultado=%resultado:05=j%"
set "resultado=%resultado:5=k%"
set "resultado=%resultado:002=l%"
set "resultado=%resultado:6=m%"
set "resultado=%resultado:9=n%"
set "resultado=%resultado:008=ñ%"
set "resultado=%resultado:06=o%"
set "resultado=%resultado:003=p%"
set "resultado=%resultado:04=q%"
set "resultado=%resultado:08=r%"
set "resultado=%resultado:02=s%"
set "resultado=%resultado:09=t%"
set "resultado=%resultado:07=u%"
set "resultado=%resultado:8=v%"
set "resultado=%resultado:006=w%"
set "resultado=%resultado:1=x%"
set "resultado=%resultado:4=y%"
set "resultado=%resultado:005=z%"
 

006 y 06 es igual al 6 ,    ya que el 0 a la izquierda es nulo.

tu pones 006 o 06 pero la cmd lo lee como 6 osea repites los valoras.

ejuemplo:

06=o  |  006=w |  6=m  |  en verdad estas diciendo  a la cmd que las letras

o , w  , m   son 6 .     ese es el error    .

como lo corrigo?

solo cambia las cifras y asegúrate que no sean iguales numeros. ya que 006 , 06 es lo mismo que 6.