title: XMLHTTP.send request brings back "Nothing"
body: <p>I have a spreadsheet that has hundreds of links that point to a server (with authentication) that can be accessed via the web. I've been searching for a solution to a Link Checker in a spreadsheet that would tell me which links are broken and which are ok. By broken I mean that the website does not get called up at all.</p>
  
  <p>There are various solutions I have found around the web, none of which work for me. I'm boggled by this...</p>
  
  <p>One example that I've tried to use and figure out is re-posted below.</p>
  
  <p>As I've stepped through the code, I have come to realize that the <code>oHTTP.send</code> request brings back "Nothing". It does so for all links in the spreadsheet, regardless of whether the link works, or not.</p>
  
  <pre><code>Public Function CheckHyperlink(ByVal strUrl As String) As Boolean
  
      Dim oHttp As New MSXML2.XMLHTTP30
  
      On Error GoTo ErrorHandler
      oHttp.Open "HEAD", strUrl, False
      oHttp.send
  
      If Not oHttp.Status = 200 Then CheckHyperlink = False Else CheckHyperlink = True
  
      Exit Function
  
  ErrorHandler:
      CheckHyperlink = False
  End Function
  </code></pre>
  
  <p>Any suggestions as to what might be wrong, or right, is highly appreciated!</p>