通过MicrosoftXML检测SharePoint中是否存在文件

Question

我有这个VBA功能，我通过谷歌搜索如何使用VBA检查SharePoint文件是否存在。最后，我使用的大多数代码来自this post，它再次借用了它的方法from a SO-post。

由于我不太熟悉在VBA中使用SharePoint（或一般的URL），我想知道这个函数是否有任何方式可以给出误报，即声称存在的文件没有。反之亦然，我想。

Function sharepointFileExists(ByVal strUrl As String) As Boolean
    On Error GoTo ErrorHandler
    Dim oHttp As Object
    Set oHttp = CreateObject("MSXML2.XMLHTTP.3.0")
    oHttp.Open "HEAD", strUrl, False
    oHttp.Send
    Debug.Print oHttp.Status & " " & oHttp.statusText
    sharepointFileExists = True
    Exit Function
ErrorHandler:
    Debug.Print "Error: " & Err.Description
    sharepointFileExists = False
End Function

我尝试了一些显而易见的事情，例如提供文件夹而不是文件的路径，或者提供给本地驱动器上的文件，两者都给出了满意的结果。

然而，正如我所说，我不熟悉在VBA中使用网络，所以如果我忽略了这个功能可能让我失望的任何方式，我非常想知道。我可以吗获取不会引发错误的状态，但这意味着指定路径中不存在文件？