VB.NET server online status query

Question

0.00/5 (No votes)

See more:

Hello everone

I am having some problems with finding a code
My situation is we have lan partys and have a couple of servers up and running eg. Call of duty 4
Now i want to create a simple program that checks if my server is running on port 28960 if its online then the picturebox turns green and not then red and also i will have a textbox to set the interval to check

So how do i query a port to check if its online or not?

Regards

Posted 11-Jul-14 7:49am

Captain-Price_ZA

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Dave Kreskowiak · Answer 1 · 2014-07-11T12:59:00

You don't. You send a query to the server and the server has to respond. If the server does not have any method you can call to get a response that denotes that it is running, you have to consult the documentation on the server you're running to see if there is any other method you can use to "ping" the server.

Tino Fourie · Answer 2 · 2014-07-13T10:22:00

You can't ping a port because the ping operation does not operate at port level. You can however check to see if it is in use on the local computer or if it is open on the remote computer by means of connecting to the port using either TCP or UDP.

See if remote port is open:

VB

Function CheckPortOpen(ByVal hostname As String, ByVal portnum As Integer) As Boolean

    Dim ipAddr As IPAddress = CType(Dns.GetHostAddresses(hostname)(0), IPAddress)

    Try
        Dim sock As Socket = New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
        Console.WriteLine("Testing " & hostname & ":" & portnum)
        'Open connection to host
        sock.Connect(ipAddr, portnum)
        If (sock.Connected = True) Then
            sock.Close()
            sock = Nothing
            Return True
       End If

    Catch sex As SocketException
        If sex.ErrorCode = 10061 Then
            Return False
        Else
            Return Nothing
        End If
    End Try
End Function

VB.NET server online status query

2 solutions

Solution 1

Solution 2

Add your solution here

Preview 0