Como obtener estos datos?

[Fastlane]

IP Cliente =

Código:

IP=Request.ServerVariables("Remote_Addr")

IP Server ?
Puerto server ?
Puerto CLiente ?
Nombre Servidor ?
Nombre Cliente ?

Gracias, Hasta Luego

[JuanRAPerez]

busca informacion completa sobre

Request.ServerVariables

luego algunas cosas no creo que te la de como lo de los puertos....

pero bueno

suerte

[Fastlane]

Por si alguien llegara a necesitarlos:
dim server_ip
server_ip=Me.Request.ServerVariables("LOCAL_ADDR")
me.Txt_ipserver.text=server_ip

Dim cliente_ip
cliente_ip = Me.Request.ServerVariables("REMOTE_ADDR")
Me.Txt_ipcliente.Text = cliente_ip

Dim puertserver
puertserver = Me.Request.ServerVariables("SERVER_PORT")
Me.Txt_pueserver.Text = puertserver

Dim puertcliente
puertcliente = Me.Request.ServerVariables("REMOTE_PORT")
Me.Txt_puecliente.Text = puertcliente

Dim nomserver
nomserver = Me.Request.ServerVariables("SERVER_NAME")
Me.Txt_server.Text = nomserver