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

13 votes252 views2 answers
C# list to array
C#
1 vote264 views1 answer
Unity raycast all layers except one
C#Unity
0 vote215 views1 answer
C# form
C#
1 vote246 views1 answer
Chrome clear console history
C#
0 vote242 views1 answer
C# serialize to xml
C#
0 vote206 views1 answer
Palindrome number c#
C#
1 vote232 views1 answer
List of all c# keywords
C#
2 votes254 views1 answer
Unity 2d how to set an object or the mouse position
C#Unity
0 vote252 views1 answer
Sdl quit event not working multiple windows
C#
0 vote261 views1 answer
Show empty message in data table angular material, If no data found
C#