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 vote225 views1 answer
Unity stop velocity movement
C#Unity
0 vote162 views1 answer
Is number c#
C#
0 vote160 views1 answer
An unhandled exception of type 'System.ArgumentException' occurred in System.Private.Xml.dll: 'The node to be inserted is from a different document context
C#
0 vote147 views1 answer
String extentions not working
C#
2 votes159 views1 answer
Unity check for internet connection
C#
1 vote149 views1 answer
Radians to degree c#
C#
4 votes214 views10 answers
C++
C#
1 vote167 views1 answer
Unity C# make object face away
C#
3 votes146 views1 answer
Get apps execution path with app name c#
C#
0 vote161 views1 answer
Unknown discriminator value mongodb
C#