Tema: Windows Form
Pregunta: Como saber automaticamente mi direccion ip y el host de cualquier puesto atraves de su ip
Respuesta: Código PHP:
''''''''Obtener ip automaticamente de mi host
Dim ip As Net.Dns
Dim nombre_Host As String = ip.GetHostName
Dim este_Host As Net.IPHostEntry = ip.GetHostByName(nombre_Host)
Dim direccion_Ip As String = este_Host.AddressList(0).ToString
Me.TextBox1.Text = direccion_Ip
''''''''''''
Código PHP:
''''funcion para obtener el nombre del host atraves de su IP
Function ObtenerHost(ByVal IP As IPAddress) As String()
Dim miHost As Net.IPHostEntry
miHost = Net.Dns.GetHostByAddress(IP)
ObtenerHost = MiHost.HostName
End Function