URGENTE mostrat IP
Publicado por red (16 intervenciones) el 28/02/2007 22:17:26
Saludos.
estoy haciendo una aplicacion vb.net para web, si alguien me puede ayudar. necesito que se vea la IP del cliente.
para ello use dos codigos pero siempre me retorna la IP del servidor donde se corre la aplicaion o no la del cliente que esta al otro lado, osea el que abre el browser.
este es mi codigo.
soluciona A
Dim UserIPAddress
UserIPAddress = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If (UserIPAddress = "" Or UCase(UserIPAddress) = "UNKNOWN") Then
UserIPAddress = Request.ServerVariables("REMOTE_ADDR")
Label3.Text = UserIPAddress
Else
Label3.Text = UserIPAddress
End If
Solucion B
Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
Label19.Text = (CType(h.AddressList.GetValue(0), IPAddress).ToString)
en ambos casos la respuesta es la misma. me muestra la IP del servidor donde esta el codigo, se supone que deberia mostarme la IP del cliente.
Gracias por su ayuda.
estoy haciendo una aplicacion vb.net para web, si alguien me puede ayudar. necesito que se vea la IP del cliente.
para ello use dos codigos pero siempre me retorna la IP del servidor donde se corre la aplicaion o no la del cliente que esta al otro lado, osea el que abre el browser.
este es mi codigo.
soluciona A
Dim UserIPAddress
UserIPAddress = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If (UserIPAddress = "" Or UCase(UserIPAddress) = "UNKNOWN") Then
UserIPAddress = Request.ServerVariables("REMOTE_ADDR")
Label3.Text = UserIPAddress
Else
Label3.Text = UserIPAddress
End If
Solucion B
Dim h As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
Label19.Text = (CType(h.AddressList.GetValue(0), IPAddress).ToString)
en ambos casos la respuesta es la misma. me muestra la IP del servidor donde esta el codigo, se supone que deberia mostarme la IP del cliente.
Gracias por su ayuda.
Valora esta pregunta
0