Feedback

VB - URL auf Verfügbarkeit prüfen

Veröffentlicht von am 16.10.2006
(2 Bewertungen)
Diese kleine aber nützliche Funktion prüft eine URL ob diese im Internet verfügbar ist. Wenn Ja dann gibt die Funktion ein True zurück
Public Function CheckURL(ByVal URL As String) As Boolean
    Try
        Dim Response As Net.WebResponse = Nothing
        Dim WebReq As Net.HttpWebRequest = Net.HttpWebRequest.Create(URL)
        Response = WebReq.GetResponse
        Response.Close()
        Return True
    Catch ex As Exception
    End Try
End Function
Abgelegt unter URL.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!