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

-1 vote193 views2 answers
Git find commits by message
C#
2 votes208 views3 answers
Capitalize c#
C#
0 vote219 views1 answer
Set data annotation in model c#
C#
1 vote212 views1 answer
Unity get scrollbar value
C#Unity
0 vote185 views1 answer
Edit form item from class C#
C#
0 vote272 views1 answer
C# decimal 4 casas decimais
C#
7 votes233 views2 answers
How to instantiate as child unity
C#
1 vote206 views1 answer
Float parse c#
C#
0 vote205 views1 answer
Get picked item xamarin
C#
0 vote182 views3 answers
Calculate distance using latitude and longitude c#
C#