Visual Basic.NET - No me sirve el winsock

Asunto: Ayuda con winsock
Saludos
Tengo un problemilla con winsock ultilizo el winsock para saber la ip:
winsock1.localip hasta hay va bien la cosa el problema es que una vez terminada la aplicacion mi aplicacion se ejecuta nada mas arrancar el ordenador y evidentemete cuando arranca ip local es 127.0.0.1 porque como acaba de arrancar no tiene conexion a internet y cunado me conecto es 80.34.56.246 necesito refrescar el winsock para que cuando ponga localip me devuelva la ultima ip establecida no la primera lo hice con un timer y puse winsock.localip pero sige la primera ip he probadodo cion winsock1.refresc pero no funciona
saludos
no me funciona refrres

Hola

Para saber cual es el ip de la maquina.. solo debes hacer esto:

Dim hostname As String = System.Net.Dns.GetHostName()
System.Net.Dns.GetHostByName(hostname).AddressList(0).ToString()

Y si necesitas usar sockets, te recomiendo entonces que uses los que vienen en el framework, ubicados en el espacio de nombres System.Net.Sockets

Saludos