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 votes127 views1 answer
Unity destroy object on collision
C#Unity
29 votes99 views5 answers
Random string generator c#
C#
0 vote99 views1 answer
Prevent C# app from lingering after closing in background processes
C#
0 vote93 views1 answer
C# allowedusernamecharacters
C#
0 vote94 views1 answer
Create a list of 3 Orders c#
C#
0 vote92 views1 answer
Devexpress spreadsheet document source wpf
C#
1 vote94 views1 answer
Httppostedfilebase in .net core 3.1
C#
2 votes100 views1 answer
Set object to random color unity
C#
0 vote99 views1 answer
Convert-integer-to-binary-in-c-sharp
C#
4 votes130 views3 answers
Unfreeze position in unity
C#Unity