Programmatically set TCIP address?

[NoCoolHandle]

Does anyone know if it is possible to set the TCPIP with code, and or check it with code and if so... how (hints are ok/welcome)

TIA

Rob

 

[Mamosh]

Hi Rob

You said that you needed some hints, well i can tell you about how you can get the IP address from a locan or remote address, and after that you can get to your own question.

'To get a Web address
Dim Index As Integer
Dim IP As IPHostEntry =Dns.GetHostByName ("

http://www.vbcity.com")

Dim IP() AS IPAddress = IP.AddressList
For Index = 0 To IP.GetUpperBound(0)
Console.Write("IP Address {0}: {1} ", Index, IP(Index).ToString)
Next

'To get the Ip of your Local Machin, you get the address from the DNS.
Dim LocalHost As String
Dim Index As Integer
LocalHost = Dns.GetHostName()
Dim IP As IPHostEntry = Dns.GetHostByName(LocalHost)
Dim IP() As IPAddress = IP.AddressList
For Index = 0 To IP.GetUpperBound(0)
IpTextBox.Text("IP Address {0}: {1} ", Index, IP(Index).ToString)
Next

I hope that this help you.

 

[NoCoolHandle]

Thanks!!

Rob