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

0 vote315 views1 answer
C# get date without time
C#
23 votes373 views2 answers
Waitforseconds unity
C#Unity
0 vote306 views1 answer
Unity topdown 2d look
C#
0 vote365 views1 answer
Adding to a dictionary unity
C#
3 votes324 views1 answer
Split with multiple delimiters c#
C#
0 vote373 views1 answer
Unity c# store gameobject in array
C#
0 vote336 views3 answers
Convert getdate to ist c#
C#
4 votes356 views1 answer
Make winforms full-screen c#
C#
0 vote341 views1 answer
C# e-mail send
C#
0 vote369 views1 answer
Wpf keydown detect if control key is down
C#