'URGENT' - Unreachable Host Error -

GURU's,

I have a VB .NET console app (vs 2003), that broadcasts its ID every 5 seconds - and a VB .NET Windows App (vs 2003) that listens for that broadcast.
Now, when I test this via ethernet or D-Link (wi-fi) every thing works fine as long as there is other members on the network.
But when no one else is on the network - I receive the following:
'A Socket Operation Was Attempted To An Unreachable Host.' and the broadcasts stop.
My goal was to have the console app broadcasting its ID whether there was anybody on the network or not - and if no one was there that would be OK - but when someone got into range (wireless) - they would see the console app broadcasting its ID. - Actually I did a range test - and when I moved out of range and then came back into range everything was fine.  Its when I 'shutdown' the Windows App - that the console app generates the error and stops broadcasting. Or if I start the console app - and no one else is on the network.

Could someone please show me the error in my ways - and show me how to achieve my goal.

(Broadcast Code from ConsoleApp)

Private Sub broadCastHTID(ByVal mcastGroup As String, ByVal port As Integer, ByVal message As String)
        Dim ip As IPAddress = IPAddress.Parse(mcastGroup)
        Dim s As Socket = New Socket(AddressFamily.InterNetwork, SocketType.Dgram, ProtocolType.Udp)
        s.SetSocketOption(SocketOptionLevel.IP, SocketOptionName.AddMembership, New MulticastOption(ip))
        s.SetSocketOption(SocketOptionLevel.IP, SocketOptionName.MulticastTimeToLive, 255)
        Dim b As Byte()
        b = Encoding.ASCII.GetBytes(message)
        Dim ipep As IPEndPoint = New IPEndPoint(IPAddress.Parse(mcastGroup), port)
        s.Connect(ipep)
        s.Send(b, b.Length, SocketFlags.None)
        s.Close()
    End Sub

Sub htIDBroadCast()
        Dim hostIP As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
        Dim hostName As System.Net.IPHostEntry = System.Net.Dns.GetHostByAddress(hostIP.AddressList(0))
        Dim trkId As String = hostName.HostName.ToString
        'Broadcast pcID - which is from the config(row 0) and is set to pc (HT device name)
        Try
            '//07-07 Broadcast ID every 5 seconds on port 5000
            Do
                broadCastHTID("255.255.255.255", 5000, pcId) 'for release use ip 255.255.255.255 to broadcast over network
                Thread.Sleep(5000)
                Console.WriteLine("BroadCast Message sent from " + pcID) 'for debug
            Loop
        Catch socketEx As SocketException
            Call handleExc("htIDBroadCast_SocketException", socketEx)
        Catch ex As Exception
            Call handleExc("htCommunications", ex)
           Finally
        End Try
    End Sub

Thanks in advance

MB
mebjenAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
jdeclueConnect With a Mentor Commented:
You are catching the SocketException when it can't open the socket - nothing is there to create the connection with... you just need to handle the exception and return control back to htIDBroadCast() for another try... so when I get the exception I would wait and tehn try again... does that make sense?

J
0
 
mebjenAuthor Commented:
J,

OK - it makes sense - and it works to a point.  When the console app is first started it's broadcasting its ID (lets say ht3234), and the windows app see's the broadcast.  Then I drop the windows app off the network - and the console app nows this and using a goTo line statement the console app starts displaying on the screen "Trying To Connect" -

OK - so now I bring the windows app back on - and the console app sees that it has something to connect with - it begins broadcasting again -

But now the broadcast is 'localhost' not ht3234.

mb
0
 
jdeclueCommented:
Are you running the Windows application on the same machine as the Console App?

J
0
What Kind of Coding Program is Right for You?

There are many ways to learn to code these days. From coding bootcamps like Flatiron School to online courses to totally free beginner resources. The best way to learn to code depends on many factors, but the most important one is you. See what course is best for you.

 
jdeclueCommented:
One other question, I see you calling htIDBroadCast and sending it your pcID, but where are you setting the pcID?

J
0
 
jdeclueCommented:
OK... I think your remark tells me you have a config array, where you are setting static values?

J
0
 
mebjenAuthor Commented:
J,

>> Are you running the Windows application on the same machine as the Console App?

NO -

>> One other question, I see you calling htIDBroadCast and sending it your pcID, but where are you setting the pcID?

        Dim hostIP As System.Net.IPHostEntry = System.Net.Dns.GetHostByName(System.Net.Dns.GetHostName)
        Dim hostName As System.Net.IPHostEntry = System.Net.Dns.GetHostByAddress(hostIP.AddressList(0))
        Dim pcID As String = hostName.HostName.ToString

>> OK... I think your remark tells me you have a config array, where you are setting static values?

In a byte array


MB


0
 
jdeclueCommented:
Ok.. I have to run for a while... if someone else doesn't help with this part I will be back around 2pm Est. time... in the states.

J
0
 
mebjenAuthor Commented:
J,

I have been able to correct the broadCast problem by doing a thread.sleep(500) in the socketException - somehow this is all thats needed, so that when the windows app joins the network again - the console app broadcasts its ID - not 'localHost'.

Thanks for all your help.

MB
0
 
jdeclueCommented:
That is cool, good catch, by letting the thread sleep until you reconnect you arent closing it which is what was causing your problem. The alternative was to reset everything upon reconnection, just as if the app was started up again.

J
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.