webbrowser控件怎么得到,网站上完整代源代码?
或参数详解最好有代码

解决方案 »

  1.   

    加入timer,commandbutton,text
    private sub command1_click()
    webbrowser1.navigate http://www.sohu.com/
    timer1.enabled=true
    end subprivate sub timer1_timer()
    dim doc,objhtml as object
    dim i as integer
    dim strhtml as stringif not webbrowser1.busy then
    set doc=webbrowser1.document
    i=0
    set objhtml=doc.body.createtextrange()
    if not isnull(objhtml) then
    text1.text=objhtml.htmltext
    end if
    timer1.enabled=false
    end if
    end sub
      

  2.   

    在“工程\部件”中选中Microsoft Internet Controls
    一个例子的链接
    http://vbworld.sxnw.gov.cn/Source/index.asp?kind=internet&page=2
      

  3.   

    那你想要什么,最好的文档还是msdn
      

  4.   

    上边哪位朋友代码只能获的网页的<body>部分,没有<head>部分了.msdn,我有但是英文,我E文很差
      

  5.   

    用Http直接从网站上把HTML拿下来最快啦
    方法很多。可以自己用WinSock,可以用IE5.5带的WinHttp。下面我给你一个用XML4.0里的XMLHttp的源代码。这是我刚在一个项目里用的。
        
        Dim oXMLHttp As XMLHTTP40    Set oXMLHttp = New XMLHTTP40    On Error Resume Next
        With oXMLHttp
            .Open "Get", "http://www.csdn.net/", False
            Me.MousePointer = vbHourglass
            .Send
            Me.MousePointer = vbDefault        Text1 =  .responseText
        End With
      

  6.   

    上面的Text1意指一个文本框控件
      

  7.   

    加入Microsoft Internet Transfer Controls
    Dim Strsource As String
    Strsource = Inet1.OpenURL(URL.Text)
    HTML.Text = Strsource
      

  8.   

    上面老兄做的我也会, 我只是想用webbrowser控件,获得全部代码.有没有可能?,因为我是在网页用webbrowser控件打开后在获得源代码.也就是说下载完成后我要处理它的源代码. 有方法传送源代码,如果在重新下载是浪费时间的.我做的这软件就没什么意义了.或有折忠的办法也行.