IP Address

[Jeremy Martin]

Does anyone know how to get the ip address of your computer, from a nic card, using the new version of visual studio.

Any help would be appreciated
Jeremy

[Cander]

this is an untested conversion of C# to VB

Imports System
Imports System.Net

Dim strHostName As String= Dns.GetHostName 
Dim ipEntry As IPHostEntry = Dns.GetHostByName (strHostName)
Dim IpAddr As IPAddress = ipEntry.AddressList
Dim myIP As String

myIp = IpAddr.ToString

[DevGrp]

That seems to be right Cander, except that IpAddr should be an array since ipEntry.Addresslist returns an array.

It returns all ip address associated with the computer.

I'm trying to figure how to detect the kind of connection of the computer and also the speed.

[Cander]

ahh I see so in C#

the [] is an array declaration vs. VB's ()..ok I got it..that confused me for when I was transferring over the C# code.
Im trying to learn the C# syntax for translation purposes between
it and VB for tims when I may need code to do something in VB, but can only find C# code....like in this situation.

[Nightwalker83]

Originally posted by Jeremy Martin
Does anyone know how to get the ip address of your computer, from a nic card, using the new version of visual studio.

Any help would be appreciated
Jeremy

Which version of vb? 6?

This would be correct then:

text1.text = winsock1.localip

[Jeremy Martin]

I am using the new version of Visual Studio.NET

Jeremy

[Jeremy Martin]

When I tried to code from Cander I get this error message:

Value of type '1-dimensional array of System.Net.IPAddress' cannot be converted to 'System.Net.IPAddress'.

Jeremy

[Cander]

tryu these changes

Imports System
Imports System.Net

Dim strHostName As String= Dns.GetHostName 
Dim ipEntry As IPHostEntry = Dns.GetHostByName (strHostName)
Dim IpAddr() As IPAddress = ipEntry.AddressList
Dim myIP As String

myIp = IpAddr(1).ToString

[DevGrp]

Its really easy. Look at this C# version is below

VB.NET Version
 
Option Explicit On 
Imports System
Imports System.Net
 
Public Class Form1
    Inherits System.Windows.Forms.Form
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim ipAddr() As IPAddress = GetIpAddress()
        Dim i As Int32
 
        For i = 0 To ipAddr.Length - 1
            MessageBox.Show(ipAddr(i).ToString())
        Next
 
    End Sub
 
    Public Function GetIpAddress() As IPAddress()
        Dim ipHostInfo As IPHostEntry = Dns.GetHostByName(Dns.GetHostName())
 
        Dim ip() As IPAddress = ipHostInfo.AddressList  'returns an array of all the ip address associated with computer
 
        Return ip 'returning the ip address
 
    End Function
End Class

This is a fuction that returns an array of ip address

 C# Version

public IPAddress[] GetIpAddress()
{
	IPHostEntry ipHostInfo =  Dns.GetHostByName(Dns.GetHostName());
			
	IPAddress [] ip = ipHostInfo.AddressList;

	return ip;
					
}

This is the calling function

IPAddress []ip = GetIpAddress();

for(int i = 0; i < ip.Length; i++)
{
      netNode.Nodes.Add(ip[i].ToString());		
}

Hope that helps

[Cander]

I was close...was just in a hurry and didint put in the loop..oh and meant (0) not (1)