Dim web As New System.Windows.Forms.WebBrowser

            web.Navigate(r("URL"))

            Do Until web.ReadyState = 4

                Application.DoEvents

            Loop

            Dim elems As System.Windows.Forms.HtmlElementCollection

            Elems = web.Document.GetElementsByTagName("table")

            For Each elem As System.Windows.Forms.Htmlelement In elems

                If elem.GetAttribute("summary") Like "履歴情報" Then

                    Dim e_Info As System.Windows.Forms.HtmlElement = elem.GetElementsByTagName("tbody")(0)

                    Dim e_Info1 As System.Windows.Forms.HtmlElement = e_Info.GetElementsByTagName("tr")(2).GetElementsByTagName("td")(0)

                    Dim e_Info2 As System.Windows.Forms.HtmlElement = e_Info.GetElementsByTagName("tr")(2).GetElementsByTagName("td")(1)

                    Dim e_Info3 As System.Windows.Forms.HtmlElement = e_Info.GetElementsByTagName("tr")(2).GetElementsByTagName("td")(2)

                    r("出荷日") = e_Info1.InnerText

                    r("配達状況") = e_Info2.InnerText & e_Info3.InnerText

                End If

            Next

跳转地址 http://thira.plavox.info/transport/api/?t=[sagawa]&no=564410245044     这个

r("URL") 是 上面这个地址，   但  打开地址以后 是 自动跳转，后打开所要采集的地址， 

 

有没有办法 实现， 跳转后采集数据呢？