Excel isrlgood

Public Function IsURLGood(url As String)
    Dim request As Object
    Set request = CreateObject("WinHttp.WinHttpRequest.5.1")
    On Error GoTo haveError
    With request
        .Open "HEAD", url
        .Send
        IsURLGood = .Status
    End With
    Exit Function
haveError:
    IsURLGood = Err.Description
End Function

Similar codes

0 vote110 views1 answer
List of 2 different iherent classes c#'
C#
0 vote211 views1 answer
Object escape player unity
C#Unity
0 vote110 views1 answer
C# run loop x times
C#
0 vote117 views1 answer
Get path revit linked unload
C#
4 votes160 views1 answer
Unity play particle system
C#Unity
4 votes113 views2 answers
C# Escape sequence
C#
3 votes151 views2 answers
Unity how to add force
C#Unity
1 vote160 views1 answer
Unity3d quaternion add 90 degrees
C#Unity
0 vote122 views1 answer
Web.config customerrors not working
C#
0 vote156 views1 answer
Classe padre figlio c#
C#