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 vote411 views1 answer
Unity Texture2D efficient performance draw pixels
C#
4 votes340 views2 answers
Search for a value into a list in c#
C#
0 vote347 views1 answer
C# get all id of list object
C#
1 vote339 views1 answer
C# prime factorization
C#
1 vote383 views1 answer
C# find longest string in a list
C#
0 vote381 views1 answer
C# invokerequired wpf
C#
1 vote342 views1 answer
C# + max char frequency in string
C#
4 votes402 views4 answers
C# remove substring
C#
2 votes339 views1 answer
GetMousebuttonDown unity
C#
4 votes450 views1 answer
Unity new vector3
C#Unity