ms-access - 使用 ADODB for Web-DAV 上传文件 "cannot find any objects or data in accordance with the name..."

Question

我有一个在 Windows 7 上运行的 MS Access 2007 VBA 应用程序。其中一个关键功能是将文件上传到 WebDAV 服务器。下面的代码在一台 PC 上完美运行，但在其他 PC 上失败(是的，每台 PC 的配置方式都相同)。

以下是在其他 PC 上失败时弹出的 Norwegion 错误消息的 translate.google.com 翻译:

运行时错误“-2147217895 (80040e19)”:在此操作范围内找不到符合名称、范围或选择标准的任何对象或数据

这行代码失败了:

objRecord.Open fil、“URL=”& URL、adModeReadWrite、adCreateOverwrite、adDelayFetchStream、sUsername、sPwd

完整的功能代码如下。这实际上只是重用 http://social.msdn.microsoft.com/Forums/en-US/isvvba/thread/26b8e905-33d0-438b-98a7-bb69053b931e/ 处的代码。 。任何提示将不胜感激!

Function DAVPUT(ByVal URL As String, ByVal fil As String) As Boolean '
    Dim sUsername As String
    Dim sPwd As String
    sUsername = "k@dummy.com"
    sPwd = "dummy"

    Dim objRecord As New ADODB.Record
    Dim objStream As New ADODB.Stream

    objRecord.Open fil, "URL=" & URL, adModeReadWrite, adCreateOverwrite, adDelayFetchStream, sUsername, sPwd
    objStream.Type = adTypeBinary
    objStream.Open objRecord, adModeWrite, adOpenStreamFromRecord
    objStream.LoadFromFile fil 
    objStream.Flush
    DoEvents
    objStream.close
    objRecord.close

    DAVPUT = True

End Function

Answer 1

This post建议您“比较 MDAC 本地和远程的版本”。我意识到我提供的是一个最小的、不专业的答案，但由于没有其他答案，所以就在这里。