求大神帮忙，通过高德地图获取里程，但不到自己想要的数据，代码下图

joehk

Sub vb()

Dim wz As String
    wz = "https://www.amap.com/dir?from[name]=上海市&to[name]=浙江省杭州市"

    Dim xmlHttp As Object
    Set xmlHttp = CreateObject("MSXML2.xmlHttp")
     With xmlHttp
        .Open "GET", wz, False
        .send
        Do While .readyState <> 4
            DoEvents
        Loop
        strText = .responseText
        Debug.Print strText
        
     End With


End Sub
用responsetext,获取的网页数据，一直取不到里程数据，求帮忙

zpy2

https://lbs.amap.com/api/javascript-api/summary/

路径规划吗？

joehk

求大神解答

joehk

zpy2 发表于 2020-8-30 19:20
https://lbs.amap.com/api/javascript-api/summary/

路径规划吗？

不是路径规划，是网页抓取，但是抓不出来内容

zpy2

https://www.amap.com/dir?from%5Badcode%5D=310000&from%5Bname%5D=上海市&from%5Bid%5D=3100001598822761804&from%5Bpoitype%5D=&from%5Blnglat%5D=121.473658%2C31.230378&from%5Bmodxy%5D=&to%5Badcode%5D=330100&to%5Bname%5D=浙江省杭州市&to%5Bid%5D=3301001598822800016&to%5Bpoitype%5D=&to%5Blnglat%5D=120.209947%2C30.245853&to%5Bmodxy%5D=&type=car&policy=1

joehk

zpy2 发表于 2020-8-31 05:28
https://www.amap.com/dir?from%5Badcode%5D=310000&from%5Bname%5D=上海市&from%5Bid%5D=3100001598822761 ...

？？？？？

duquancai

知道抓包姿势吗？懂得分析抓包姿势吗？