修改打开网站后返回的HTML并显示,如何实现

修改打开网站后返回的HTML并显示,怎么实现
修改打开网站后返回的HTML并显示,怎么实现

好像叫什么劫持的。

打开某网站后,截取返回的HTML,并加上自己想加的HTML,显示出来!

大家有什么想法!

------解决方案--------------------
写个不入流的方法:

VB code

Private Sub Command1_Click()
'On Error Resume Next
    
    Dim doc As Object
    Dim sHtml As String
    WebBrowser1.Navigate "http://topic.csdn.net/u/20090424/16/5968febc-d3f1-4c50-88f7-b4ccc35f5e9e.html"
    
    Do
        DoEvents
    Loop Until WebBrowser1.Busy = False
    
    Set doc = WebBrowser1.Document
    sHtml = doc.body.innerHTML
    doc.body.innerHTML = Replace(sHtml, "atfeel", "vbman2003")
    Set doc = Nothing
    
End Sub