Check for Internet Connection availability in ASP. Net

Following code Check for Internet Connection availability in ASP. Net

Code :
Partial Class frmChkInternetConnection
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If fnChkInternetConn() Then
            Response.Write("Congrats ! Internet Connection is Available.")
        Else
            Response.Write("Sorry ! Internet Connection is not Available.")
        End If
    End Sub

    Public Function fnChkInternetConn() As Boolean
        Dim objreq As System.Net.HttpWebRequest
        Dim objres As System.Net.HttpWebResponse
        Try
            objreq = CType(System.Net.HttpWebRequest.Create("http://www.google.com"), System.Net.HttpWebRequest)
            objres = CType(objreq.GetResponse(), System.Net.HttpWebResponse)
            objreq.Abort()
            If objres.StatusCode = System.Net.HttpStatusCode.OK Then
                Return True
            End If
        Catch weberrt As System.Net.WebException
            Return False
        Catch except As Exception
            Return False
        End Try
    End Function
End Class

No comments:

Post a Comment