这是我经典的asp函数：

Private Function XMLHttpRequest(XmlHttpMode,XmlHttpURL,XmlHttpData)

    Dim MyXmlhttp
    Set MyXmlhttp = Server.CreateObject("WinHttp.WinHttpRequest.5.1")                  '
    With MyXmlhttp
        .setTimeouts 6000000,600000,600000                              '

            .Open "GET",True
            .Option(4) = 13056 '
            .Option(6) = True '         

            .SetRequestHeader "Mozilla/5.0 (Windows NT 6.3; Win64; x64) AppleWebKit/537.36 (KHTML,like Gecko) Chrome/78.0.3904.97 Safari/537.36"        

        .send (XmlHttpData)
        .waitForResponse (2000)             

      If MyXmlhttp.Status = 200 Then           
             XMLHttpRequest = .ResponseBody           
        Else
           XMLHttpRequest = "error code:" & .Status            
        End If            

    End With

    Set MyXmlhttp = Nothing
End Function

在iis中运行非常好，但是我通过vb6转换为dll，然后给了我一个错误提示：

  

“对象不支持此属性或方法”

VB6源代码下面的参考库，我想知道我需要哪些对象包括我的vb代码项目（对于make dll文件，那么我可以调用classi asp源代码）。