想获取网络时间，Dim myXmlHttp As XMLHTTP 为何在W7中可以用，W10中提示用户定义类型未定义。在引用中也加载了microsoft XM

xingming022 发布于 2020-02-25 09:27， 1970 次点击

    Dim myXmlHttp As XMLHTTP
    Set myXmlHttp = New XMLHTTP
    myXmlHttp.Open "GET", "http://m.baidu.com", False
    myXmlHttp.send
    Dim BaiduNow As Date
    BaiduNow = DateFromHTTP(myXmlHttp.getResponseHeader("Date"))
    BaiduNow = DateAdd("h", 8, BaiduNow)

想获取网络时间，为何在W7中可以用，W10中提示用户定义类型未定义。在引用中也加载了microsoft XML,v6.0。请高手指点下。

2 回复

xingming0222020-04-03 14:45

求高手指点下。

tempView2021-08-01 09:17

引用错了，xml和xmlhttp并不是一回事。
microsoft XML,v6.0是xml数据文件格式读写的组件，xmlhttp是网络访问的组件。