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 vote270 views1 answer
Calculate relative time in C#
C#
0 vote256 views1 answer
Javas
C#
1 vote207 views1 answer
How to add a list to observablecollection in c#
C#
0 vote248 views1 answer
Celsius to Fahrenheit c#
C#
8 votes223 views2 answers
Scaffold-DbContext
C#
4 votes190 views2 answers
C# remove word from string
C#
0 vote196 views1 answer
Weakreference tryget c#
C#
0 vote196 views1 answer
C# press ctrl and alt
C#
0 vote171 views1 answer
C# int cast error
C#
17 votes241 views3 answers
Unity get list of children
C#Unity