Ad:

VB.NET Discussion Thread
Unsolved
Views: 3346

Page 1
2
Next

You are currently viewing page 1 of this multi-page discussion thread

Jan 15th, 2009

2008 Warning in my code gethostbyname

Expand Post »

Hi when i use the following code i get a warning
'Public Shared Function GetHostByName(hostName As String) As System.Net.IPHostEntry' is obsolete: 'GetHostByName is obsoleted for this type, please use GetHostEntry instead.

VB.NET Syntax (Toggle Plain Text)
Dim host As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName) 'gets the machines current IP
Dim host As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName) 'gets the machines current IP

now the code works and shows me the ip

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

obsolete attribute means this method is old, and another one is used (GetHostEntry in your case)!
We use this attribute to tell developers who use our libraries that this method no longer use and use an alternative (the new one) + telling the compiler to raise warning or error if it used!
Understood?

Last edited by Ramy Mahrous; Jan 15th, 2009 at 8:45 am.

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

ah yeah but its telling me to use gethostentry but if i use that it displays the ipv6 address and not the normal ipv4 one i need

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

You didn't said I want just IPv4
To get it

vb.net Syntax (Toggle Plain Text)
dim host as IPHostEntry 
            dim hostname  as string 
hostname = "lmlmlaa";
            host = Dns.GetHostEntry(hostname)
For Each ip As IPAddress In host.AddressList
                if ip.AddressFamily == System.Net.Sockets.AddressFamily.InterNetwork 
                    MessageBox.Show(ip.ToString())
        Next
dim host as IPHostEntry 
            dim hostname  as string 
hostname = "lmlmlaa";
            host = Dns.GetHostEntry(hostname)
For Each ip As IPAddress In host.AddressList
                if ip.AddressFamily == System.Net.Sockets.AddressFamily.InterNetwork 
                    MessageBox.Show(ip.ToString())
        Next

I don't know VB.NET, I tried to convert it to VB.NET as much as I can.

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

right i tried this

VB.NET Syntax (Toggle Plain Text)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim myip As String = System.Net.Dns.GetHostAddresses(My.Computer.Name)(1).ToString().Trim
        ComboBox1.Items.Add(myip)
    End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim myip As String = System.Net.Dns.GetHostAddresses(My.Computer.Name)(1).ToString().Trim
        ComboBox1.Items.Add(myip)
    End Sub

but it returen fe80::5efe:192.168.0.19%10 i just wanted 192.168.0.19 how do i get it to show that and not this fe80::5efe:192.168.0.19%10

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

Please concentrate in my answer and try this code, don't get me another pieces of code which I didn't write and say it doesn't work!!!!!!!!!

vb.net Syntax (Toggle Plain Text)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim host as IPHostEntry 
dim hostname  as string 
hostname =  My.Computer.Name
host = Dns.GetHostEntry(hostname)
For Each ip As IPAddress In host.AddressList
if ip.AddressFamily = System.Net.Sockets.AddressFamily.InterNetwork 
ComboBox1.Items.Add(ip)
end if
Next
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim host as IPHostEntry 
dim hostname  as string 
hostname =  My.Computer.Name
host = Dns.GetHostEntry(hostname)
For Each ip As IPAddress In host.AddressList
if ip.AddressFamily = System.Net.Sockets.AddressFamily.InterNetwork 
ComboBox1.Items.Add(ip)
end if
Next

Last edited by Ramy Mahrous; Jan 15th, 2009 at 11:50 am.

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

it returns 3 items,

ipv6 fe80::3894:6b0e:ed6c:7a1c%8
fe80::5efe:192.168.0.19%10
and what i need
192.168.0.19

how do i get it to only retung the last bit?

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

It doesn't return 3 items, seem you don't care! I tried my code before posting it works fine. I won't go on in this thread.
Excuse me!

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

split it by :

Comatose

Team Colleague

Reputation Points: 361

Solved Threads: 214

Taboo Programmer

Offline

2,413 posts
since Dec 2004

Permalink

Jan 15th, 2009

Re: 2008 Warning in my code gethostbyname

excuse me but when i run your code it returns exactly what i posted above, and this is on a vista machine

Last edited by smelf1; Jan 15th, 2009 at 12:14 pm.

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Page 1
2
Next

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in VB.NET Forum Timeline: rotating graphics

Next Thread in VB.NET Forum Timeline: Find Text String and Output Line Numbers Text Falls on

DaniWeb Message

Cancel Changes

User Name
Password