[TuToRiAl] How to Check if theres any Internet Connection [TuToRiAl]

[Resistance]

Hey guys. I have not posted a tutorial in weeks. So I thought this thread would be very helpful; A lot of VB applications I make need an active internet connection in order to work, so we will use a function to detect whether theres an active internet connection at the moment or not. This can help prevent fatal errors while the application requires
internet when trying to run something when there is no internet connection.

Heres the code, first plug in the Function anywhere between 2 classes as in "Form1_Load and CheckBox1_CheckState."



Function We Are Using:

Code:

Public Function IsConnectionAvailibe() As Boolean
        Dim objURL As New System.Uri("http://192.168.1.1/")

        Dim ObjWebRequest As System.Net.WebRequest
        ObjWebRequest = System.Net.WebRequest.Create(objURL)
        Dim objResp As System.Net.WebResponse

        Try
            objResp = ObjWebRequest.GetResponse
            objResp.Close()
            ObjWebRequest = Nothing
            Return True

        Catch ex As Exception
            objResp = Nothing
            ObjWebRequest = Nothing
            Return False

        End Try
    End Function

Now to manipulate the code a little bit:

Code:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If IsConnectionAvailibe() = True Then 'If there was internet on at the moment the application opened, add statements to enable the application for internet usage.
            Label1.Visible = False
            TextBox2.Enabled = True
            TextBox1.Enabled = True
            Button1.Enabled = True
            Button2.Enabled = True
            Button3.Enabled = True
        ElseIf IsConnectionAvailibe() = False Then 'If there wasn't internet when the application opened, add statements to disable internet using items to prevent errors.
            Label1.Visible = True
            TextBox2.Enabled = False
            TextBox1.Enabled = False
            Button1.Enabled = False
            Button2.Enabled = False
            Button3.Enabled = False
        End If
    End Sub
End Class

Now obviously you may change it from Form1_Load to a BackroundWorker or Timer. Thats just me. Enjoy! Post replies if you have questions!

[Thyonic]

Great code.

Personally, I'd just ping a network using My.Computer.Network.Ping, like google for example, and check the return value. A lot simpler and less code. Regardless, yours is great.

[Break]

Really good code but it could be shorter.

[w00pz]

Thanks for the tutorial
And great code!

[Fragma]

Hell of a lot of code for such a simple task.

[Resistance]

Hell of a lot of code for such a simple task.

Excuse me for living! lol

This is one of the most efficient ways to verify a solid internet connection.

[ven0m]

thanks for the tutorial.
great job.

~ven0m

[Modest]

You should Never use try/catch to work out if something like the internet connection is available, always handle the return value!

[Resistance]

You should Never use try/catch to work out if something like the internet connection is available, always handle the return value!

...No thanks, i'd stick to my piece of code thank you. And there are NO returns to be handled that are displayed, in my awesome code. We use the try, catch ex as exception, and end try. It is my way to go, it is the safest way to go. You only have 5 posts non the less, a true Learner. See ya later alligator.

[BizzyX]

This is alot of code for a simple task ^^ but good job on this bro.