例如截取一个网页div里的内容,假设div里面有个li列表,再把li里面的内容和每个属性内容分别截取下来

解决方案 »

  1.   


            Dim h1 As HtmlElement
            Dim h2 As HtmlElement
            Dim str As String
            h1 = WebBrowser1.Document.GetElementsByTagName("div")(0)‘截取网页div
            For i As Int16 = 0 To h1.GetElementsByTagName("li").Count - 1
                h2 = h1.GetElementsByTagName("li")(i)
                str = h2.InnerHtml’把li里面的内容和每个属性内容分别截取下来
                str = h2.GetAttribute("name")’把li里面的内容和每个属性内容分别截取下来
            Next
      

  2.   

    就是这种的,截取大div里的a属性,但是div只能通过设置里面class属性来判断截取的第一个和后面的div(每个class属性不一样没有规律而且里面也有很多的div)
      

  3.   

    你可以看看我这两篇文章
    VB用XML实现在线翻译范例
    VB分析超过64K的网页内容(基于XMLHTTP和字节数组处理)