[Sapientia]

Tutorial #3 - Check For Internet Connection

1. Open Visual Basic, name your project whatever.

2. Add: Label, Button.

[img]http://speedcap.net/img/fac064aefa9a848d534f05f35d0e1e20/4f4de67b.png[/img]

3. Double Click The Button

4. Write:

Code

Dim WebClient As New Net.WebClient 'Declare The WebClient
        Label1.Text = WebClient.DownloadString("http://www.pastn.com/index.php") 'Download the ip string from my site.
        If Label1.Text = "" Then
            MsgBox("No Internet Connection!", MsgBoxStyle.Information) 'Error if no connection
        Else
            MsgBox("Internet Connection Available!", MsgBoxStyle.Information) 'Success if connection!
        End If

Debug, click the button and you should get:

[img]http://speedcap.net/img/fac064aefa9a848d534f05f35d0e1e20/200285cd.png[/img]

[Furious`]

That's totaly dumb , dumbest snippet ever

Code

Dim IsConnected = True
  Try
    Dim HE As System.Net.IPHostEntry
    HE = System.Net.Dns.GetHostEntry("www.google.com")
  Catch ex As Exception
    IsConnected = False
  End Try

[Blizzard]

Let me chck this out thoughh/ thnc

[revtorus]

there's also :

Code

If My.Computer.Network.IsAvailable = True Then MsgBox("Connected") Else MsgBox("Not Connected")

[Dєαtђ]

Here also

Code

Public Function Connection() As Boolean
  Dim sitetocheck As New System.Uri("http://www.google.com/")
  Dim checkrequest As System.Net.WebRequest
  checkrequest = System.Net.WebRequest.Create(sitetocheck)
  Dim objResp As System.Net.WebResponse
  Try
    objResp = checkrequest.GetResponse
    objResp.Close()
    checkrequest = Nothing
    Return True
  Catch x As Exception
    Return False
  End Try
    End Function

And then use the function in anywhere like this

Code

If Connection() = True Then
    MsgBox("Network connection okey")
  Else
    MsgBox("Networks connection not okey")
End If

[NinjaxDGx]

Good simple tutorial ryan :) make some more.

[IsraX0r]

there's also :

Code

If My.Computer.Network.IsAvailable = True Then MsgBox("Connected") Else MsgBox("Not Connected")

I haven't tested it out but wouldn't it just check if the LAN / WLAN is available?

[HaXoR-]

This is just dumb because if there is no internet connection and our application tries to download the string from the .txt file, probably it will give error.

Regards,
HaXoR-

[Sapientia]

No its not dumb, because when it tries to download it then it will give you "" which means no ip because you are offline.

[Ethereal]

No its not dumb, because when it tries to download it then it will give you "" which means no ip because you are offline.

It is dumb, because there are far more efficient ways.

[Sapientia]

Thats fine, and i was showing one way you could do this.

[Ethereal]

Thats fine, and i was showing one way you could do this.

If you're going to post an example, make sure its a good one.

[CyberFudger]

I think its a pretty good snippet (Im a beginner)
he didnt say it was ment to be the best way of doing it.
thanks OP :)

[Artisanal]

Using labels ? 😶
There are shorter and better methods ...

[4RG0S]

You could also do a Fuction wich Pings something :)