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

2 votes296 views10 answers
Lol
C#
0 vote299 views1 answer
Regular expression alphanumeric dash space c#
C#
0 vote283 views1 answer
Asp.net disabled checkbox style
C#
1 vote278 views1 answer
Float and int need help
C#
2 votes341 views3 answers
Unity remove parent
C#Unity
0 vote264 views1 answer
Blazor alert
C#
0 vote282 views1 answer
SqldataReader get row count
C#
9 votes271 views1 answer
Unity c# foreach
C#
1 vote296 views1 answer
How To Get The Global Position of a GameObject in a Variable
C#
1 vote276 views1 answer
Getting the row of max value c# linq
C#