当前位置:编程学习 > VB >>

使用VBA解析HTML文档

  Sub test()
    Dim ie, dmt, bd

        Set ie = CreateObject("InternetExplorer.Application") '创建一个IE对象
        With ie
            .Visible = False '显示它
            .navigate "E:\temp\divcss.html" '加载某个页面
            Do Until .readyState = 4 '等待页面加载完毕
                DoEvents
            Loop
            Set dmt = .document '将IE浏览器加载的页面文档,赋予dmt变量
            '开始操纵页面,或者提取数据啦
            Set bd = dmt.body
        End With


    End Sub
补充:VB ,  VBA
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,