Finding IP address

[iwdu15]

hi, im making a program that uses the IP address of the computer its on, but
i dont kno how to programmaticly find it.....can anyone point me in the rite
direction? thanks
--
-iwdu15

[Phil G.]

Imports System.Net

Dim HostIP As IPAddress
HostIP = Dns.GetHostByNa me(Dns.GetHostN ame).AddressLis t.GetValue(0)

Rgds, Phil

"iwdu15" <iw****@discuss ions.microsoft. com> wrote in message
news:B6******** *************** ***********@mic rosoft.com...

hi, im making a program that uses the IP address of the computer its on,
but
i dont kno how to programmaticly find it.....can anyone point me in the
rite
direction? thanks
--
-iwdu15

[iwdu15]

awsome thank you

[ThunderMusic]

and if the computer is behind a router, is there a way to know the
public(Internet ) IP?

thanks

"Phil G." <Ph**@nospam.co m> a écrit dans le message de
news:de******** **@nwrdmz01.dmz .ncs.ea.ibs-infra.bt.com...

Imports System.Net

Dim HostIP As IPAddress
HostIP = Dns.GetHostByNa me(Dns.GetHostN ame).AddressLis t.GetValue(0)

Rgds, Phil

"iwdu15" <iw****@discuss ions.microsoft. com> wrote in message
news:B6******** *************** ***********@mic rosoft.com...

hi, im making a program that uses the IP address of the computer its on,
but
i dont kno how to programmaticly find it.....can anyone point me in the
rite
direction? thanks
--
-iwdu15

[Ken Tucker [MVP]]

Hi,

http://www.windowsformsdatagridhelp....f-a311e93c13c3

Ken
-----------------------
"ThunderMus ic" <NO*******@symp atico.caSPAMATA LL> wrote in message
news:e4******** ******@TK2MSFTN GP15.phx.gbl...
and if the computer is behind a router, is there a way to know the
public(Internet ) IP?

thanks

"Phil G." <Ph**@nospam.co m> a écrit dans le message de
news:de******** **@nwrdmz01.dmz .ncs.ea.ibs-infra.bt.com...

Imports System.Net

Dim HostIP As IPAddress
HostIP = Dns.GetHostByNa me(Dns.GetHostN ame).AddressLis t.GetValue(0)

Rgds, Phil

"iwdu15" <iw****@discuss ions.microsoft. com> wrote in message
news:B6******** *************** ***********@mic rosoft.com...

hi, im making a program that uses the IP address of the computer its on,
but
i dont kno how to programmaticly find it.....can anyone point me in the
rite
direction? thanks
--
-iwdu15

[Craig Kelly-Soens www.Xpectworld.com]

Here is the same but in c#

using System.Net;
//
IPHostEntry o = Dns.GetHostByNa me( Dns.GetHostName () );
MessageBox.Show ("Your IP address is : " +o.AddressList[0] );

good luck !

craig kelly-soens - Windows Vista WinFx XAML .Net Evangelist
http://www.XpectWorld.com - customised "super-easy to use" Windows Vista
based software & consultancy

[eSolTec, Inc. 501(c)(3)]

Is there a way to programatically get the router IP address, if the LAN is on
a router?
--
Michael Bragg, President
eSolTec, Inc.
a 501(C)(3) organization
MS Authorized MAR
looking for used laptops for developmentally disabled.
"Ken Tucker [MVP]" wrote:

Hi,

http://www.windowsformsdatagridhelp....f-a311e93c13c3

Ken
-----------------------
"ThunderMus ic" <NO*******@symp atico.caSPAMATA LLwrote in message
news:e4******** ******@TK2MSFTN GP15.phx.gbl...
and if the computer is behind a router, is there a way to know the
public(Internet ) IP?

thanks

"Phil G." <Ph**@nospam.co ma écrit dans le message de
news:de******** **@nwrdmz01.dmz .ncs.ea.ibs-infra.bt.com...

Imports System.Net

Dim HostIP As IPAddress
HostIP = Dns.GetHostByNa me(Dns.GetHostN ame).AddressLis t.GetValue(0)

Rgds, Phil

"iwdu15" <iw****@discuss ions.microsoft. comwrote in message
news:B6******** *************** ***********@mic rosoft.com...

hi, im making a program that uses the IP address of the computer its on,
but
i dont kno how to programmaticly find it.....can anyone point me in the
rite
direction? thanks
--
-iwdu15

[Terry Olsen]

You could get it from WMI.

WIN32_NetworkAd apterConfigurat ion.DefaultIpGa teway
"eSolTec, Inc. 501(c)(3)" <es*****@noemai l.nospamwrote in message
news:9A******** *************** ***********@mic rosoft.com...

Is there a way to programatically get the router IP address, if the LAN is
on
a router?
--
Michael Bragg, President
eSolTec, Inc.
a 501(C)(3) organization
MS Authorized MAR
looking for used laptops for developmentally disabled.
"Ken Tucker [MVP]" wrote:

>Hi,

http://www.windowsformsdatagridhelp....f-a311e93c13c3

Ken
-----------------------
"ThunderMusi c" <NO*******@symp atico.caSPAMATA LLwrote in message
news:e4******* *******@TK2MSFT NGP15.phx.gbl.. .
and if the computer is behind a router, is there a way to know the
public(Interne t) IP?

thanks

"Phil G." <Ph**@nospam.co ma écrit dans le message de
news:de******* ***@nwrdmz01.dm z.ncs.ea.ibs-infra.bt.com...

Imports System.Net

Dim HostIP As IPAddress
HostIP = Dns.GetHostByNa me(Dns.GetHostN ame).AddressLis t.GetValue(0)

Rgds, Phil

"iwdu15" <iw****@discuss ions.microsoft. comwrote in message
news:B6******** *************** ***********@mic rosoft.com...
hi, im making a program that uses the IP address of the computer its
on,
but
i dont kno how to programmaticly find it.....can anyone point me in
the
rite
direction? thanks
--
-iwdu15

[Peter Huang [MSFT]]

Hi

I agree Terry's suggestion, here I provide the code snippet for your
reference.

'NOTE: You need add reference to System.Manageme nt.dll first.
Dim mc As System.Manageme nt.ManagementCl ass
Dim mo As ManagementObjec t
mc = New ManagementClass ("Win32_Network AdapterConfigur ation")
Dim moc As ManagementObjec tCollection = mc.GetInstances ()
For Each mo In moc
If mo.Item("IPEnab led") = True Then
Debug.WriteLine ("Network Adapter MAC address " &
mo.Item("MacAdd ress").ToString ())
Debug.WriteLine ("Gateway(Rount er): ")
Dim ss() As String = mo.Item("Defaul tIpGateway")
For Each s As String In ss
Debug.WriteLine (" " + s)
Next
End If
Next

You may have a try, and if you have other concern, please feel free to let
me know.

Best regards,

Peter Huang

Microsoft Online Community Support
=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====
This posting is provided "AS IS" with no warranties, and confers no rights.

[eSolTec, Inc. 501(c)(3)]

Peter,

Thank you for your code snippet. It is greatly appreciated. Now I'm
wondering how to get the information from the Immediate window into a label
container :) please
--
Michael Bragg, President
eSolTec, Inc.
a 501(C)(3) organization
MS Authorized MAR
looking for used laptops for developmentally disabled.
""Peter Huang" [MSFT]" wrote:

Hi

I agree Terry's suggestion, here I provide the code snippet for your
reference.

'NOTE: You need add reference to System.Manageme nt.dll first.
Dim mc As System.Manageme nt.ManagementCl ass
Dim mo As ManagementObjec t
mc = New ManagementClass ("Win32_Network AdapterConfigur ation")
Dim moc As ManagementObjec tCollection = mc.GetInstances ()
For Each mo In moc
If mo.Item("IPEnab led") = True Then
Debug.WriteLine ("Network Adapter MAC address " &
mo.Item("MacAdd ress").ToString ())
Debug.WriteLine ("Gateway(Rount er): ")
Dim ss() As String = mo.Item("Defaul tIpGateway")
For Each s As String In ss
Debug.WriteLine (" " + s)
Next
End If
Next

You may have a try, and if you have other concern, please feel free to let
me know.

Best regards,

Peter Huang

Microsoft Online Community Support
=============== =============== =============== =====
When responding to posts, please "Reply to Group" via your newsreader so
that others may learn and benefit from your issue.
=============== =============== =============== =====
This posting is provided "AS IS" with no warranties, and confers no rights.