How to obtain the public IP address of a machine outside the firewall

We have several offices that have a DSL or Cable modem where the IP address
is dynamic and changes often. I created a VB app that obtains the IP address
but it obtains the IP address within the firewall and we need the public IP
address of the machine outside the firewall so we can use Remote Desktop
connection for problem resolution etc.

Here is my current code:
Dim myWorkstation As String = System.Net.Dns.GetHostName()

Dim IPAdress As String =
System.Net.Dns.Resolve(myWorkstation).AddressList( 0).ToString

Dim MachineName As String = Environment.MachineName

How can I obtain the other IP address?

Thanks.

re: How to obtain the public IP address of a machine outside the firewall

Ed:

I have been able to do it with:

Request.ServerVariables.Item("REMOTE_HOST")

In web applications that I have written.

Hope that helps!

Fred

"Ed Willis" <ed_willis@acsi.orgnospam> wrote in message
news:eZAmKqtqDHA.2644@TK2MSFTNGP09.phx.gbl...[color=blue]
> We have several offices that have a DSL or Cable modem where the IP[/color]
address[color=blue]
> is dynamic and changes often. I created a VB app that obtains the IP[/color]
address[color=blue]
> but it obtains the IP address within the firewall and we need the public[/color]
IP[color=blue]
> address of the machine outside the firewall so we can use Remote Desktop
> connection for problem resolution etc.
>
> Here is my current code:
> Dim myWorkstation As String = System.Net.Dns.GetHostName()
>
> Dim IPAdress As String =
> System.Net.Dns.Resolve(myWorkstation).AddressList( 0).ToString
>
> Dim MachineName As String = Environment.MachineName
>
> How can I obtain the other IP address?
>
> Thanks.
>
>
>
>
>
>[/color]

re: How to obtain the public IP address of a machine outside the firewall

How can you do it in a Web Service?

"Fred Nelson" <fred@smartybird.com> wrote in message
news:ui3XswtqDHA.360@TK2MSFTNGP12.phx.gbl...[color=blue]
> Ed:
>
> I have been able to do it with:
>
> Request.ServerVariables.Item("REMOTE_HOST")
>
> In web applications that I have written.
>
> Hope that helps!
>
> Fred
>
> "Ed Willis" <ed_willis@acsi.orgnospam> wrote in message
> news:eZAmKqtqDHA.2644@TK2MSFTNGP09.phx.gbl...[color=green]
> > We have several offices that have a DSL or Cable modem where the IP[/color]
> address[color=green]
> > is dynamic and changes often. I created a VB app that obtains the IP[/color]
> address[color=green]
> > but it obtains the IP address within the firewall and we need the public[/color]
> IP[color=green]
> > address of the machine outside the firewall so we can use Remote Desktop
> > connection for problem resolution etc.
> >
> > Here is my current code:
> > Dim myWorkstation As String = System.Net.Dns.GetHostName()
> >
> > Dim IPAdress As String =
> > System.Net.Dns.Resolve(myWorkstation).AddressList( 0).ToString
> >
> > Dim MachineName As String = Environment.MachineName
> >
> > How can I obtain the other IP address?
> >
> > Thanks.
> >
> >
> >
> >
> >
> >[/color]
>
>[/color]

re: How to obtain the public IP address of a machine outside the firewall

Dim objHttpRequest As HttpRequest

Dim objHttpContext As HttpContext

Dim FirewallIPAddress As String

objHttpContext = HttpContext.Current()

objHttpRequest = objHttpContext.Request

FirewallIPAddress = objHttpRequest.ServerVariables("REMOTE_HOST")

There it is. Just add it to the web service method.

"Ed Willis" <ed_willis@acsi.orgnospam> wrote in message
news:%23r4Z7WwqDHA.2188@TK2MSFTNGP11.phx.gbl...[color=blue]
> How can you do it in a Web Service?
>
> "Fred Nelson" <fred@smartybird.com> wrote in message
> news:ui3XswtqDHA.360@TK2MSFTNGP12.phx.gbl...[color=green]
> > Ed:
> >
> > I have been able to do it with:
> >
> > Request.ServerVariables.Item("REMOTE_HOST")
> >
> > In web applications that I have written.
> >
> > Hope that helps!
> >
> > Fred
> >
> > "Ed Willis" <ed_willis@acsi.orgnospam> wrote in message
> > news:eZAmKqtqDHA.2644@TK2MSFTNGP09.phx.gbl...[color=darkred]
> > > We have several offices that have a DSL or Cable modem where the IP[/color]
> > address[color=darkred]
> > > is dynamic and changes often. I created a VB app that obtains the IP[/color]
> > address[color=darkred]
> > > but it obtains the IP address within the firewall and we need the[/color][/color][/color]
public[color=blue][color=green]
> > IP[color=darkred]
> > > address of the machine outside the firewall so we can use Remote[/color][/color][/color]
Desktop[color=blue][color=green][color=darkred]
> > > connection for problem resolution etc.
> > >
> > > Here is my current code:
> > > Dim myWorkstation As String = System.Net.Dns.GetHostName()
> > >
> > > Dim IPAdress As String =
> > > System.Net.Dns.Resolve(myWorkstation).AddressList( 0).ToString
> > >
> > > Dim MachineName As String = Environment.MachineName
> > >
> > > How can I obtain the other IP address?
> > >
> > > Thanks.
> > >
> > >
> > >
> > >
> > >
> > >[/color]
> >
> >[/color]
>
>[/color]

re: How to obtain the public IP address of a machine outside the firewall

Try this:

<%
Option Explicit

Dim m_strExternalIP
Dim m_strInternalIP

m_strExternalIP = getExternalIP()
m_strInternalIP = Request.ServerVariables("LOCAL_ADDR")

function getExternalIP()
Const m_IP = "http://www.ShowMyIP.com/xml"
Dim objXML
Set objXML = CreateObject("MSXML2.DomDocument")
with objXML
.resolveExternals = true
.async = false
.load(m_IP)
getExternalIP = .documentElement.SelectSingleNode("ip").text
end with
Set objXML = Nothing
end function

%>

This was the only way to get my true IP.

Hope this helps:

Raul Costa
nospan_jrpcosta_at_hotmail_dot_com (Remove nospan_ and replace _at_ with @
and _dot_ with . )