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 vote111 views1 answer
C# declare an int list
C#
0 vote128 views1 answer
Unity2d switch camera
C#
2 votes111 views1 answer
Find largest number in array c#
C#
1 vote152 views1 answer
How to get desktop name in c#
C#
0 vote133 views1 answer
C# exception middleware
C#
1 vote129 views1 answer
Creating a button Dynamically c# winform
C#
11 votes173 views3 answers
C# return two values
C#
1 vote127 views1 answer
Fgoo
C#
1 vote124 views1 answer
Discord bot time C#
C#
38 votes126 views2 answers
How to do a foreach loop in c# for dictionary
C#