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

80 votes240 views4 answers
How to get random numbers in c#
C#
2 votes165 views1 answer
Enable script unity
C#
0 vote186 views1 answer
Gersener waves
C#
16 votes203 views3 answers
Remove item from list in for loop c#
C#
0 vote216 views2 answers
How to pass value to anothe form c# winform
C#
0 vote192 views1 answer
Debug output to console and a log
C#
11 votes200 views3 answers
C# unity detect any keyboard input
C#Unity
13 votes171 views2 answers
Lock mouse unity
C#Unity
0 vote165 views1 answer
C# silent execute exe
C#
0 vote177 views1 answer
Alpahbet incremnet in c#
C#