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

10 votes175 views4 answers
C# last char in string
C#
5 votes193 views6 answers
Shuffle array c#
C#
0 vote157 views1 answer
C# scrape html document
C#
37 votes157 views2 answers
Unity log
C#
1 vote157 views1 answer
Unity Rotate around the real center
C#
1 vote180 views2 answers
Huidige timestamp c#
C#
0 vote184 views1 answer
Unity color by rgb
C#
0 vote162 views1 answer
Add variable to the beginning of a list c#
C#
0 vote192 views1 answer
C# open access database mdb
C#
0 vote161 views1 answer
C# change language version to 9.0
C#